Things-to-keep:
Makefile.in
+browser.exp
+browser.test
configure.in
configure
console.exp
console.test
defs
simple.c
+stack1.c
+stack2.c
Things-to-lose:
--- /dev/null
+if {$tracelevel} {
+ strace $tracelevel
+}
+
+#
+# test console window
+#
+set prms_id 0
+set bug_id 0
+
+set testfile "stack"
+set binfile ${objdir}/${subdir}/${testfile}
+set r [gdb_compile "${srcdir}/${subdir}/stack1.c ${srcdir}/${subdir}/stack2.c" "${binfile}" executable {debug}]
+if { $r != "" } {
+ gdb_suppress_entire_file \
+ "Testcase compile failed, so some tests in this file will automatically fail."
+}
+
+# Start with a fresh gdbtk
+gdb_exit
+set results [gdbtk_start [file join $srcdir $subdir browser.test]]
+set results [split $results \n]
+
+# Analyze results
+foreach test $results {
+ set status [lindex $test 0]
+ set name [lindex $test 1]
+ set description [lindex $test 2]
+ set msg [lindex $test 3]
+
+ switch $status {
+ pass {
+ pass "$description ($name)"
+ }
+
+ fail {
+ fail "$description ($name)"
+ }
+
+ error {
+ # We should do something with this...
+ }
+ }
+}
\ No newline at end of file
--- /dev/null
+# Copyright (C) 1998 Cygnus Solutions
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+# Please email any bugs, comments, and/or additions to this file to:
+# bug-gdb@prep.ai.mit.edu
+
+# This file was written by Keith Seitz (keiths@cygnus.com)
+
+# Read in the standard defs file
+
+if {![gdbtk_read_defs]} {
+ break
+}
+
+global objdir test_ran
+
+##### #####
+# #
+# Helper functions for this module #
+# #
+##### #####
+
+# Set the search expression
+proc set_regexp {exp} {
+ global Regexp
+
+ $Regexp delete 0 end
+ $Regexp insert 0 $exp
+}
+
+# Do the search; attempts to filter out compiler noise
+# like _DYNAMIC_ and __bss_start.
+proc do_search {} {
+ global browser Funcs
+
+ $browser search
+ set m [$Funcs get 0 end]
+
+ # Bogus -- we could get things like _DYNAMIC, __bss_start, etc...
+ set matches {}
+ foreach a $m {
+ if {![regexp ^_.* $a]} {
+ lappend matches $a
+ }
+ }
+ return $matches
+}
+
+# Set search on static functions only.
+proc set_static_only {on} {
+ if {$on} {
+ pref set gdb/search/static 1
+ } else {
+ pref set gdb/search/static 0
+ }
+}
+
+# Set search to use regular expressions.
+proc set_use_regexp {on} {
+ if {$on} {
+ pref set gdb/search/use_regexp 1
+ } else {
+ pref set gdb/search/use_regexp 0
+ }
+}
+
+##### #####
+# #
+# BROWSER TESTS #
+# #
+##### #####
+
+# Load the test executable
+set file [file join $objdir stack]
+gdb_cmd "file $file"
+
+# Open a browser
+set browser [manage open browser]
+set Files [$browser test_get FilesLB]
+set Funcs [$browser test_get FuncsLB]
+set Regexp [$browser test_get Regexp]
+
+# Test: browser-1.1
+# Desc: Check file listbox contents
+gdbtk_test browser-1.1 {file listbox contents} {
+ $Files get 0 end
+} {stack1.c stack2.c}
+
+# Test: browser-2.1
+# Desc: Check all files/all funcs
+gdbtk_test browser-2.1 {all files/all funcs} {
+ set_regexp ""
+ do_search
+} {extern_func1_1 extern_func1_10 extern_func1_11 extern_func1_12 extern_func1_13 extern_func1_14 extern_func1_15 extern_func1_2 extern_func1_3 extern_func1_4 extern_func1_5 extern_func1_6 extern_func1_7 extern_func1_8 extern_func1_9 func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9 main static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+
+# Test: browser-2.2
+# Desc: Check all functions in stack1.c
+gdbtk_test browser-2.2 {all functions in stack1.c} {
+ set_regexp ""
+ $Files selection set 0
+ do_search
+} {func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9 main static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.3
+# Desc: Check all functions in stack2.c
+gdbtk_test browser-2.3 {all functions in stack2.c} {
+ set_regexp ""
+ $Files selection set 1
+ do_search
+} {extern_func1_1 extern_func1_10 extern_func1_11 extern_func1_12 extern_func1_13 extern_func1_14 extern_func1_15 extern_func1_2 extern_func1_3 extern_func1_4 extern_func1_5 extern_func1_6 extern_func1_7 extern_func1_8 extern_func1_9}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.4
+# Desc: Check for all functions matching "func"
+gdbtk_test browser-2.4 {all functions matching "func"} {
+ set_regexp func
+ do_search
+} {func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9}
+
+# Test: browser-2.5
+# Desc: Check all functions matching "func" in stack1.c
+gdbtk_test browser-2.5 {all functions matching "func" in stack1.c} {
+ set_regexp func
+ $Files selection set 0
+ do_search
+} {func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.6
+# Desc: Check all functions matching "funcs" in stack2.c
+gdbtk_test browser-2.6 {all functions matching "func" in stack2.c} {
+ set_regexp func
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.7
+# Desc: Check all functions matching "foobar"
+gdbtk_test browser-2.7 {all functions matching "foobar"} {
+ set_regexp foobar
+ do_search
+} {}
+
+# Test: browser-2.8
+# Desc: Check all functions matching "foobar" in stack1.c
+gdbtk_test browser-2.8 {functions matching "foobar" in stack1.c} {
+ set_regexp foobar
+ $Files selection set 0
+ do_search
+} {}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.9
+# Desc: Check all functions matching "foobar" in stack2.c
+gdbtk_test browser-2.9 {functions matching "foobar" in stack2.c} {
+ set_regexp foobar
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.10
+# Desc: Check all functions matching regexp "func"
+gdbtk_test browser-2.10 {all functions matching regexp "func"} {
+ set_regexp func
+ set_use_regexp 1
+ do_search
+} {extern_func1_1 extern_func1_10 extern_func1_11 extern_func1_12 extern_func1_13 extern_func1_14 extern_func1_15 extern_func1_2 extern_func1_3 extern_func1_4 extern_func1_5 extern_func1_6 extern_func1_7 extern_func1_8 extern_func1_9 func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9 static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ set_use_regexp 0
+}
+
+# Test: browser-2.11
+# Desc: Check all functions matching regexp "func" in stack1.c
+gdbtk_test browser-2.11 {all functions matching regexp "func" in stack1.c} {
+ set_regexp func
+ set_use_regexp 1
+ $Files selection set 0
+ do_search
+} {func_1 func_10 func_11 func_12 func_13 func_14 func_15 func_2 func_3 func_4 func_5 func_6 func_7 func_8 func_9 static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.12
+# Desc: Check all functions matching regexp "func" in stack2.c
+gdbtk_test browser-2.12 {all functions matching regexp "func" in stack2.c} {
+ set_regexp func
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {extern_func1_1 extern_func1_10 extern_func1_11 extern_func1_12 extern_func1_13 extern_func1_14 extern_func1_15 extern_func1_2 extern_func1_3 extern_func1_4 extern_func1_5 extern_func1_6 extern_func1_7 extern_func1_8 extern_func1_9}
+if {$test_ran} {
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.13
+# Desc: Check all functions matching regexp "\_1$"
+gdbtk_test browser-2.13 {all functions matching regexp "\_1$"} {
+ set_regexp {\_1$}
+ set_use_regexp 1
+ do_search
+} {extern_func1_1 func_1 static_func_1}
+if {$test_ran} {
+ set_use_regexp 0
+}
+
+# Test: browser-2.14
+# Desc: Check all functions matching regexp "\_1$" in stack1.c
+gdbtk_test browser-2.14 {all functions matching regexp "\_1$" in stack1.c} {
+ set_regexp {\_1$}
+ set_use_regexp 1
+ $Files selection set 0
+ do_search
+} {func_1 static_func_1}
+if {$test_ran} {
+ $Files selection clear 0 end
+ set_use_regexp 0
+}
+
+# Test: browser-2.15
+# Desc: Check all functions matching regexp "\_1$" in stack2.c
+gdbtk_test browser-2.15 {all functions matching regexp "\_1$" in stack2.c} {
+ set_regexp {\_1$}
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {extern_func1_1}
+if {$test_ran} {
+ $Files selection clear 0 end
+ set_use_regexp 0
+}
+
+# Test: browser-2.16
+# Desc: Check all functions matching regexp "foobar"
+gdbtk_test browser-2.16 {all functions matching regexp "foobar"} {
+ set_regexp foobar
+ set_use_regexp 1
+ do_search
+} {}
+if {$test_ran} {
+ set_use_regexp 0
+}
+
+# Test: browser-2.17
+# Desc: Check all functions matching regexp "foobar" in stack1.c
+gdbtk_test browser-2.17 {all functions matching regexp "foobar" in stack1.c} {
+ set_regexp foobar
+ set_use_regexp 1
+ $Files selection set 0
+ do_search
+} {}
+if {$test_ran} {
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-2.18
+# Desc: Check all functions matching regexp "foobar"
+gdbtk_test browser-2.18 {all functions matching regexp "foobar"} {
+ set_regexp foobar
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.1
+# Desc: Check all static funcs
+gdbtk_test browser-3.1 {all static funcs} {
+ set_static_only 1
+ set_regexp ""
+ do_search
+} {static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ set_static_only 0
+}
+
+# Test: browser-3.2
+# Desc: Check all static functions in stack1.c
+gdbtk_test browser-3.2 {all static functions in stack1.c} {
+ set_regexp ""
+ $Files selection set 0
+ set_static_only 1
+ do_search
+} {static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ $Files selection clear 0 end
+ set_static_only 0
+}
+
+# Test: browser-3.3
+# Desc: Check all static functions in stack2.c
+gdbtk_test browser-3.3 {all static functions in stack2.c} {
+ set_regexp ""
+ set_static_only 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.4
+# Desc: Check for all static functions matching "func"
+gdbtk_test browser-3.4 {all static functions matching "func"} {
+ set_regexp func
+ set_static_only 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+}
+
+# Test: browser-3.5
+# Desc: Check for all static functions matching "func" in stack1.c
+gdbtk_test browser-3.5 {all static functions matching "func" in stack1.c} {
+ set_regexp func
+ set_static_only 1
+ $Files selection set 0
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.6
+# Desc: Check all static functions matching "func" in stack2.c
+gdbtk_test browser-3.6 {all static functions matching "func" in stack2.c} {
+ set_regexp func
+ set_static_only 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.7
+# Desc: Check all static functions matching "foobar"
+gdbtk_test browser-3.7 {all static functions matching "foobar"} {
+ set_regexp foobar
+ set_static_only 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+}
+
+# Test: browser-3.8
+# Desc: Check all static functions matching "foobar" in stack1.c
+gdbtk_test browser-3.8 {all static functions matching "foobar" in stack1.c} {
+ set_regexp foobar
+ set_static_only 1
+ $Files selection set 0
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.9
+# Desc: Check all static functions matching "foobar" in stack2.c
+gdbtk_test browser-3.9 {all static functions matching "foobar" stack2.c} {
+ set_regexp foobar
+ set_static_only 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.10
+# Desc: Check all static functions matching regexp "func"
+gdbtk_test browser-3.10 {all static functions matching regexp "func"} {
+ set_regexp func
+ set_static_only 1
+ set_use_regexp 1
+ do_search
+} {static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ set_use_regexp 0
+ set_static_only 0
+}
+
+# Test: browser-3.11
+# Desc: Check all static functions matching regexp "func" in stack1.c
+gdbtk_test browser-3.11 {all static functions matching regexp "func" in stack1.c} {
+ set_regexp func
+ set_static_only 1
+ set_use_regexp 1
+ $Files selection set 0
+ do_search
+} {static_func_1 static_func_10 static_func_11 static_func_12 static_func_13 static_func_14 static_func_15 static_func_2 static_func_3 static_func_4 static_func_5 static_func_6 static_func_7 static_func_8 static_func_9}
+if {$test_ran} {
+ set_use_regexp 0
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.12
+# Desc: Check all static functions matching regexp "func" in stack2.c
+gdbtk_test browser-3.12 {all static functions matching regexp "func" in stack2.c} {
+ set_regexp func
+ set_static_only 1
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_use_regexp 0
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.13
+# Desc: Check all static functions matching regexp "\_1$"
+gdbtk_test browser-3.13 {all static functions matching regexp "\_1$"} {
+ set_regexp {\_1$}
+ set_static_only 1
+ set_use_regexp 1
+ do_search
+} {static_func_1}
+if {$test_ran} {
+ set_static_only 0
+ set_use_regexp 0
+}
+
+# Test: browser-3.14
+# Desc: Check all static functions matching regexp "\_1$" in stack1.c
+gdbtk_test browser-3.14 {all static functions matching regexp "\_1$" in stack1.c} {
+ set_regexp {\_1$}
+ set_static_only 1
+ set_use_regexp 1
+ $Files selection set 0
+ do_search
+} {static_func_1}
+if {$test_ran} {
+ set_use_regexp 0
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.15
+# Desc: Check all static functions matching regexp "\_1$" in stack2.c
+gdbtk_test browser-3.15 {all static functions matching regexp "\_1$" in stack2.c} {
+ set_regexp {\_1$}
+ set_static_only 1
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_use_regexp 0
+ set_static_only 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.16
+# Desc: Check all static functions matching regexp "foobar"
+gdbtk_test browser-3.16 {all static functions matching regexp "foobar"} {
+ set_regexp foobar
+ set_use_regexp 1
+ set_static_only 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ set_use_regexp 0
+}
+
+# Test: browser-3.17
+# Desc: Check all static functions matching regexp "foobar" in stack1.c
+gdbtk_test browser-3.17 {all static functions matching regexp "foobar" in stack1.c} {
+ set_regexp foobar
+ set_use_regexp 1
+ set_static_only 1
+ $Files selection set 0
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+# Test: browser-3.18
+# Desc: Check all static functions matching regexp "foobar" in stack2.c
+gdbtk_test browser-3.18 {all static functions matching regexp "foobar" in stack2.c} {
+ set_regexp foobar
+ set_static_only 1
+ set_use_regexp 1
+ $Files selection set 1
+ do_search
+} {}
+if {$test_ran} {
+ set_static_only 0
+ set_use_regexp 0
+ $Files selection clear 0 end
+}
+
+set select [$browser test_get Select]
+# Test: browser-4.1
+# Desc: Check select button text initial
+gdbtk_test browser-4.1 {select all files button initial text} {
+ $select cget -text
+} {Select All}
+
+# Test: browser-4.2
+# Desc: Check select button function
+gdbtk_test browser-4.2 {select button - select all} {
+ $select invoke
+ $Files curselection
+} {0 1}
+if {$test_ran} {
+ $Files selection clear 0 end
+ $select invoke
+}
+
+# Test: browser-4.3
+# Desc: Check select button text
+gdbtk_test browser-4.3 {select button text - select none} {
+ $select invoke
+ $select cget -text
+} {Select None}
+if {$test_ran} {
+ $select invoke
+}
+
+# Test: browser-4.4
+# Desc: Check select button function
+gdbtk_test browser-4.4 {select button - select none} {
+ $select invoke
+ $select invoke
+ $Files curselection
+} {}
+
+# Test: browser-4.5
+# Desc: Check select button text
+gdbtk_test browser-4.5 {select button text - flip} {
+ $select invoke
+ $select invoke
+ $select cget -text
+} {Select All}
+
+# Test: browser-5.1
+# Desc: Toggle all bps on
+gdbtk_test browser-5.1 {toggle_all_bp on} {
+ set_regexp {\_1$}
+ set_use_regexp 1
+ do_search
+ $browser toggle_all_bp
+
+ set_regexp .*
+ set funcs [do_search]
+ set bps {}
+ foreach f $funcs {
+ if {[bp_exists [gdb_loc $f]] != -1} {
+ lappend bps 1
+ } else {
+ lappend bps 0
+ }
+ }
+ set bps
+} {1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0}
+if {$test_ran} {
+ set_use_regexp 0
+ for {set i 0} {$i < 20} {incr i} {
+ catch {gdb_cmd "delete $i"}
+ }
+}
+
+# Test: browser-5.2
+# Desc: Toggle all bps off
+gdbtk_test browser-5.2 {toggle_all_bp off} {
+ set_regexp {\_1$}
+ set_use_regexp 1
+ do_search
+ $browser toggle_all_bp
+
+ # Turn on bps
+ set_regexp .*
+ set funcs [do_search]
+
+ # Turn off all static bps
+ set_regexp {\_1$}
+ set_static_only 1
+ do_search
+ $browser toggle_all_bp
+ set bps {}
+ foreach f $funcs {
+ if {[bp_exists [gdb_loc $f]] != -1} {
+ lappend bps 1
+ } else {
+ lappend bps 0
+ }
+ }
+ set bps
+} {1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0}
+if {$test_ran} {
+ set_static_only 0
+ set_use_regexp 0
+ for {set i 0} {$i < 20} {incr i} {
+ catch {gdb_cmd "delete $i"}
+ }
+}
+
+# Test: browser-6.1
+# Desc: Check that search expressions are saved
+gdbtk_test browser-6.1 {save last search expression} {
+ set_regexp hello
+ do_search
+ pref get gdb/search/last_symbol
+} {hello}
+
+#
+# Exit
+#
+gdbtk_test_done
--- /dev/null
+/* Functions defined in other files */
+extern void extern_func1_1 (int a, char *b, unsigned long c);
+
+/* Functions defined in this file */
+static void static_func_1 (int a, char *b, unsigned long c);
+static void static_func_2 (int a, char *b, unsigned long c);
+static void static_func_3 (int a, char *b, unsigned long c);
+static void static_func_4 (int a, char *b, unsigned long c);
+static void static_func_5 (int a, char *b, unsigned long c);
+static void static_func_6 (int a, char *b, unsigned long c);
+static void static_func_7 (int a, char *b, unsigned long c);
+static void static_func_8 (int a, char *b, unsigned long c);
+static void static_func_9 (int a, char *b, unsigned long c);
+static void static_func_10 (int a, char *b, unsigned long c);
+static void static_func_11 (int a, char *b, unsigned long c);
+static void static_func_12 (int a, char *b, unsigned long c);
+static void static_func_13 (int a, char *b, unsigned long c);
+static void static_func_14 (int a, char *b, unsigned long c);
+static void static_func_15 (int a, char *b, unsigned long c);
+
+void func_1 (int a, char *b, unsigned long c);
+void func_2 (int a, char *b, unsigned long c);
+void func_3 (int a, char *b, unsigned long c);
+void func_4 (int a, char *b, unsigned long c);
+void func_5 (int a, char *b, unsigned long c);
+void func_6 (int a, char *b, unsigned long c);
+void func_7 (int a, char *b, unsigned long c);
+void func_8 (int a, char *b, unsigned long c);
+void func_9 (int a, char *b, unsigned long c);
+void func_10 (int a, char *b, unsigned long c);
+void func_11 (int a, char *b, unsigned long c);
+void func_12 (int a, char *b, unsigned long c);
+void func_13 (int a, char *b, unsigned long c);
+void func_14 (int a, char *b, unsigned long c);
+void func_15 (int a, char *b, unsigned long c);
+
+int
+main (int argc, char *argv[])
+{
+ int a;
+ char *b;
+ unsigned long c;
+
+ a = 1;
+ b = "This is a string.";
+ c = 0xdeadL;
+
+ func_1 (a, b, c);
+
+ exit (0);
+}
+
+void
+func_1 (int a, char *b, unsigned long c)
+{
+ func_2 (a, b, c);
+}
+
+void
+func_2 (int a, char *b, unsigned long c)
+{
+ func_3 (a, b, c);
+}
+
+void
+func_3 (int a, char *b, unsigned long c)
+{
+ func_4 (a, b, c);
+}
+
+void
+func_4 (int a, char *b, unsigned long c)
+{
+ func_5 (a, b, c);
+}
+
+void
+func_5 (int a, char *b, unsigned long c)
+{
+ func_6 (a, b, c);
+}
+
+void
+func_6 (int a, char *b, unsigned long c)
+{
+ func_7 (a, b, c);
+}
+
+void
+func_7 (int a, char *b, unsigned long c)
+{
+ func_8 (a, b, c);
+}
+
+void
+func_8 (int a, char *b, unsigned long c)
+{
+ func_9 (a, b, c);
+}
+
+void
+func_9 (int a, char *b, unsigned long c)
+{
+ func_10 (a, b, c);
+}
+
+void
+func_10 (int a, char *b, unsigned long c)
+{
+ func_11 (a, b, c);
+}
+
+void
+func_11 (int a, char *b, unsigned long c)
+{
+ func_12 (a, b, c);
+}
+
+void
+func_12 (int a, char *b, unsigned long c)
+{
+ func_13 (a, b, c);
+}
+
+void
+func_13 (int a, char *b, unsigned long c)
+{
+ func_14 (a, b, c);
+}
+
+void
+func_14 (int a, char *b, unsigned long c)
+{
+ func_15 (a, b, c);
+}
+
+void
+func_15 (int a, char *b, unsigned long c)
+{
+ static_func_1 (a, b, c);
+}
+
+static void
+static_func_1 (int a, char *b, unsigned long c)
+{
+ static_func_2 (a, b, c);
+}
+
+static void
+static_func_2 (int a, char *b, unsigned long c)
+{
+ static_func_3 (a, b, c);
+}
+
+static void
+static_func_3 (int a, char *b, unsigned long c)
+{
+ static_func_4 (a, b, c);
+}
+
+static void
+static_func_4 (int a, char *b, unsigned long c)
+{
+ static_func_5 (a, b, c);
+}
+
+static void
+static_func_5 (int a, char *b, unsigned long c)
+{
+ static_func_6 (a, b, c);
+}
+
+static void
+static_func_6 (int a, char *b, unsigned long c)
+{
+ static_func_7 (a, b, c);
+}
+
+static void
+static_func_7 (int a, char *b, unsigned long c)
+{
+ static_func_8 (a, b, c);
+}
+
+static void
+static_func_8 (int a, char *b, unsigned long c)
+{
+ static_func_9 (a, b, c);
+}
+
+static void
+static_func_9 (int a, char *b, unsigned long c)
+{
+ static_func_10 (a, b, c);
+}
+
+static void
+static_func_10 (int a, char *b, unsigned long c)
+{
+ static_func_11 (a, b, c);
+}
+
+static void
+static_func_11 (int a, char *b, unsigned long c)
+{
+ static_func_12 (a, b, c);
+}
+
+static void
+static_func_12 (int a, char *b, unsigned long c)
+{
+ static_func_13 (a, b, c);
+}
+
+static void
+static_func_13 (int a, char *b, unsigned long c)
+{
+ static_func_14 (a, b, c);
+}
+
+static void
+static_func_14 (int a, char *b, unsigned long c)
+{
+ static_func_15 (a, b, c);
+}
+
+static void
+static_func_15 (int a, char *b, unsigned long c)
+{
+ extern_func1_1 (a, b, c);
+}
--- /dev/null
+/* Functions defined in this file */
+void extern_func1_1 (int, char *, unsigned long);
+void extern_func1_2 (int, char *, unsigned long);
+void extern_func1_3 (int, char *, unsigned long);
+void extern_func1_4 (int, char *, unsigned long);
+void extern_func1_5 (int, char *, unsigned long);
+void extern_func1_6 (int, char *, unsigned long);
+void extern_func1_7 (int, char *, unsigned long);
+void extern_func1_8 (int, char *, unsigned long);
+void extern_func1_9 (int, char *, unsigned long);
+void extern_func1_10 (int, char *, unsigned long);
+void extern_func1_11 (int, char *, unsigned long);
+void extern_func1_12 (int, char *, unsigned long);
+void extern_func1_13 (int, char *, unsigned long);
+void extern_func1_14 (int, char *, unsigned long);
+void extern_func1_15 (int, char *, unsigned long);
+
+void
+extern_func1_1 (int a, char *b, unsigned long c)
+{
+ extern_func1_2 (a, b, c);
+}
+
+void
+extern_func1_2 (int a, char *b, unsigned long c)
+{
+ extern_func1_3 (a, b, c);
+}
+
+void
+extern_func1_3 (int a, char *b, unsigned long c)
+{
+ extern_func1_4 (a, b, c);
+}
+
+void
+extern_func1_4 (int a, char *b, unsigned long c)
+{
+ extern_func1_5 (a, b, c);
+}
+
+void
+extern_func1_5 (int a, char *b, unsigned long c)
+{
+ extern_func1_6 (a, b, c);
+}
+
+void
+extern_func1_6 (int a, char *b, unsigned long c)
+{
+ extern_func1_7 (a, b, c);
+}
+
+void
+extern_func1_7 (int a, char *b, unsigned long c)
+{
+ extern_func1_8 (a, b, c);
+}
+
+void
+extern_func1_8 (int a, char *b, unsigned long c)
+{
+ extern_func1_9 (a, b, c);
+}
+
+void
+extern_func1_9 (int a, char *b, unsigned long c)
+{
+ extern_func1_10 (a, b, c);
+}
+
+void
+extern_func1_10 (int a, char *b, unsigned long c)
+{
+ extern_func1_11 (a, b, c);
+}
+
+void
+extern_func1_11 (int a, char *b, unsigned long c)
+{
+ extern_func1_12 (a, b, c);
+}
+
+void
+extern_func1_12 (int a, char *b, unsigned long c)
+{
+ extern_func1_13 (a, b, c);
+}
+
+void
+extern_func1_13 (int a, char *b, unsigned long c)
+{
+ extern_func1_14 (a, b, c);
+}
+
+void
+extern_func1_14 (int a, char *b, unsigned long c)
+{
+ extern_func1_15 (a, b, c);
+}
+
+void
+extern_func1_15 (int a, char *b, unsigned long c)
+{
+ /* THE END */
+ return;
+}