* dynl.c (scm_dynamic_call): docstring editing.

doc/maint/guile.texi

@@ -493,18 +493,25 @@ needed or not and will add it when necessary.
 dynamic-call
 @deffn {Scheme Procedure} dynamic-call func dobj
 @deffnx {C Function} scm_dynamic_call (func, dobj)
-Call the C function indicated by @var{func} and @var{dobj}.
+Call a C function in a dynamic object.  Two styles of
-The function is passed no arguments and its return value is
+invocation are supported:
-ignored.  When @var{function} is something returned by
-@code{dynamic-func}, call that function and ignore @var{dobj}.
-When @var{func} is a string , look it up in @var{dynobj}; this
-is equivalent to
-@smallexample
-(dynamic-call (dynamic-func @var{func} @var{dobj} #f))
-@end smallexample
 
-Interrupts are deferred while the C function is executing (with
+@itemize @bullet
-@code{SCM_DEFER_INTS}/@code{SCM_ALLOW_INTS}).
+@item @var{func} can be a function handle returned by
+@code{dynamic-func}.  In this case @var{dobj} is
+ignored
+@item @var{func} can be a string with the name of the
+function to call, with @var{dobj} the handle of the
+dynamic object in which to find the function.
+This is equivalent to
+@smallexample
+
+(dynamic-call (dynamic-func @var{func} @var{dobj}) #f)
+@end smallexample
+@end itemize
+
+In either case, the function is passed no arguments
+and its return value is ignored.
 @end deffn
 
 dynamic-args-call

doc/ref/new-docstrings.texi

@@ -412,7 +412,7 @@ from the arguments @var{initargs}.
 @end deffn
 
 @deffn {Scheme Procedure} slot-exists? obj slot_name
-@deffnx {C Function} scm_slots_exists_p (obj, slot_name)
+@deffnx {C Function} scm_slot_exists_p (obj, slot_name)
 Return @code{#t} if @var{obj} has a slot named @var{slot_name}.
 @end deffn
 
@@ -689,3 +689,13 @@ implemented by the C function "scm_single_thread_p"
 Return an integer that for the lifetime of @var{obj} is uniquely
 returned by this function for @var{obj}
 @end deffn
+
+@deffn {Scheme Procedure} nan
+@deffnx {C Function} scm_nan ()
+Return NaN.
+@end deffn
+
+@deffn {Scheme Procedure} inf
+@deffnx {C Function} scm_inf ()
+Return Inf.
+@end deffn

doc/ref/scheme-modules.texi

@@ -542,18 +542,25 @@ needed or not and will add it when necessary.
 
 @deffn {Scheme Procedure} dynamic-call func dobj
 @deffnx {C Function} scm_dynamic_call (func, dobj)
-Call the C function indicated by @var{func} and @var{dobj}.
+Call a C function in a dynamic object.  Two styles of
-The function is passed no arguments and its return value is
+invocation are supported:
-ignored.  When @var{function} is something returned by
-@code{dynamic-func}, call that function and ignore @var{dobj}.
-When @var{func} is a string , look it up in @var{dynobj}; this
-is equivalent to
-@smallexample
-(dynamic-call (dynamic-func @var{func} @var{dobj} #f))
-@end smallexample
 
-Interrupts are deferred while the C function is executing (with
+@itemize @bullet
-@code{SCM_DEFER_INTS}/@code{SCM_ALLOW_INTS}).
+@item @var{func} can be a function handle returned by
+@code{dynamic-func}.  In this case @var{dobj} is
+ignored
+@item @var{func} can be a string with the name of the
+function to call, with @var{dobj} the handle of the
+dynamic object in which to find the function.
+This is equivalent to
+@smallexample
+
+(dynamic-call (dynamic-func @var{func} @var{dobj}) #f)
+@end smallexample
+@end itemize
+
+In either case, the function is passed no arguments
+and its return value is ignored.
 @end deffn
 
 @deffn {Scheme Procedure} dynamic-args-call func dobj args

libguile/ChangeLog

@@ -1,3 +1,7 @@
+2002-07-09  Gary Houston  <ghouston@arglist.com>
+
+	* dynl.c (scm_dynamic_call): docstring editing.
+
 2002-07-08  Rob Browning  <rlb@defaultvalue.org>
 
 	* gc_os_dep.c: HURD fixes.

libguile/dynl.c

@@ -284,15 +284,22 @@ SCM_DEFINE (scm_dynamic_func, "dynamic-func", 2, 0, 0,
 
 SCM_DEFINE (scm_dynamic_call, "dynamic-call", 2, 0, 0, 
             (SCM func, SCM dobj),
-	    "Call the C function indicated by @var{func} and @var{dobj}.\n"
+	    "Call a C function in a dynamic object.  Two styles of\n"
-	    "The function is passed no arguments and its return value is\n"
+	    "invocation are supported:\n\n"
-	    "ignored.  When @var{function} is something returned by\n"
+	    "@itemize @bullet\n"
-	    "@code{dynamic-func}, call that function and ignore @var{dobj}.\n"
+	    "@item @var{func} can be a function handle returned by\n"
-	    "When @var{func} is a string , look it up in @var{dynobj}; this\n"
+	    "@code{dynamic-func}.  In this case @var{dobj} is\n"
-	    "is equivalent to\n"
+	    "ignored\n"
-	    "@smallexample\n"
+	    "@item @var{func} can be a string with the name of the\n"
-	    "(dynamic-call (dynamic-func @var{func} @var{dobj} #f))\n"
+	    "function to call, with @var{dobj} the handle of the\n"
-	    "@end smallexample\n\n")
+	    "dynamic object in which to find the function.\n"
+	    "This is equivalent to\n"
+	    "@smallexample\n\n"
+	    "(dynamic-call (dynamic-func @var{func} @var{dobj}) #f)\n"
+	    "@end smallexample\n"
+	    "@end itemize\n\n"
+	    "In either case, the function is passed no arguments\n"
+	    "and its return value is ignored.")
 #define FUNC_NAME s_scm_dynamic_call
 {
   void (*fptr) ();