--- Begin Message ---
|
Subject: |
Mail delivery failed: returning message to sender |
|
Date: |
Sat, 24 Feb 2001 16:11:17 -0800 |
This message was created automatically by mail delivery software.
A message that you sent could not be delivered to one or more of its
recipients. The following address(es) failed:
address@hidden:
SMTP error from remote mailer after MAIL FROM:<address@hidden>:
host fencepost.gnu.org [199.232.76.164]:
550 rejected:
unknown local-part in sender <address@hidden>
------ This is a copy of the message, including all the headers. ------
Return-path: <address@hidden>
Received: from ossau by subversions.gnu.org with local (Exim 3.12 #1 (Debian))
id 14WomS-0006Fu-00; Sat, 24 Feb 2001 16:11:16 -0800
To: , address@hidden
Subject: guile/guile-doc/ref ChangeLog posix.texi scheme...
Reply-to: Neil Jerram <address@hidden>
Message-Id: <address@hidden>
From: Neil Jerram <address@hidden>
Date: Sat, 24 Feb 2001 16:11:16 -0800
CVSROOT: /cvs
Module name: guile
Changes by: Neil Jerram <address@hidden> 01/02/24 16:11:15
Modified files:
guile-doc/ref : ChangeLog posix.texi scheme-control.texi
scheme-data.texi scheme-debug.texi
scheme-evaluation.texi scheme-io.texi
scheme-memory.texi scheme-modules.texi
scheme-options.texi scheme-procedures.texi
scheme-scheduling.texi scheme-translation.texi
Log message:
* Automatic docstring updates.
CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/ChangeLog.diff?r1=1.94&r2=1.95
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/posix.texi.diff?r1=1.20&r2=1.21
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-control.texi.diff?r1=1.2&r2=1.3
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-data.texi.diff?r1=1.9&r2=1.10
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-debug.texi.diff?r1=1.2&r2=1.3
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-evaluation.texi.diff?r1=1.3&r2=1.4
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-io.texi.diff?r1=1.5&r2=1.6
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-memory.texi.diff?r1=1.4&r2=1.5
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-modules.texi.diff?r1=1.3&r2=1.4
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-options.texi.diff?r1=1.3&r2=1.4
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-procedures.texi.diff?r1=1.3&r2=1.4
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-scheduling.texi.diff?r1=1.2&r2=1.3
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-doc/ref/scheme-translation.texi.diff?r1=1.2&r2=1.3
Patches:
Index: guile/guile-doc/ref/ChangeLog
diff -u guile/guile-doc/ref/ChangeLog:1.94 guile/guile-doc/ref/ChangeLog:1.95
--- guile/guile-doc/ref/ChangeLog:1.94 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/ChangeLog Sat Feb 24 16:11:15 2001
@@ -1,3 +1,23 @@
+2001-02-24 Neil Jerram <address@hidden>
+
+ * posix.texi (File System, Time), scheme-control.texi
+ (Exceptions), scheme-data.texi (Complex, Primitive Numerics,
+ Random, String Fun, Symbols and Variables, Lists, Bit Vectors,
+ Hooks), scheme-debug.texi (Debugging), scheme-evaluation.texi
+ (Reader Extensions, Scheme Read, Fly Evaluation, Loading,
+ Evaluator Options), scheme-io.texi (Reading, Writing, Default
+ Ports, File Ports), scheme-memory.texi (Garbage Collection,
+ Guardians, Objects), scheme-modules.texi (The Guile module
+ system), scheme-options.texi (Install Config),
+ scheme-procedures.texi (Procedure Properties, Procedures with
+ Setters), scheme-scheduling.texi (Arbiters, Asyncs),
+ scheme-translation.texi (Emacs Lisp Support): Automatic docstring
+ updates.
+
+ * scheme-io.texi (Binary IO): New node.
+
+ * scheme-control.texi (Multiple Values): New node.
+
2001-02-23 Neil Jerram <address@hidden>
* scheme-utility.texi (Sorting), scheme-procedures.texi (Procedure
Index: guile/guile-doc/ref/posix.texi
diff -u guile/guile-doc/ref/posix.texi:1.20 guile/guile-doc/ref/posix.texi:1.21
--- guile/guile-doc/ref/posix.texi:1.20 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/posix.texi Sat Feb 24 16:11:15 2001
@@ -767,10 +767,17 @@
@c docstring begin (texi-doc-string "guile" "dirname")
@deffn primitive dirname filename
+Return the directory name component of the file name
address@hidden If @var{filename} does not contain a directory
+component, @code{.} is returned.
@end deffn
@c docstring begin (texi-doc-string "guile" "basename")
@deffn primitive basename filename [suffix]
+Return the base name of the file name @var{filename}. The
+base name is the file name without any directory components.
+If @var{suffix} is privided, and is equal to the end of
address@hidden, it is removed also.
@end deffn
@@ -959,9 +966,9 @@
is an optional time zone specifier (otherwise the TZ environment variable
or the system default is used).
-Returns a pair: the CAR is a corresponding
+Returns a pair: the car is a corresponding
integer time value like that returned
-by @code{current-time}; the CDR is a broken down time object, similar to
+by @code{current-time}; the cdr is a broken down time object, similar to
as @var{bd-time} but with normalized values.
@end deffn
@@ -986,16 +993,16 @@
@c docstring begin (texi-doc-string "guile" "strptime")
@deffn primitive strptime format string
-Performs the reverse action to @code{strftime}, parsing @var{string}
-according to the specification supplied in @var{template}. The
-interpretation of month and day names is dependent on the current
-locale. The
-value returned is a pair. The CAR has an object with time components
+Performs the reverse action to @code{strftime}, parsing
address@hidden according to the specification supplied in
address@hidden The interpretation of month and day names is
+dependent on the current locale. The value returned is a pair.
+The car has an object with time components
in the form returned by @code{localtime} or @code{gmtime},
but the time zone components
are not usefully set.
-The CDR reports the number of characters from @var{string} which
-were used for the conversion.
+The cdr reports the number of characters from @var{string}
+which were used for the conversion.
@end deffn
@defvar internal-time-units-per-second
Index: guile/guile-doc/ref/scheme-control.texi
diff -u guile/guile-doc/ref/scheme-control.texi:1.2
guile/guile-doc/ref/scheme-control.texi:1.3
--- guile/guile-doc/ref/scheme-control.texi:1.2 Fri Jan 5 10:06:07 2001
+++ guile/guile-doc/ref/scheme-control.texi Sat Feb 24 16:11:15 2001
@@ -8,6 +8,7 @@
* and or:: Conditional evaluation of a sequence.
* while do:: Iteration mechanisms.
* Continuations:: Continuations.
+* Multiple Values:: Returning and accepting multiple values.
* Exceptions:: Throwing and catching exceptions.
* Error Reporting:: Procedures for signaling errors.
* Dynamic Wind:: Guarding against non-local entrance/exit.
@@ -34,6 +35,36 @@
@section Continuations
address@hidden Multiple Values
address@hidden Returning and Accepting Multiple Values
+
address@hidden primitive values . args
+Delivers all of its arguments to its continuation. Except for
+continuations created by the @code{call-with-values} procedure,
+all continuations take exactly one value. The effect of
+passing no value or more than one value to continuations that
+were not created by @code{call-with-values} is unspecified.
address@hidden deffn
+
address@hidden primitive call-with-values producer consumer
+Calls its @var{producer} argument with no values and a
+continuation that, when passed some values, calls the
address@hidden procedure with those values as arguments. The
+continuation for the call to @var{consumer} is the continuation
+of the call to @code{call-with-values}.
+
address@hidden
+(call-with-values (lambda () (values 4 5))
+ (lambda (a b) b))
+ ==> 5
+
address@hidden example
address@hidden
+(call-with-values * -) ==> -1
address@hidden example
address@hidden deffn
+
+
@node Exceptions
@section Exceptions
@cindex error handling
@@ -88,6 +119,9 @@
@c docstring begin (texi-doc-string "guile" "lazy-catch")
@deffn primitive lazy-catch tag thunk handler
+This behaves exactly like @code{catch}, except that it does
+not unwind the stack (this is the major difference), and if
+handler returns, its value is returned from the throw.
@end deffn
Index: guile/guile-doc/ref/scheme-data.texi
diff -u guile/guile-doc/ref/scheme-data.texi:1.9
guile/guile-doc/ref/scheme-data.texi:1.10
--- guile/guile-doc/ref/scheme-data.texi:1.9 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/scheme-data.texi Sat Feb 24 16:11:15 2001
@@ -580,8 +580,8 @@
@end deffn
@c docstring begin (texi-doc-string "guile" "make-polar")
address@hidden primitive make-polar z1 z2
-Return the complex number Z1 * e^(i * Z2).
address@hidden primitive make-polar x y
+Return the complex number X * e^(i * Y).
@end deffn
@c begin (texi-doc-string "guile" "real-part")
@@ -761,8 +761,9 @@
@end deffn
@c docstring begin (texi-doc-string "guile" "$expt")
address@hidden primitive $expt x1 x2
-Return @var{x1} raised to the power of @var{x2}.
address@hidden primitive $expt x y
+Return @var{x} raised to the power of @var{y}. This
+procedure does not accept complex arguments.
@end deffn
@c begin (texi-doc-string "guile" "$sin")
@@ -796,9 +797,12 @@
@end deffn
@c docstring begin (texi-doc-string "guile" "$atan2")
address@hidden primitive $atan2 y x
-Return the arctangent of @var{y}/@var{x}, using the signs of @var{x} and
address@hidden to determine the quadrant of the result.
address@hidden primitive $atan2 x y
+Return the arc tangent of the two arguments @var{x} and
address@hidden This is similar to calculating the arc tangent of
address@hidden / @var{y}, except that the signs of both arguments
+are used to determine the quadrant of the result. This
+procedure does not accept complex arguments.
@end deffn
@c begin (texi-doc-string "guile" "$exp")
@@ -1008,7 +1012,7 @@
@c docstring begin (texi-doc-string "guile" "copy-random-state")
@deffn primitive copy-random-state [state]
-Return a copy of the random state STATE.
+Return a copy of the random state @var{state}.
@end deffn
@c docstring begin (texi-doc-string "guile" "random")
@@ -1018,11 +1022,11 @@
number of the same type between zero (inclusive) and
N (exclusive). The values returned have a uniform
distribution.
-The optional argument STATE must be of the type produced by
-`seed->random-state'. It defaults to the value of the variable
-*random-state*. This object is used to maintain the state of
-the pseudo-random-number generator and is altered as a side
-effect of the random operation.
+The optional argument @var{state} must be of the type produced
+by @code{seed->random-state}. It defaults to the value of the
+variable @var{*random-state*}. This object is used to maintain
+the state of the pseudo-random-number generator and is altered
+as a side effect of the random operation.
@end deffn
@c docstring begin (texi-doc-string "guile" "random:exp")
@@ -1073,7 +1077,7 @@
@c docstring begin (texi-doc-string "guile" "seed->random-state")
@deffn primitive seed->random-state seed
-Return a new random state using SEED.
+Return a new random state using @var{seed}.
@end deffn
@@ -1290,53 +1294,57 @@
@c docstring begin (texi-doc-string "guile" "list->string")
@deffn primitive string . chrs
@deffnx primitive list->string chrs
-Returns a newly allocated string composed of the arguments, CHRS.
+Returns a newly allocated string composed of the arguments,
address@hidden
@end deffn
@c docstring begin (texi-doc-string "guile" "make-string")
@deffn primitive make-string k [chr]
-Returns a newly allocated string of
-length K. If CHR is given, then all elements of the string
-are initialized to CHR, otherwise the contents of the
-STRING are unspecified.
+Return a newly allocated string of
+length @var{k}. If @var{chr} is given, then all elements of
+the string are initialized to @var{chr}, otherwise the contents
+of the @var{string} are unspecified.
@end deffn
@c docstring begin (texi-doc-string "guile" "string-append")
@deffn primitive string-append . args
-Returns a newly allocated string whose characters form the
-concatenation of the given strings, ARGS.
+Return a newly allocated string whose characters form the
+concatenation of the given strings, @var{args}.
@end deffn
@c docstring begin (texi-doc-string "guile" "string-length")
@deffn primitive string-length string
-Returns the number of characters in STRING
+Return the number of characters in @var{string}.
@end deffn
@c docstring begin (texi-doc-string "guile" "string-ref")
@deffn primitive string-ref str k
-Returns character K of STR using zero-origin indexing.
-K must be a valid index of STR.
+Return character @var{k} of @var{str} using zero-origin
+indexing. @var{k} must be a valid index of @var{str}.
@end deffn
@c docstring begin (texi-doc-string "guile" "string-set!")
@deffn primitive string-set! str k chr
-Stores CHR in element K of STRING and returns an unspecified value.
-K must be a valid index of STR.
+Store @var{chr} in element @var{k} of @var{str} and return
+an unspecified value. @var{k} must be a valid index of
address@hidden
@end deffn
@c docstring begin (texi-doc-string "guile" "string?")
@deffn primitive string? obj
-Returns #t iff OBJ is a string, else returns #f.
+Returns @code{#t} iff @var{obj} is a string, else returns
address@hidden
@end deffn
@c docstring begin (texi-doc-string "guile" "substring")
@deffn primitive substring str start [end]
-Returns a newly allocated string formed from the characters
-of STR beginning with index START (inclusive) and ending with
-index END (exclusive).
-STR must be a string, START and END must be exact integers satisfying:
+Return a newly allocated string formed from the characters
+of @var{str} beginning with index @var{start} (inclusive) and
+ending with index @var{end} (exclusive).
address@hidden must be a string, @var{start} and @var{end} must be
+exact integers satisfying:
-0 <= START <= END <= (string-length STR).
+0 <= @var{start} <= @var{end} <= (string-length @var{str}).
@end deffn
@c docstring begin (texi-doc-string "guile" "string-index")
@@ -1738,8 +1746,8 @@
@c ARGFIXME x/obj
@c docstring begin (texi-doc-string "guile" "read-only-string?")
address@hidden primitive read-only-string? x
-Return true if OBJ can be read as a string,
address@hidden primitive read-only-string? obj
+Return true if @var{obj} can be read as a string,
This illustrates the difference between @code{string?} and
@code{read-only-string?}:
@@ -2252,19 +2260,21 @@
@c docstring begin (texi-doc-string "guile" "gensym")
@deffn primitive gensym [prefix]
-Create a new symbol with name constructed from a prefix and a counter value.
-The string PREFIX can be specified as an optional argument.
-Default prefix is @code{g}. The counter is increased by 1 at each call.
-There is no provision for resetting the counter.
+Create a new symbol with a name constructed from a prefix and
+a counter value. The string @var{prefix} can be specified as
+an optional argument. Default prefix is @code{g}. The counter
+is increased by 1 at each call. There is no provision for
+resetting the counter.
@end deffn
@c docstring begin (texi-doc-string "guile" "gentemp")
@deffn primitive gentemp [prefix [obarray]]
Create a new symbol with a name unique in an obarray.
-The name is constructed from an optional string PREFIX and a counter
-value. The default prefix is @var{t}. The OBARRAY is specified as a
-second optional argument. Default is the system obarray where all
-normal symbols are interned. The counter is increased by 1 at each
+The name is constructed from an optional string @var{prefix}
+and a counter value. The default prefix is @code{t}. The
address@hidden is specified as a second optional argument.
+Default is the system obarray where all normal symbols are
+interned. The counter is increased by 1 at each
call. There is no provision for resetting the counter.
@end deffn
@@ -2420,27 +2430,27 @@
@c docstring begin (texi-doc-string "guile" "builtin-variable")
@deffn primitive builtin-variable name
-Return the built-in variable with the name NAME.
-NAME must be a symbol (not a string).
-Then use `variable-ref' to access its value.
+Return the built-in variable with the name @var{name}.
address@hidden must be a symbol (not a string).
+Then use @code{variable-ref} to access its value.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-undefined-variable")
@deffn primitive make-undefined-variable [name-hint]
Return a variable object initialized to an undefined value.
-If given, uses NAME-HINT as its internal (debugging)
+If given, uses @var{name-hint} as its internal (debugging)
name, otherwise just treat it as an anonymous variable.
Remember, of course, that multiple bindings to the same
-variable may exist, so NAME-HINT is just that---a hint.
+variable may exist, so @var{name-hint} is just that---a hint.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-variable")
@deffn primitive make-variable init [name-hint]
-Return a variable object initialized to value INIT.
-If given, uses NAME-HINT as its internal (debugging)
+Return a variable object initialized to value @var{init}.
+If given, uses @var{name-hint} as its internal (debugging)
name, otherwise just treat it as an anonymous variable.
Remember, of course, that multiple bindings to the same
-variable may exist, so NAME-HINT is just that---a hint.
+variable may exist, so @var{name-hint} is just that---a hint.
@end deffn
@c docstring begin (texi-doc-string "guile" "variable-bound?")
@@ -2451,21 +2461,22 @@
@c docstring begin (texi-doc-string "guile" "variable-ref")
@deffn primitive variable-ref var
-Dereference @var{var} and return its value. @var{var} must be a
-variable object; see @code{make-variable} and
address@hidden
+Dereference @var{var} and return its value.
address@hidden must be a variable object; see @code{make-variable}
+and @code{make-undefined-variable}.
@end deffn
@c docstring begin (texi-doc-string "guile" "variable-set!")
@deffn primitive variable-set! var val
Set the value of the variable @var{var} to @var{val}.
address@hidden must be a variable object, @var{val} can be any value.
-Returns an unspecified value.
address@hidden must be a variable object, @var{val} can be any
+value. Return an unspecified value.
@end deffn
@c docstring begin (texi-doc-string "guile" "variable?")
@deffn primitive variable? obj
-Return @code{#t} iff OBJ is a variable object, else return @code{#f}.
+Return @code{#t} iff @var{obj} is a variable object, else
+return @code{#f}
@end deffn
@@ -2719,6 +2730,7 @@
@c docstring begin (texi-doc-string "guile" "cons*")
@deffn primitive cons* arg . rest
address@hidden primitive list* arg . rest
Like `list', but the last arg provides the tail of the constructed list,
returning (cons ARG1 (cons ARG2 (cons ... ARGn))).
Requires at least one argument. If given one argument, that argument
@@ -3822,7 +3834,8 @@
@c docstring begin (texi-doc-string "guile" "bit-count")
@deffn primitive bit-count b bitvector
-Returns the number of occurrences of the boolean B in BITVECTOR.
+Returns the number of occurrences of the boolean @var{b} in
address@hidden
@end deffn
@c docstring begin (texi-doc-string "guile" "bit-position")
@@ -3839,15 +3852,15 @@
@c docstring begin (texi-doc-string "guile" "bit-set*!")
@deffn primitive bit-set*! v kv obj
-If uve is a bit-vector @var{bv} and uve must be of the same length. If
address@hidden is @code{#t}, uve is OR'ed into @var{bv}; If @var{bool} is
@code{#f}, the
-inversion of uve is AND'ed into @var{bv}.
-
-If uve is a unsigned integer vector all the elements of uve must be
-between 0 and the @code{LENGTH} of @var{bv}. The bits of @var{bv}
-corresponding to the indexes in uve are set to @var{bool}.
-
-The return value is unspecified.
+If uve is a bit-vector @var{bv} and uve must be of the same
+length. If @var{bool} is @code{#t}, uve is OR'ed into
address@hidden; If @var{bool} is @code{#f}, the inversion of uve is
+AND'ed into @var{bv}.
+
+If uve is a unsigned integer vector all the elements of uve
+must be between 0 and the @code{length} of @var{bv}. The bits
+of @var{bv} corresponding to the indexes in uve are set to
address@hidden The return value is unspecified.
@end deffn
@c docstring begin (texi-doc-string "guile" "bit-count*")
@@ -4647,38 +4660,51 @@
@c docstring begin (texi-doc-string "guile" "make-hook-with-name")
@deffn primitive make-hook-with-name name [n_args]
+Create a named hook with the name @var{name} for storing
+procedures of arity @var{n_args}.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-hook")
@deffn primitive make-hook [n_args]
+Create a hook for storing procedure of arity @var{n_args}.
@end deffn
@c docstring begin (texi-doc-string "guile" "hook?")
@deffn primitive hook? x
+Return @code{#t} if @var{x} is a hook.
@end deffn
@c docstring begin (texi-doc-string "guile" "hook-empty?")
@deffn primitive hook-empty? hook
+Return @code{#t} if @var{hook} is an empty hook.
@end deffn
@c docstring begin (texi-doc-string "guile" "add-hook!")
@deffn primitive add-hook! hook proc [append_p]
+Add the procedure @var{proc} to the hook @var{hook}. The
+procedure is added to the end if @var{append_p} is true,
+otherwise it is added to the front.
@end deffn
@c docstring begin (texi-doc-string "guile" "remove-hook!")
@deffn primitive remove-hook! hook proc
+Remove the procedure @var{proc} from the hook @var{hook}.
@end deffn
@c docstring begin (texi-doc-string "guile" "reset-hook!")
@deffn primitive reset-hook! hook
+Remove all procedures from the hook @var{hook}.
@end deffn
@c docstring begin (texi-doc-string "guile" "run-hook")
@deffn primitive run-hook hook . args
+Apply all procedures from the hook @var{hook} to the arguments
address@hidden
@end deffn
@c docstring begin (texi-doc-string "guile" "hook->list")
@deffn primitive hook->list hook
+Convert the procedure list of @var{hook} to a list.
@end deffn
Index: guile/guile-doc/ref/scheme-debug.texi
diff -u guile/guile-doc/ref/scheme-debug.texi:1.2
guile/guile-doc/ref/scheme-debug.texi:1.3
--- guile/guile-doc/ref/scheme-debug.texi:1.2 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-debug.texi Sat Feb 24 16:11:15 2001
@@ -8,113 +8,166 @@
@c docstring begin (texi-doc-string "guile" "display-error")
@deffn primitive display-error stack port subr message args rest
+Display an error message to the output port @var{port}.
address@hidden is the saved stack for the error, @var{subr} is
+the name of the procedure in which the error occured and
address@hidden is the actual error message, which may contain
+formatting instructions. These will format the arguments in
+the list @var{args} accordingly. @var{rest} is currently
+ignored.
@end deffn
@c docstring begin (texi-doc-string "guile" "display-application")
@deffn primitive display-application frame [port [indent]]
+Display a procedure application @var{frame} to the output port
address@hidden @var{indent} specifies the indentation of the
+output.
@end deffn
@c docstring begin (texi-doc-string "guile" "display-backtrace")
@deffn primitive display-backtrace stack port [first [depth]]
+Display a backtrace to the output port @var{port}. @var{stack}
+is the stack to take the backtrace from, @var{first} specifies
+where in the stack to start and @var{depth} how much frames
+to display. Both @var{first} and @var{depth} can be @code{#f},
+which means that default values will be used.
@end deffn
@c docstring begin (texi-doc-string "guile" "backtrace")
@deffn primitive backtrace
+Display a backtrace of the stack saved by the last error
+to the current output port.
@end deffn
@c docstring begin (texi-doc-string "guile" "malloc-stats")
@deffn primitive malloc-stats
-Return an alist ((WHAT . N) ...) describing number of malloced objects.
-WHAT is the second argument to scm_must_malloc, N is the number of objects
-of that type currently allocated.
+Return an alist ((@var{what} . @var{n}) ...) describing number
+of malloced objects.
address@hidden is the second argument to @code{scm_must_malloc},
address@hidden is the number of objects of that type currently
+allocated.
@end deffn
@c docstring begin (texi-doc-string "guile" "debug-options-interface")
@deffn primitive debug-options-interface [setting]
+Option interface for the debug options. Instead of using
+this procedure directly, use the procedures @code{debug-enable},
address@hidden, @code{debug-set!} and @var{debug-options}.
@end deffn
@c docstring begin (texi-doc-string "guile" "with-traps")
@deffn primitive with-traps thunk
+Call @var{thunk} with traps enabled.
@end deffn
@c docstring begin (texi-doc-string "guile" "memoized?")
@deffn primitive memoized? obj
+Return @code{#t} if @var{obj} is memoized.
@end deffn
@c docstring begin (texi-doc-string "guile" "unmemoize")
@deffn primitive unmemoize m
+Unmemoize the memoized expression @var{m},
@end deffn
@c docstring begin (texi-doc-string "guile" "memoized-environment")
@deffn primitive memoized-environment m
+Return the environment of the memoized expression @var{m}.
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure-name")
@deffn primitive procedure-name proc
+Return the name of the procedure @var{proc}
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure-source")
@deffn primitive procedure-source proc
+Return the source of the procedure @var{proc}.
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure-environment")
@deffn primitive procedure-environment proc
+Return the environment of the procedure @var{proc}.
@end deffn
@c docstring begin (texi-doc-string "guile" "debug-object?")
@deffn primitive debug-object? obj
+Return @code{#t} if @var{obj} is a debug object.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-arguments")
@deffn primitive frame-arguments frame
+Return the arguments of @var{frame}.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-evaluating-args?")
@deffn primitive frame-evaluating-args? frame
+Return @code{#t} if @var{frame} contains evaluated arguments.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-next")
@deffn primitive frame-next frame
+Return the next frame of @var{frame}, or @code{#f} if
address@hidden is the last frame in its stack.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-number")
@deffn primitive frame-number frame
+Return the frame number of @var{frame}.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-overflow?")
@deffn primitive frame-overflow? frame
+Return @code{#t} if @var{frame} is an overflow frame.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-previous")
@deffn primitive frame-previous frame
+Return the previous frame of @var{frame}, or @code{#f} if
address@hidden is the first frame in its stack.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-procedure")
@deffn primitive frame-procedure frame
+Return the procedure for @var{frame}, or @code{#f} if no
+procedure is associated with @var{frame}.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-procedure?")
@deffn primitive frame-procedure? frame
+Return @code{#t} if a procedure is associated with @var{frame}.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-real?")
@deffn primitive frame-real? frame
+Return @code{#t} if @var{frame} is a real frame.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame-source")
@deffn primitive frame-source frame
+Return the source of @var{frame}.
@end deffn
@c docstring begin (texi-doc-string "guile" "frame?")
@deffn primitive frame? obj
+Return @code{#t} if @var{obj} is a stack frame.
@end deffn
@c docstring begin (texi-doc-string "guile" "last-stack-frame")
@deffn primitive last-stack-frame obj
+Return a stack which consists of a single frame, which is the
+last stack frame for @var{obj}. @var{obj} must be either a
+debug object or a continuation.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-stack")
@deffn primitive make-stack obj . args
+Create a new stack. If @var{obj} is @code{#t}, the current
+evaluation stack is used for creating the stack frames,
+otherwise the frames are taken from @var{obj} (which must be
+either a debug object or a continuation).
address@hidden must be a list if integers and specifies how the
+resulting stack will be narrowed.
@end deffn
@c docstring begin (texi-doc-string "guile" "stack-id")
@@ -124,10 +177,12 @@
@c docstring begin (texi-doc-string "guile" "stack-length")
@deffn primitive stack-length stack
+Return the length of @var{stack}.
@end deffn
@c docstring begin (texi-doc-string "guile" "stack-ref")
@deffn primitive stack-ref stack i
+Return the @var{i}'th frame from @var{stack}.
@end deffn
@c docstring begin (texi-doc-string "guile" "stack?")
Index: guile/guile-doc/ref/scheme-evaluation.texi
diff -u guile/guile-doc/ref/scheme-evaluation.texi:1.3
guile/guile-doc/ref/scheme-evaluation.texi:1.4
--- guile/guile-doc/ref/scheme-evaluation.texi:1.3 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-evaluation.texi Sat Feb 24 16:11:15 2001
@@ -54,6 +54,11 @@
@c docstring begin (texi-doc-string "guile" "read-hash-extend")
@deffn primitive read-hash-extend chr proc
+Install the procedure @var{proc} for reading expressions
+starting with the character sequence @code{#} and @var{chr}.
address@hidden will be called with two arguments: the character
address@hidden and the port to read further data from. The object
+returned will be the return value of @code{read}.
@end deffn
@@ -62,10 +67,16 @@
@c docstring begin (texi-doc-string "guile" "read-options-interface")
@deffn primitive read-options-interface [setting]
+Option interface for the read options. Instead of using
+this procedure directly, use the procedures @code{read-enable},
address@hidden, @code{read-set!} and @var{read-options}.
@end deffn
@c docstring begin (texi-doc-string "guile" "read")
@deffn primitive read [port]
+Read an s-expression from the input port @var{port}, or from
+the current input port if @var{port} is not specified.
+Any whitespace before the next token is discarded.
@end deffn
@@ -97,6 +108,33 @@
@c docstring begin (texi-doc-string "guile" "apply:nconc2last")
@deffn primitive apply:nconc2last lst
+Given a list (@var{arg1} @dots{} @var{args}), this function
+conses the @var{arg1} @dots{} arguments onto the front of
address@hidden, and returns the resulting list. Note that
address@hidden is a list; thus, the argument to this function is
+a list whose last element is a list.
+Note: Rather than do new consing, @code{apply:nconc2last}
+destroys its argument, so use with care.
address@hidden deffn
+
address@hidden primitive primitive-eval exp
+Evaluate @var{exp} in the top-level environment specified by
+the current module.
address@hidden deffn
+
address@hidden primitive eval2 obj env_thunk
+Evaluate @var{exp}, a Scheme expression, in the environment
+designated by @var{lookup}, a symbol-lookup function."
+Do not use this version of eval, it does not play well
+with the module system. Use @code{eval} or
address@hidden instead.
address@hidden deffn
+
address@hidden primitive read-and-eval! [port]
+Read a form from @var{port} (standard input by default), and evaluate it
+(memoizing it in the process) in the top-level environment. If no data
+is left to be read from @var{port}, an @code{end-of-file} error is
+signalled.
@end deffn
@@ -152,7 +190,7 @@
@c docstring begin (texi-doc-string "guile" "current-load-port")
@deffn primitive current-load-port
Return the current-load-port.
-The load port is used internally by `primitive-load'.
+The load port is used internally by @code{primitive-load}.
@end deffn
@defvar %load-extensions
@@ -201,10 +239,14 @@
@c docstring begin (texi-doc-string "guile" "eval-options-interface")
@deffn primitive eval-options-interface [setting]
+Option interface for the evaluation options. Instead of using
+this procedure directly, use the procedures @code{eval-enable},
address@hidden, @code{eval-set!} and @var{eval-options}.
@end deffn
@c docstring begin (texi-doc-string "guile" "evaluator-traps-interface")
@deffn primitive evaluator-traps-interface [setting]
+Option interface for the evaluator trap options.
@end deffn
Index: guile/guile-doc/ref/scheme-io.texi
diff -u guile/guile-doc/ref/scheme-io.texi:1.5
guile/guile-doc/ref/scheme-io.texi:1.6
--- guile/guile-doc/ref/scheme-io.texi:1.5 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/scheme-io.texi Sat Feb 24 16:11:15 2001
@@ -9,6 +9,7 @@
* Closing:: Procedures to close a port.
* Random Access:: Moving around a random access port.
* Line/Delimited:: Read and write lines or delimited text.
+* Binary IO:: Save and restore Scheme objects.
* Default Ports:: Defaults for input, output and errors.
* Port Types:: Types of port and how to make them.
@end menu
@@ -120,8 +121,8 @@
@c docstring begin (texi-doc-string "guile" "drain-input")
@deffn primitive drain-input port
-Drains @var{PORT}'s read buffers (including any pushed-back characters)
-and returns the contents as a single string.
+Drain @var{port}'s read buffers (including any pushed-back
+characters) and returns the content as a single string.
@end deffn
@c ARGFIXME port/input-port
@@ -148,7 +149,41 @@
current input port if none is specified.
@end deffn
address@hidden primitive read-string!/partial str [port_or_fdes [start [end]]]
+Read characters from an fport or file descriptor into a
+string @var{str}. This procedure is scsh-compatible
+and can efficiently read large strings. It will:
address@hidden
address@hidden
+attempt to fill the entire string, unless the @var{start}
+and/or @var{end} arguments are supplied. i.e., @var{start}
+defaults to 0 and @var{end} defaults to
address@hidden(string-length str)}
address@hidden
+use the current input port if @var{port_or_fdes} is not
+supplied.
address@hidden
+read any characters that are currently available,
+without waiting for the rest (short reads are possible).
+
address@hidden
+wait for as long as it needs to for the first character to
+become available, unless the port is in non-blocking mode
address@hidden
+return @code{#f} if end-of-file is encountered before reading
+any characters, otherwise return the number of characters
+read.
address@hidden
+return 0 if the port is in non-blocking mode and no characters
+are immediately available.
address@hidden
+return 0 if the request is for 0 bytes, with no
+end-of-file check
address@hidden itemize
address@hidden deffn
+
+
@node Writing
@section Writing
@@ -156,35 +191,46 @@
@c docstring begin (texi-doc-string "guile" "get-print-state")
@deffn primitive get-print-state port
+Return the print state of the port @var{port}. If @var{port}
+has no associated print state, @code{#f} is returned.
@end deffn
@c docstring begin (texi-doc-string "guile" "newline")
@deffn primitive newline [port]
-Send a newline to PORT.
+Send a newline to @var{port}.
@end deffn
@c docstring begin (texi-doc-string "guile" "port-with-print-state")
@deffn primitive port-with-print-state port pstate
+Create a new port which behaves like @var{port}, but with an
+included print state @var{pstate}.
@end deffn
@c docstring begin (texi-doc-string "guile" "print-options-interface")
@deffn primitive print-options-interface [setting]
+Option interface for the print options. Instead of using
+this procedure directly, use the procedures @code{print-enable},
address@hidden, @code{print-set!} and @var{print-options}.
@end deffn
@c docstring begin (texi-doc-string "guile" "simple-format")
@deffn primitive simple-format destination message . args
-Write MESSAGE to DESTINATION, defaulting to `current-output-port'.
-MESSAGE can contain ~A (was %s) and ~S (was %S) escapes. When printed,
-the escapes are replaced with corresponding members of ARGS:
-~A formats using `display' and ~S formats using `write'.
-If DESTINATION is #t, then use the `current-output-port',
-if DESTINATION is #f, then return a string containing the formatted text.
-Does not add a trailing newline.
+Write @var{message} to @var{destination}, defaulting to
+the current output port.
address@hidden can contain @code{~A} (was @code{%s}) and
address@hidden (was @code{%S}) escapes. When printed,
+the escapes are replaced with corresponding members of
address@hidden:
address@hidden formats using @code{display} and @code{~S} formats
+using @code{write}.
+If @var{destination} is @code{#t}, then use the current output
+port, if @var{destination} is @code{#f}, then return a string
+containing the formatted text. Does not add a trailing newline.
@end deffn
@c docstring begin (texi-doc-string "guile" "write-char")
@deffn primitive write-char chr [port]
-Send character CHR to PORT.
+Send character @var{chr} to @var{port}.
@end deffn
@findex fflush
@@ -429,22 +475,36 @@
@code{(#<eof> . #<eof>)}.
@end deffn
address@hidden Binary IO
address@hidden Saving and Restoring Scheme Objects
address@hidden primitive binary-read [port]
+Read and return an object from @var{port} in a binary format.
+If omitted, @var{port} defaults to the current output port.
address@hidden deffn
+
address@hidden primitive binary-write obj [port]
+Write @var{obj} to @var{port} in a binary format.
+If omitted, @var{port} defaults to the current output port.
address@hidden deffn
+
+
@node Default Ports
@section Default Ports for Input, Output and Errors
@c docstring begin (texi-doc-string "guile" "current-input-port")
@deffn primitive current-input-port
-Returns the current input port. This is the default port used by many
-input procedures. Initially, @code{current-input-port} returns the
-value of @code{???}.
+Return the current input port. This is the default port used
+by many input procedures. Initially, @code{current-input-port}
+returns the @dfn{standard input} in Unix and C terminology.
@end deffn
@c docstring begin (texi-doc-string "guile" "current-output-port")
@deffn primitive current-output-port
-Returns the current output port. This is the default port used by many
-output procedures. Initially, @code{current-output-port} returns the
-value of @code{???}.
+Return the current output port. This is the default port used
+by many output procedures. Initially,
address@hidden returns the @dfn{standard output} in
+Unix and C terminology.
@end deffn
@c docstring begin (texi-doc-string "guile" "current-error-port")
@@ -485,6 +545,7 @@
* Void Ports:: Ports on nothing at all.
@end menu
+
@node File Ports
@subsection File Ports
@@ -578,6 +639,11 @@
@code{port-filename} and reported in diagnostic output.
@end deffn
address@hidden primitive file-port? obj
+Determine whether @var{obj} is a port that is related to a file.
address@hidden deffn
+
+
@node String Ports
@subsection String Ports
@@ -623,6 +689,7 @@
Scheme even though it's possible from C. SRFI 6 could be implemented
without much difficulty.
+
@node Soft Ports
@subsection Soft Ports
@@ -673,6 +740,7 @@
(write p p) @result{} #<input-output: soft 8081e20>
@end example
@end deffn
+
@node Void Ports
@subsection Void Ports
Index: guile/guile-doc/ref/scheme-memory.texi
diff -u guile/guile-doc/ref/scheme-memory.texi:1.4
guile/guile-doc/ref/scheme-memory.texi:1.5
--- guile/guile-doc/ref/scheme-memory.texi:1.4 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/scheme-memory.texi Sat Feb 24 16:11:15 2001
@@ -34,6 +34,8 @@
@c docstring begin (texi-doc-string "guile" "unhash-name")
@deffn primitive unhash-name name
+Flushes the glocs for @var{name}, or all glocs if @var{name}
+is @code{#t}.
@end deffn
@@ -166,17 +168,17 @@
A guardian protects a set of objects from garbage collection,
allowing a program to apply cleanup or other actions.
-make-guardian returns a procedure representing the guardian.
address@hidden returns a procedure representing the guardian.
Calling the guardian procedure with an argument adds the
argument to the guardian's set of protected objects.
Calling the guardian procedure without an argument returns
one of the protected objects which are ready for garbage
-collection or @code{#f} if no such object is available.
+collection, or @code{#f} if no such object is available.
Objects which are returned in this way are removed from
the guardian.
-make-guardian takes one optional argument that says whether the
-new guardian should be greedy or sharing. if there is any chance
address@hidden takes one optional argument that says whether the
+new guardian should be greedy or sharing. If there is any chance
that any object protected by the guardian may be resurrected,
then you should make the guardian greedy (this is the default).
@@ -189,6 +191,20 @@
paper still (mostly) accurately describes the interface).
@end deffn
address@hidden primitive destroy-guardian! guardian
+Destroys @var{guardian}, by making it impossible to put any more
+objects in it or get any objects from it. It also unguards any
+objects guarded by @var{guardian}.
address@hidden deffn
+
address@hidden primitive guardian-greedy? guardian
+Return @code{#t} if @var{guardian} is a greedy guardian, otherwise @code{#f}.
address@hidden deffn
+
address@hidden primitive guardian-destroyed? guardian
+Return @code{#t} if @var{guardian} has been destroyed, otherwise @code{#f}.
address@hidden deffn
+
@page
@node Objects
@@ -196,22 +212,30 @@
@c docstring begin (texi-doc-string "guile" "entity?")
@deffn primitive entity? obj
+Return @code{#t} if @var{obj} is an entity.
@end deffn
@c docstring begin (texi-doc-string "guile" "operator?")
@deffn primitive operator? obj
+Return @code{#t} if @var{obj} is an operator.
@end deffn
@c docstring begin (texi-doc-string "guile" "set-object-procedure!")
@deffn primitive set-object-procedure! obj proc
+Return the object procedure of @var{obj} to @var{proc}.
address@hidden must be either an entity or an operator.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-class-object")
@deffn primitive make-class-object metaclass layout
+Create a new class object of class @var{metaclass}, with the
+slot layout specified by @var{layout}.
@end deffn
@c docstring begin (texi-doc-string "guile" "make-subclass-object")
@deffn primitive make-subclass-object class layout
+Create a subclass object of @var{class}, with the slot layout
+specified by @var{layout}.
@end deffn
Index: guile/guile-doc/ref/scheme-modules.texi
diff -u guile/guile-doc/ref/scheme-modules.texi:1.3
guile/guile-doc/ref/scheme-modules.texi:1.4
--- guile/guile-doc/ref/scheme-modules.texi:1.3 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-modules.texi Sat Feb 24 16:11:15 2001
@@ -134,6 +134,7 @@
@c docstring begin (texi-doc-string "guile" "standard-eval-closure")
@deffn primitive standard-eval-closure module
+Return an eval closure for the module @var{module}.
@end deffn
Some modules are included in the Guile distribution; here are references
Index: guile/guile-doc/ref/scheme-options.texi
diff -u guile/guile-doc/ref/scheme-options.texi:1.3
guile/guile-doc/ref/scheme-options.texi:1.4
--- guile/guile-doc/ref/scheme-options.texi:1.3 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-options.texi Sat Feb 24 16:11:15 2001
@@ -309,10 +309,21 @@
@c docstring begin (texi-doc-string "guile" "parse-path")
@deffn primitive parse-path path [tail]
+Parse @var{path}, which is expected to be a colon-separated
+string, into a list and return the resulting list with
address@hidden appended. If @var{path} is @code{#f}, @var{tail}
+is returned.
@end deffn
@c docstring begin (texi-doc-string "guile" "search-path")
@deffn primitive search-path path filename [extensions]
+Search @var{path} for a directory containing a file named
address@hidden The file must be readable, and not a directory.
+If we find one, return its full filename; otherwise, return
address@hidden If @var{filename} is absolute, return it unchanged.
+If given, @var{extensions} is a list of strings; for each
+directory in @var{path}, we search for @var{filename}
+concatenated with each @var{extension}.
@end deffn
@defvar %load-path
Index: guile/guile-doc/ref/scheme-procedures.texi
diff -u guile/guile-doc/ref/scheme-procedures.texi:1.3
guile/guile-doc/ref/scheme-procedures.texi:1.4
--- guile/guile-doc/ref/scheme-procedures.texi:1.3 Fri Feb 23 12:25:21 2001
+++ guile/guile-doc/ref/scheme-procedures.texi Sat Feb 24 16:11:15 2001
@@ -53,14 +53,17 @@
@c docstring begin (texi-doc-string "guile" "closure?")
@deffn primitive closure? obj
+Return @code{#t} if @var{obj} is a closure.
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure?")
@deffn primitive procedure? obj
+Return @code{#t} if @var{obj} is a procedure.
@end deffn
@c docstring begin (texi-doc-string "guile" "thunk?")
@deffn primitive thunk? obj
+Return @code{#t} if @var{obj} is a thunk.
@end deffn
@c docstring begin (texi-doc-string "guile" "set-source-properties!")
@@ -93,14 +96,20 @@
@c docstring begin (texi-doc-string "guile" "make-procedure-with-setter")
@deffn primitive make-procedure-with-setter procedure setter
+Create a new procedure which behaves like @var{procedure}, but
+with the associated setter @var{setter}.
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure-with-setter?")
@deffn primitive procedure-with-setter? obj
+Return @code{#t} if @var{obj} is a procedure with an
+associated setter procedure.
@end deffn
@c docstring begin (texi-doc-string "guile" "procedure")
@deffn primitive procedure proc
+Return the procedure of @var{proc}, which must be either a
+procedure with setter, or an operator struct.
@end deffn
@c docstring begin (texi-doc-string "guile" "setter")
Index: guile/guile-doc/ref/scheme-scheduling.texi
diff -u guile/guile-doc/ref/scheme-scheduling.texi:1.2
guile/guile-doc/ref/scheme-scheduling.texi:1.3
--- guile/guile-doc/ref/scheme-scheduling.texi:1.2 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-scheduling.texi Sat Feb 24 16:11:15 2001
@@ -20,18 +20,21 @@
@c docstring begin (texi-doc-string "guile" "make-arbiter")
@deffn primitive make-arbiter name
-Returns an object of type arbiter and name name. Its state is initially
unlocked.
-Arbiters are a way to achieve process synchronization.
+Return an object of type arbiter and name @var{name}. Its
+state is initially unlocked. Arbiters are a way to achieve
+process synchronization.
@end deffn
@c docstring begin (texi-doc-string "guile" "try-arbiter")
@deffn primitive try-arbiter arb
-Returns #t and locks arbiter if arbiter was unlocked. Otherwise, returns #f.
+Return @code{#t} and lock the arbiter @var{arb} if the arbiter
+was unlocked. Otherwise, return @code{#f}.
@end deffn
@c docstring begin (texi-doc-string "guile" "release-arbiter")
@deffn primitive release-arbiter arb
-Returns #t and unlocks arbiter if arbiter was locked. Otherwise, returns #f.
+Return @code{#t} and unlock the arbiter @var{arb} if the
+arbiter was locked. Otherwise, return @code{#f}.
@end deffn
@@ -40,34 +43,44 @@
@c docstring begin (texi-doc-string "guile" "async")
@deffn primitive async thunk
+Create a new async for the procedure @var{thunk}.
@end deffn
@c docstring begin (texi-doc-string "guile" "system-async")
@deffn primitive system-async thunk
+Create a new async for the procedure @var{thunk}. Also
+add it to the system's list of active async objects.
@end deffn
@c docstring begin (texi-doc-string "guile" "async-mark")
@deffn primitive async-mark a
+Mark the async @var{a} for future execution.
@end deffn
@c docstring begin (texi-doc-string "guile" "system-async-mark")
@deffn primitive system-async-mark a
+Mark the async @var{a} for future execution.
@end deffn
@c docstring begin (texi-doc-string "guile" "run-asyncs")
@deffn primitive run-asyncs list_of_a
+Execute all thunks from the asyncs of the list @var{list_of_a}.
@end deffn
@c docstring begin (texi-doc-string "guile" "noop")
@deffn primitive noop . args
+Do nothing. When called without arguments, return @code{#f},
+otherwise return the first argument.
@end deffn
@c docstring begin (texi-doc-string "guile" "unmask-signals")
@deffn primitive unmask-signals
+Unmask signals. The returned value is not specified.
@end deffn
@c docstring begin (texi-doc-string "guile" "mask-signals")
@deffn primitive mask-signals
+Mask signals. The returned value is not specified.
@end deffn
Index: guile/guile-doc/ref/scheme-translation.texi
diff -u guile/guile-doc/ref/scheme-translation.texi:1.2
guile/guile-doc/ref/scheme-translation.texi:1.3
--- guile/guile-doc/ref/scheme-translation.texi:1.2 Sun Jan 7 03:25:26 2001
+++ guile/guile-doc/ref/scheme-translation.texi Sat Feb 24 16:11:15 2001
@@ -14,22 +14,33 @@
@c docstring begin (texi-doc-string "guile" "nil-car")
@deffn primitive nil-car x
+Return the car of @var{x}, but convert it to LISP nil if it
+is Scheme's end-of-list.
@end deffn
@c docstring begin (texi-doc-string "guile" "nil-cdr")
@deffn primitive nil-cdr x
+Return the cdr of @var{x}, but convert it to LISP nil if it
+is Scheme's end-of-list.
@end deffn
@c docstring begin (texi-doc-string "guile" "nil-cons")
@deffn primitive nil-cons x y
+Create a new cons cell with @var{x} as the car and @var{y} as
+the cdr, but convert @var{y} to Scheme's end-of-list if it is
+a LISP nil.
@end deffn
@c docstring begin (texi-doc-string "guile" "nil-eq")
@deffn primitive nil-eq x y
+Compare @var{x} and @var{y} and return LISP's t if they are
address@hidden, return LISP's nil otherwise.
@end deffn
@c docstring begin (texi-doc-string "guile" "null")
@deffn primitive null x
+Return LISP's @code{t} if @var{x} is nil in the LISP sense,
+return LISP's nil otherwise.
@end deffn
--- End Message ---