summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJim Blandy <jimb@red-bean.com>1996-09-10 19:22:40 +0000
committerJim Blandy <jimb@red-bean.com>1996-09-10 19:22:40 +0000
commit3e8a29f5f5c8afd927d04e1b9c1ee0ac6c259c1a (patch)
tree2b879981654c3b6324d9de3677626d5e4b090849
parentc5d5195418d269d73c12b0d46a1b6e5af7598ebf (diff)
downloadguile-3e8a29f5f5c8afd927d04e1b9c1ee0ac6c259c1a.tar.gz
Use SCM_P instead of PROTO; the latter intrudes on the user's
namespace. * params.h: Deleted; definition of SCM_P moved to... * __scm.h: ... here, where it replaces PROTO macro. * libguile.h, smob.h: Don't #include "params.h". * continuations.c, error.h, feature.h, gc.c, gc.h, init.h, load.h, smob.h: Fix prototypes accordingly. * Makefile.in: Update dependencies. (inner_h_files): Remove params.h.
-rw-r--r--libguile/Makefile.in249
-rw-r--r--libguile/__scm.h6
-rw-r--r--libguile/continuations.c2
-rw-r--r--libguile/error.h4
-rw-r--r--libguile/feature.h6
-rw-r--r--libguile/gc.c6
-rw-r--r--libguile/gc.h42
-rw-r--r--libguile/init.h6
-rw-r--r--libguile/libguile.h1
-rw-r--r--libguile/load.h10
-rw-r--r--libguile/smob.h8
11 files changed, 163 insertions, 177 deletions
diff --git a/libguile/Makefile.in b/libguile/Makefile.in
index b391b9786..08f026483 100644
--- a/libguile/Makefile.in
+++ b/libguile/Makefile.in
@@ -193,7 +193,6 @@ inner_h_files= __scm.h \
objprop.h \
options.h \
pairs.h \
- params.h \
ports.h \
posix.h \
print.h \
@@ -479,137 +478,131 @@ depends:
###
alist.o: alist.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eq.h alist.h alist.x
append.o: append.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h append.h append.x
appinit.o: appinit.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h
arbiters.o: arbiters.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
- strings.h vectors.h root.h ports.h async.h smob.h \
- params.h ports.h genio.h \
- print.h options.h markers.h \
- arbiters.h arbiters.x
+ strings.h vectors.h root.h ports.h async.h smob.h ports.h \
+ genio.h print.h options.h \
+ markers.h arbiters.h arbiters.x
async.o: async.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eval.h throw.h smob.h \
- params.h ports.h genio.h \
- print.h options.h markers.h \
- async.x
+ ports.h genio.h print.h \
+ options.h markers.h async.x
boolean.o: boolean.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h boolean.x
chars.o: chars.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h chars.x
continuations.o: continuations.c _scm.h __scm.h \
- scmconfig.h tags.h error.h pairs.h \
- __scm.h list.h gc.h marksweep.h gsubr.h \
- procs.h numbers.h symbols.h boolean.h strings.h vectors.h root.h \
- ports.h async.h stackchk.h continuations.h \
+ scmconfig.h tags.h error.h \
+ __scm.h pairs.h list.h gc.h marksweep.h \
+ gsubr.h procs.h numbers.h symbols.h boolean.h strings.h vectors.h \
+ root.h ports.h async.h stackchk.h continuations.h \
debug.h options.h debug.h dynwind.h \
continuations.h continuations.x
debug.o: debug.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eval.h throw.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h \
- procprop.h srcprop.h alist.h continuations.h strports.h read.h \
- feature.h debug.h debug.x
+ print.h options.h smob.h ports.h \
+ genio.h markers.h procprop.h srcprop.h \
+ alist.h continuations.h strports.h read.h feature.h debug.h debug.x
dynwind.o: dynwind.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eval.h alist.h dynwind.h \
dynwind.x
eq.o: eq.c _scm.h __scm.h scmconfig.h tags.h \
- error.h pairs.h __scm.h list.h gc.h \
+ error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h stackchk.h \
continuations.h debug.h options.h \
- strorder.h smob.h params.h ports.h \
- genio.h print.h markers.h unif.h \
- eq.h eq.x
+ strorder.h smob.h ports.h genio.h \
+ print.h markers.h unif.h eq.h eq.x
error.o: error.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h throw.h error.x
eval.o: eval.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h debug.h \
options.h append.h alist.h sequences.h eq.h \
- continuations.h throw.h smob.h params.h \
- ports.h genio.h print.h \
- markers.h markers.h procprop.h hashtab.h srcprop.h \
- stackchk.h continuations.h debug.h eval.h \
- eval.c eval.x
+ continuations.h throw.h smob.h ports.h \
+ genio.h print.h markers.h \
+ markers.h procprop.h hashtab.h srcprop.h stackchk.h \
+ continuations.h debug.h eval.h eval.c eval.x
extchrs.o: extchrs.c extchrs.h
fdsocket.o: fdsocket.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h filesys.h unif.h \
fdsocket.h fdsocket.x
feature.o: feature.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h feature.h feature.x
files.o: files.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h files.h files.x
filesys.o: filesys.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h \
- filesys.h filesys.x
+ print.h options.h smob.h ports.h \
+ genio.h markers.h filesys.h filesys.x
fports.o: fports.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h markers.h fports.h \
ports.h fports.x
gc.o: gc.c _scm.h __scm.h scmconfig.h tags.h \
- error.h pairs.h __scm.h list.h gc.h \
+ error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h stime.h stackchk.h \
continuations.h debug.h options.h \
struct.h genio.h print.h weaks.h smob.h \
- params.h ports.h genio.h \
- markers.h unif.h gc.x
+ ports.h genio.h markers.h unif.h \
+ gc.x
gdbint.o: gdbint.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h tag.h strports.h read.h \
options.h print.h eval.h chars.h gdbint.h gdb_interface.h
genio.o: genio.c extchrs.h _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h genio.h \
print.h options.h
gsubr.o: gsubr.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h
hash.o: hash.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h hash.h hash.x
hashtab.o: hashtab.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h alist.h hash.h eval.h \
hashtab.h hashtab.x
@@ -623,228 +616,226 @@ init.o: init.c _scm.h __scm.h scmconfig.h \
ports.h gdbint.h hash.h hashtab.h ioext.h kw.h load.h \
mallocs.h mbstrings.h symbols.h objprop.h options.h \
posix.h print.h procprop.h ramap.h read.h scmsigs.h sequences.h \
- simpos.h smob.h params.h genio.h \
- print.h markers.h socket.h srcprop.h \
- stackchk.h continuations.h debug.h stime.h \
- strop.h strorder.h strports.h struct.h tag.h throw.h unif.h \
- variable.h version.h vports.h weaks.h init.h
+ simpos.h smob.h genio.h print.h \
+ markers.h socket.h srcprop.h stackchk.h \
+ continuations.h debug.h stime.h strop.h \
+ strorder.h strports.h struct.h tag.h throw.h unif.h variable.h \
+ version.h vports.h weaks.h init.h
ioext.o: ioext.c fd.h _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h fports.h \
ports.h ioext.h ioext.x
kw.o: kw.c _scm.h __scm.h scmconfig.h tags.h \
- error.h pairs.h __scm.h list.h gc.h \
+ error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h mbstrings.h \
- symbols.h smob.h params.h ports.h \
- genio.h markers.h kw.h kw.x
+ symbols.h smob.h ports.h genio.h \
+ markers.h kw.h kw.x
list.o: list.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eq.h list.x
load.o: load.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h libpath.h fports.h \
ports.h read.h options.h eval.h load.h load.x
mallocs.o: mallocs.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h \
- mallocs.h
+ print.h options.h smob.h ports.h \
+ genio.h markers.h mallocs.h
markers.o: markers.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h markers.h
marksweep.o: marksweep.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h
mbstrings.o: mbstrings.c extchrs.h _scm.h __scm.h \
- scmconfig.h tags.h error.h pairs.h \
- __scm.h list.h gc.h marksweep.h gsubr.h \
- procs.h numbers.h symbols.h boolean.h strings.h vectors.h root.h \
- ports.h async.h chars.h unif.h genio.h print.h \
+ scmconfig.h tags.h error.h \
+ __scm.h pairs.h list.h gc.h marksweep.h \
+ gsubr.h procs.h numbers.h symbols.h boolean.h strings.h vectors.h \
+ root.h ports.h async.h chars.h unif.h genio.h print.h \
options.h read.h mbstrings.h symbols.h \
mbstrings.x
numbers.o: numbers.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h unif.h numbers.x
objprop.o: objprop.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h hashtab.h alist.h weaks.h \
objprop.h objprop.x
options.o: options.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h options.h options.x
pairs.o: pairs.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h pairs.x
ports.o: ports.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h chars.h markers.h fports.h \
ports.h strports.h vports.h ports.x
posix.o: posix.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h fports.h \
ports.h genio.h print.h options.h \
scmsigs.h read.h unif.h feature.h sequences.h posix.h posix.x
print.o: print.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h genio.h \
print.h options.h mbstrings.h \
- symbols.h smob.h params.h ports.h \
- genio.h markers.h eval.h procprop.h read.h \
- weaks.h unif.h print.h print.x
+ symbols.h smob.h ports.h genio.h \
+ markers.h eval.h procprop.h read.h weaks.h unif.h print.h \
+ print.x
procprop.o: procprop.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h alist.h eval.h procprop.h \
procprop.x
procs.o: procs.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h procs.x
ramap.o: ramap.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h unif.h smob.h \
- params.h ports.h genio.h \
- print.h options.h markers.h \
- chars.h eq.h eval.h feature.h ramap.h ramap.x
+ ports.h genio.h print.h \
+ options.h markers.h chars.h eq.h eval.h \
+ feature.h ramap.h ramap.x
read.o: read.c extchrs.h _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h genio.h \
print.h options.h eval.h unif.h mbstrings.h \
symbols.h kw.h alist.h read.h read.x
root.o: root.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h stackchk.h \
continuations.h debug.h options.h
scmsigs.o: scmsigs.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h scmsigs.h scmsigs.x
sequences.o: sequences.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h sequences.h sequences.x
simpos.o: simpos.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h scmsigs.h simpos.h \
simpos.x
smob.o: smob.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
- strings.h vectors.h root.h ports.h async.h smob.h \
- params.h ports.h genio.h \
- print.h options.h markers.h
+ strings.h vectors.h root.h ports.h async.h smob.h ports.h \
+ genio.h print.h options.h \
+ markers.h
socket.o: socket.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h feature.h socket.h \
socket.x
srcprop.o: srcprop.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
- strings.h vectors.h root.h ports.h async.h smob.h \
- params.h ports.h genio.h \
- print.h options.h markers.h \
- alist.h debug.h hashtab.h weaks.h srcprop.h srcprop.x
+ strings.h vectors.h root.h ports.h async.h smob.h ports.h \
+ genio.h print.h options.h \
+ markers.h alist.h debug.h hashtab.h weaks.h srcprop.h \
+ srcprop.x
stackchk.o: stackchk.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
print.h options.h stackchk.h \
continuations.h debug.h stackchk.x
stime.o: stime.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h stime.h stime.x
strerror.o: strerror.c
strings.o: strings.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h strings.x
strop.o: strop.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h strop.h strop.x
strorder.o: strorder.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h strorder.h \
strorder.x
strports.o: strports.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h unif.h eval.h print.h \
options.h strports.h strports.x
struct.o: struct.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h struct.h struct.x
symbols.o: symbols.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h eval.h variable.h \
alist.h mbstrings.h symbols.h symbols.x
tag.o: tag.c _scm.h __scm.h scmconfig.h tags.h \
- error.h pairs.h __scm.h list.h gc.h \
+ error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h struct.h tag.h \
tag.x
throw.o: throw.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h alist.h \
- eval.h dynwind.h debug.h continuations.h throw.h throw.x
+ print.h options.h smob.h ports.h \
+ genio.h markers.h alist.h eval.h dynwind.h \
+ debug.h continuations.h throw.h throw.x
unif.o: unif.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h chars.h eval.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h \
- sequences.h strop.h feature.h unif.h ramap.h unif.x
+ print.h options.h smob.h ports.h \
+ genio.h markers.h sequences.h strop.h \
+ feature.h unif.h ramap.h unif.x
variable.o: variable.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h genio.h \
- print.h options.h smob.h params.h \
- ports.h genio.h markers.h \
- variable.h variable.x
+ print.h options.h smob.h ports.h \
+ genio.h markers.h variable.h variable.x
vectors.o: vectors.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eq.h vectors.x
version.o: version.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h version.h version.x
vports.o: vports.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h eval.h chars.h fports.h \
ports.h vports.h vports.x
weaks.o: weaks.c _scm.h __scm.h scmconfig.h \
- tags.h error.h pairs.h __scm.h list.h gc.h \
+ tags.h error.h __scm.h pairs.h list.h gc.h \
marksweep.h gsubr.h procs.h numbers.h symbols.h boolean.h \
strings.h vectors.h root.h ports.h async.h weaks.h weaks.x
diff --git a/libguile/__scm.h b/libguile/__scm.h
index 51560c4ea..7322a69fb 100644
--- a/libguile/__scm.h
+++ b/libguile/__scm.h
@@ -123,14 +123,14 @@ typedef unsigned long ulong_long;
/* Write prototype declarations like this:
- int foo PROTO ((int a, int b));
+ int foo SCM_P ((int a, int b));
At definitions, use K&R style declarations, but make sure there's a
declarative prototype (as above) in scope. This will give you
argument type checking, when available, and be harmless otherwise. */
#ifdef __STDC__
-# define PROTO(x) x
+# define SCM_P(x) x
#else
-# define PROTO(x) (x)
+# define SCM_P(x) (x)
#endif
diff --git a/libguile/continuations.c b/libguile/continuations.c
index 6424baa1d..85481344d 100644
--- a/libguile/continuations.c
+++ b/libguile/continuations.c
@@ -124,7 +124,7 @@ scm_make_cont (answer)
}
-void scm_dynthrow PROTO ((SCM *a));
+void scm_dynthrow SCM_P ((SCM *a));
/* Grow the stack so that there is room */
/* to copy in the continuation. Then */
diff --git a/libguile/error.h b/libguile/error.h
index 6ada0c983..816d4f767 100644
--- a/libguile/error.h
+++ b/libguile/error.h
@@ -51,8 +51,8 @@ extern SCM system_error_sym;
-extern void scm_error PROTO ((SCM key, char *subr, char *message, SCM args, SCM rest));
-extern void (*scm_error_callback) PROTO ((SCM key, char *subr, char *message, SCM args, SCM rest));
+extern void scm_error SCM_P ((SCM key, char *subr, char *message, SCM args, SCM rest));
+extern void (*scm_error_callback) SCM_P ((SCM key, char *subr, char *message, SCM args, SCM rest));
#ifdef __STDC__
extern int scm_handle_it (int i);
diff --git a/libguile/feature.h b/libguile/feature.h
index 439f660b1..a45b394bb 100644
--- a/libguile/feature.h
+++ b/libguile/feature.h
@@ -49,8 +49,8 @@
extern SCM *scm_loc_features;
-extern void scm_add_feature PROTO((char* str));
-extern SCM scm_program_arguments PROTO((void));
-extern void scm_init_feature PROTO((void));
+extern void scm_add_feature SCM_P((char* str));
+extern SCM scm_program_arguments SCM_P((void));
+extern void scm_init_feature SCM_P((void));
#endif /* FEATUREH */
diff --git a/libguile/gc.c b/libguile/gc.c
index c900d53bb..a9125e96c 100644
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -187,9 +187,9 @@ struct scm_heap_seg_data
-static void scm_mark_weak_vector_spines PROTO ((void));
-static scm_sizet init_heap_seg PROTO ((SCM_CELLPTR, scm_sizet, int, SCM *));
-static void alloc_some_heap PROTO ((int, SCM *));
+static void scm_mark_weak_vector_spines SCM_P ((void));
+static scm_sizet init_heap_seg SCM_P ((SCM_CELLPTR, scm_sizet, int, SCM *));
+static void alloc_some_heap SCM_P ((int, SCM *));
diff --git a/libguile/gc.h b/libguile/gc.h
index f0faa7b6d..4ea353431 100644
--- a/libguile/gc.h
+++ b/libguile/gc.h
@@ -70,28 +70,28 @@ extern long scm_mtrigger;
-extern SCM scm_gc_stats PROTO ((void));
-extern void scm_gc_start PROTO ((char *what));
-extern void scm_gc_end PROTO ((void));
-extern SCM scm_gc PROTO ((void));
-extern void scm_gc_for_alloc PROTO ((int ncells, SCM * freelistp));
-extern SCM scm_gc_for_newcell PROTO ((void));
-extern void scm_igc PROTO ((char *what));
-extern void scm_gc_mark PROTO ((SCM p));
-extern void scm_mark_locations PROTO ((SCM_STACKITEM x[], scm_sizet n));
-extern int scm_cellp PROTO ((SCM value));
-extern void scm_gc_sweep PROTO ((void));
-extern char * scm_must_malloc PROTO ((long len, char *what));
-extern char * scm_must_realloc PROTO ((char *where, long olen, long len,
+extern SCM scm_gc_stats SCM_P ((void));
+extern void scm_gc_start SCM_P ((char *what));
+extern void scm_gc_end SCM_P ((void));
+extern SCM scm_gc SCM_P ((void));
+extern void scm_gc_for_alloc SCM_P ((int ncells, SCM * freelistp));
+extern SCM scm_gc_for_newcell SCM_P ((void));
+extern void scm_igc SCM_P ((char *what));
+extern void scm_gc_mark SCM_P ((SCM p));
+extern void scm_mark_locations SCM_P ((SCM_STACKITEM x[], scm_sizet n));
+extern int scm_cellp SCM_P ((SCM value));
+extern void scm_gc_sweep SCM_P ((void));
+extern char * scm_must_malloc SCM_P ((long len, char *what));
+extern char * scm_must_realloc SCM_P ((char *where, long olen, long len,
char *what));
-extern void scm_must_free PROTO ((char *obj));
-extern void scm_remember PROTO ((SCM * ptr));
-extern SCM scm_return_first PROTO ((SCM elt, ...));
-extern SCM scm_permanent_object PROTO ((SCM obj));
-extern SCM scm_protect_object PROTO ((SCM obj));
-extern SCM scm_unprotect_object PROTO ((SCM obj));
-extern int scm_init_storage PROTO ((long init_heap_size));
-extern void scm_init_gc PROTO ((void));
+extern void scm_must_free SCM_P ((char *obj));
+extern void scm_remember SCM_P ((SCM * ptr));
+extern SCM scm_return_first SCM_P ((SCM elt, ...));
+extern SCM scm_permanent_object SCM_P ((SCM obj));
+extern SCM scm_protect_object SCM_P ((SCM obj));
+extern SCM scm_unprotect_object SCM_P ((SCM obj));
+extern int scm_init_storage SCM_P ((long init_heap_size));
+extern void scm_init_gc SCM_P ((void));
#include "libguile/marksweep.h"
#endif /* GCH */
diff --git a/libguile/init.h b/libguile/init.h
index 9d4bb0fc4..083259648 100644
--- a/libguile/init.h
+++ b/libguile/init.h
@@ -58,10 +58,10 @@ enum scm_boot_status
-extern void scm_start_stack PROTO ((void *base,
+extern void scm_start_stack SCM_P ((void *base,
FILE *in, FILE *out, FILE *err));
-extern void scm_restart_stack PROTO ((void * base));
-extern int scm_boot_guile PROTO ((char **result,
+extern void scm_restart_stack SCM_P ((void * base));
+extern int scm_boot_guile SCM_P ((char **result,
int argc, char **argv,
FILE *in, FILE *out, FILE *err,
void (*init_func) (),
diff --git a/libguile/libguile.h b/libguile/libguile.h
index 083b018c8..1ba6d7049 100644
--- a/libguile/libguile.h
+++ b/libguile/libguile.h
@@ -90,7 +90,6 @@
#include "libguile/numbers.h"
#include "libguile/objprop.h"
#include "libguile/options.h"
-#include "libguile/params.h"
#include "libguile/ports.h"
#include "libguile/posix.h"
#include "libguile/print.h"
diff --git a/libguile/load.h b/libguile/load.h
index aeb1ac71a..a1d37ab39 100644
--- a/libguile/load.h
+++ b/libguile/load.h
@@ -46,10 +46,10 @@
#include "libguile/__scm.h"
-extern void scm_init_load_path PROTO ((void));
-extern SCM scm_sys_try_load PROTO ((SCM filename, SCM casep, SCM sharp));
-extern SCM scm_sys_search_load_path PROTO ((SCM filename));
-extern SCM scm_sys_try_load_path PROTO ((SCM filename, SCM casep, SCM sharp));
-extern void scm_init_load PROTO ((void));
+extern void scm_init_load_path SCM_P ((void));
+extern SCM scm_sys_try_load SCM_P ((SCM filename, SCM casep, SCM sharp));
+extern SCM scm_sys_search_load_path SCM_P ((SCM filename));
+extern SCM scm_sys_try_load_path SCM_P ((SCM filename, SCM casep, SCM sharp));
+extern void scm_init_load SCM_P ((void));
#endif /* LOADH */
diff --git a/libguile/smob.h b/libguile/smob.h
index 99d1bfd72..ddd3cc4df 100644
--- a/libguile/smob.h
+++ b/libguile/smob.h
@@ -44,12 +44,8 @@
*/
#include "libguile/__scm.h"
-#include "libguile/params.h"
-
-
-
typedef struct scm_smobfuns
{
SCM (*mark) SCM_P ((SCM));
@@ -77,7 +73,7 @@ extern scm_smobfuns *scm_smobs;
#include "libguile/markers.h"
-extern long scm_newsmob PROTO ((scm_smobfuns *smob));
-extern void scm_smob_prehistory PROTO ((void));
+extern long scm_newsmob SCM_P ((scm_smobfuns *smob));
+extern void scm_smob_prehistory SCM_P ((void));
#endif /* SMOBH */