/[guile]/guile/guile-core/libguile/dynl.c
ViewVC logotype

Diff of /guile/guile-core/libguile/dynl.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.71 by ghouston, Sun Jun 30 20:34:38 2002 UTC revision 1.72 by ghouston, Tue Jul 9 22:40:03 2002 UTC
# Line 284  SCM_DEFINE (scm_dynamic_func, "dynamic-f Line 284  SCM_DEFINE (scm_dynamic_func, "dynamic-f
284    
285  SCM_DEFINE (scm_dynamic_call, "dynamic-call", 2, 0, 0,  SCM_DEFINE (scm_dynamic_call, "dynamic-call", 2, 0, 0,
286              (SCM func, SCM dobj),              (SCM func, SCM dobj),
287              "Call the C function indicated by @var{func} and @var{dobj}.\n"              "Call a C function in a dynamic object.  Two styles of\n"
288              "The function is passed no arguments and its return value is\n"              "invocation are supported:\n\n"
289              "ignored.  When @var{function} is something returned by\n"              "@itemize @bullet\n"
290              "@code{dynamic-func}, call that function and ignore @var{dobj}.\n"              "@item @var{func} can be a function handle returned by\n"
291              "When @var{func} is a string , look it up in @var{dynobj}; this\n"              "@code{dynamic-func}.  In this case @var{dobj} is\n"
292              "is equivalent to\n"              "ignored\n"
293              "@smallexample\n"              "@item @var{func} can be a string with the name of the\n"
294              "(dynamic-call (dynamic-func @var{func} @var{dobj} #f))\n"              "function to call, with @var{dobj} the handle of the\n"
295              "@end smallexample\n\n")              "dynamic object in which to find the function.\n"
296                "This is equivalent to\n"
297                "@smallexample\n\n"
298                "(dynamic-call (dynamic-func @var{func} @var{dobj}) #f)\n"
299                "@end smallexample\n"
300                "@end itemize\n\n"
301                "In either case, the function is passed no arguments\n"
302                "and its return value is ignored.")
303  #define FUNC_NAME s_scm_dynamic_call  #define FUNC_NAME s_scm_dynamic_call
304  {  {
305    void (*fptr) ();    void (*fptr) ();

Legend:
Removed from v.1.71  
changed lines
  Added in v.1.72

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26