/[guile]/guile/guile-core/doc/ref/new-docstrings.texi
ViewVC logotype

Diff of /guile/guile-core/doc/ref/new-docstrings.texi

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

revision 1.1.2.3 by ttn, Tue Jan 8 09:22:36 2002 UTC revision 1.1.2.4 by ossau, Fri Mar 15 09:23:18 2002 UTC
# Line 1  Line 1 
1    
2  @c module (guile)  @c module (guile)
3    
4  @deffn primitive environment? obj  @deffn {Scheme Procedure} environment? obj
5    @deffnx {C Function} scm_environment_p (obj)
6  Return @code{#t} if @var{obj} is an environment, or @code{#f}  Return @code{#t} if @var{obj} is an environment, or @code{#f}
7  otherwise.  otherwise.
8  @end deffn  @end deffn
9    
10  @deffn primitive environment-bound? env sym  @deffn {Scheme Procedure} environment-bound? env sym
11    @deffnx {C Function} scm_environment_bound_p (env, sym)
12  Return @code{#t} if @var{sym} is bound in @var{env}, or  Return @code{#t} if @var{sym} is bound in @var{env}, or
13  @code{#f} otherwise.  @code{#f} otherwise.
14  @end deffn  @end deffn
15    
16  @deffn primitive environment-ref env sym  @deffn {Scheme Procedure} environment-ref env sym
17    @deffnx {C Function} scm_environment_ref (env, sym)
18  Return the value of the location bound to @var{sym} in  Return the value of the location bound to @var{sym} in
19  @var{env}. If @var{sym} is unbound in @var{env}, signal an  @var{env}. If @var{sym} is unbound in @var{env}, signal an
20  @code{environment:unbound} error.  @code{environment:unbound} error.
21  @end deffn  @end deffn
22    
23  @deffn primitive environment-fold env proc init  @deffn {Scheme Procedure} environment-fold env proc init
24    @deffnx {C Function} scm_environment_fold (env, proc, init)
25  Iterate over all the bindings in @var{env}, accumulating some  Iterate over all the bindings in @var{env}, accumulating some
26  value.  value.
27  For each binding in @var{env}, apply @var{proc} to the symbol  For each binding in @var{env}, apply @var{proc} to the symbol
# Line 51  using environment-fold: Line 55  using environment-fold:
55  @end lisp  @end lisp
56  @end deffn  @end deffn
57    
58  @deffn primitive environment-define env sym val  @deffn {Scheme Procedure} environment-define env sym val
59    @deffnx {C Function} scm_environment_define (env, sym, val)
60  Bind @var{sym} to a new location containing @var{val} in  Bind @var{sym} to a new location containing @var{val} in
61  @var{env}. If @var{sym} is already bound to another location  @var{env}. If @var{sym} is already bound to another location
62  in @var{env} and the binding is mutable, that binding is  in @var{env} and the binding is mutable, that binding is
# Line 61  If @var{sym} is already bound in @var{en Line 66  If @var{sym} is already bound in @var{en
66  immutable, signal an @code{environment:immutable-binding} error.  immutable, signal an @code{environment:immutable-binding} error.
67  @end deffn  @end deffn
68    
69  @deffn primitive environment-undefine env sym  @deffn {Scheme Procedure} environment-undefine env sym
70    @deffnx {C Function} scm_environment_undefine (env, sym)
71  Remove any binding for @var{sym} from @var{env}. If @var{sym}  Remove any binding for @var{sym} from @var{env}. If @var{sym}
72  is unbound in @var{env}, do nothing.  The return value is  is unbound in @var{env}, do nothing.  The return value is
73  unspecified.  unspecified.
# Line 69  If @var{sym} is already bound in @var{en Line 75  If @var{sym} is already bound in @var{en
75  immutable, signal an @code{environment:immutable-binding} error.  immutable, signal an @code{environment:immutable-binding} error.
76  @end deffn  @end deffn
77    
78  @deffn primitive environment-set! env sym val  @deffn {Scheme Procedure} environment-set! env sym val
79    @deffnx {C Function} scm_environment_set_x (env, sym, val)
80  If @var{env} binds @var{sym} to some location, change that  If @var{env} binds @var{sym} to some location, change that
81  location's value to @var{val}.  The return value is  location's value to @var{val}.  The return value is
82  unspecified.  unspecified.
# Line 79  to an immutable location, signal an Line 86  to an immutable location, signal an
86  @code{environment:immutable-location} error.  @code{environment:immutable-location} error.
87  @end deffn  @end deffn
88    
89  @deffn primitive environment-cell env sym for_write  @deffn {Scheme Procedure} environment-cell env sym for_write
90    @deffnx {C Function} scm_environment_cell (env, sym, for_write)
91  Return the value cell which @var{env} binds to @var{sym}, or  Return the value cell which @var{env} binds to @var{sym}, or
92  @code{#f} if the binding does not live in a value cell.  @code{#f} if the binding does not live in a value cell.
93  The argument @var{for-write} indicates whether the caller  The argument @var{for-write} indicates whether the caller
# Line 94  If you use this function, you should con Line 102  If you use this function, you should con
102  re-bound to a new value cell, or becomes undefined.  re-bound to a new value cell, or becomes undefined.
103  @end deffn  @end deffn
104    
105  @deffn primitive environment-observe env proc  @deffn {Scheme Procedure} environment-observe env proc
106    @deffnx {C Function} scm_environment_observe (env, proc)
107  Whenever @var{env}'s bindings change, apply @var{proc} to  Whenever @var{env}'s bindings change, apply @var{proc} to
108  @var{env}.  @var{env}.
109  This function returns an object, token, which you can pass to  This function returns an object, token, which you can pass to
# Line 103  of procedures observing @var{env}.  The Line 112  of procedures observing @var{env}.  The
112  token is unspecified.  token is unspecified.
113  @end deffn  @end deffn
114    
115  @deffn primitive environment-observe-weak env proc  @deffn {Scheme Procedure} environment-observe-weak env proc
116    @deffnx {C Function} scm_environment_observe_weak (env, proc)
117  This function is the same as environment-observe, except that  This function is the same as environment-observe, except that
118  the reference @var{env} retains to @var{proc} is a weak  the reference @var{env} retains to @var{proc} is a weak
119  reference. This means that, if there are no other live,  reference. This means that, if there are no other live,
# Line 112  garbage-collected, and dropped from @var Line 122  garbage-collected, and dropped from @var
122  list of observing procedures.  list of observing procedures.
123  @end deffn  @end deffn
124    
125  @deffn primitive environment-unobserve token  @deffn {Scheme Procedure} environment-unobserve token
126    @deffnx {C Function} scm_environment_unobserve (token)
127  Cancel the observation request which returned the value  Cancel the observation request which returned the value
128  @var{token}.  The return value is unspecified.  @var{token}.  The return value is unspecified.
129  If a call @code{(environment-observe env proc)} returns  If a call @code{(environment-observe env proc)} returns
# Line 121  will cause @var{proc} to no longer be ca Line 132  will cause @var{proc} to no longer be ca
132  bindings change.  bindings change.
133  @end deffn  @end deffn
134    
135  @deffn primitive make-leaf-environment  @deffn {Scheme Procedure} make-leaf-environment
136    @deffnx {C Function} scm_make_leaf_environment ()
137  Create a new leaf environment, containing no bindings.  Create a new leaf environment, containing no bindings.
138  All bindings and locations created in the new environment  All bindings and locations created in the new environment
139  will be mutable.  will be mutable.
140  @end deffn  @end deffn
141    
142  @deffn primitive leaf-environment? object  @deffn {Scheme Procedure} leaf-environment? object
143    @deffnx {C Function} scm_leaf_environment_p (object)
144  Return @code{#t} if object is a leaf environment, or @code{#f}  Return @code{#t} if object is a leaf environment, or @code{#f}
145  otherwise.  otherwise.
146  @end deffn  @end deffn
147    
148  @deffn primitive make-eval-environment local imported  @deffn {Scheme Procedure} make-eval-environment local imported
149    @deffnx {C Function} scm_make_eval_environment (local, imported)
150  Return a new environment object eval whose bindings are the  Return a new environment object eval whose bindings are the
151  union of the bindings in the environments @var{local} and  union of the bindings in the environments @var{local} and
152  @var{imported}, with bindings from @var{local} taking  @var{imported}, with bindings from @var{local} taking
# Line 156  In typical use, @var{local} will be a fi Line 170  In typical use, @var{local} will be a fi
170  @var{imported} will be an import environment  @var{imported} will be an import environment
171  @end deffn  @end deffn
172    
173  @deffn primitive eval-environment? object  @deffn {Scheme Procedure} eval-environment? object
174    @deffnx {C Function} scm_eval_environment_p (object)
175  Return @code{#t} if object is an eval environment, or @code{#f}  Return @code{#t} if object is an eval environment, or @code{#f}
176  otherwise.  otherwise.
177  @end deffn  @end deffn
178    
179  @deffn primitive eval-environment-local env  @deffn {Scheme Procedure} eval-environment-local env
180    @deffnx {C Function} scm_eval_environment_local (env)
181  Return the local environment of eval environment @var{env}.  Return the local environment of eval environment @var{env}.
182  @end deffn  @end deffn
183    
184  @deffn primitive eval-environment-set-local! env local  @deffn {Scheme Procedure} eval-environment-set-local! env local
185    @deffnx {C Function} scm_eval_environment_set_local_x (env, local)
186  Change @var{env}'s local environment to @var{local}.  Change @var{env}'s local environment to @var{local}.
187  @end deffn  @end deffn
188    
189  @deffn primitive eval-environment-imported env  @deffn {Scheme Procedure} eval-environment-imported env
190    @deffnx {C Function} scm_eval_environment_imported (env)
191  Return the imported environment of eval environment @var{env}.  Return the imported environment of eval environment @var{env}.
192  @end deffn  @end deffn
193    
194  @deffn primitive eval-environment-set-imported! env imported  @deffn {Scheme Procedure} eval-environment-set-imported! env imported
195    @deffnx {C Function} scm_eval_environment_set_imported_x (env, imported)
196  Change @var{env}'s imported environment to @var{imported}.  Change @var{env}'s imported environment to @var{imported}.
197  @end deffn  @end deffn
198    
199  @deffn primitive make-import-environment imports conflict_proc  @deffn {Scheme Procedure} make-import-environment imports conflict_proc
200    @deffnx {C Function} scm_make_import_environment (imports, conflict_proc)
201  Return a new environment @var{imp} whose bindings are the union  Return a new environment @var{imp} whose bindings are the union
202  of the bindings from the environments in @var{imports};  of the bindings from the environments in @var{imports};
203  @var{imports} must be a list of environments. That is,  @var{imports} must be a list of environments. That is,
# Line 205  notice that the set of bindings in @var{ Line 225  notice that the set of bindings in @var{
225  if one of its imported environments changes.  if one of its imported environments changes.
226  @end deffn  @end deffn
227    
228  @deffn primitive import-environment? object  @deffn {Scheme Procedure} import-environment? object
229    @deffnx {C Function} scm_import_environment_p (object)
230  Return @code{#t} if object is an import environment, or  Return @code{#t} if object is an import environment, or
231  @code{#f} otherwise.  @code{#f} otherwise.
232  @end deffn  @end deffn
233    
234  @deffn primitive import-environment-imports env  @deffn {Scheme Procedure} import-environment-imports env
235    @deffnx {C Function} scm_import_environment_imports (env)
236  Return the list of environments imported by the import  Return the list of environments imported by the import
237  environment @var{env}.  environment @var{env}.
238  @end deffn  @end deffn
239    
240  @deffn primitive import-environment-set-imports! env imports  @deffn {Scheme Procedure} import-environment-set-imports! env imports
241    @deffnx {C Function} scm_import_environment_set_imports_x (env, imports)
242  Change @var{env}'s list of imported environments to  Change @var{env}'s list of imported environments to
243  @var{imports}, and check for conflicts.  @var{imports}, and check for conflicts.
244  @end deffn  @end deffn
245    
246  @deffn primitive make-export-environment private signature  @deffn {Scheme Procedure} make-export-environment private signature
247    @deffnx {C Function} scm_make_export_environment (private, signature)
248  Return a new environment @var{exp} containing only those  Return a new environment @var{exp} containing only those
249  bindings in private whose symbols are present in  bindings in private whose symbols are present in
250  @var{signature}. The @var{private} argument must be an  @var{signature}. The @var{private} argument must be an
# Line 267  notice that the set of bindings in @var{ Line 291  notice that the set of bindings in @var{
291  if the bindings in private change.  if the bindings in private change.
292  @end deffn  @end deffn
293    
294  @deffn primitive export-environment? object  @deffn {Scheme Procedure} export-environment? object
295    @deffnx {C Function} scm_export_environment_p (object)
296  Return @code{#t} if object is an export environment, or  Return @code{#t} if object is an export environment, or
297  @code{#f} otherwise.  @code{#f} otherwise.
298  @end deffn  @end deffn
299    
300  @deffn primitive export-environment-private env  @deffn {Scheme Procedure} export-environment-private env
301    @deffnx {C Function} scm_export_environment_private (env)
302  Return the private environment of export environment @var{env}.  Return the private environment of export environment @var{env}.
303  @end deffn  @end deffn
304    
305  @deffn primitive export-environment-set-private! env private  @deffn {Scheme Procedure} export-environment-set-private! env private
306    @deffnx {C Function} scm_export_environment_set_private_x (env, private)
307  Change the private environment of export environment @var{env}.  Change the private environment of export environment @var{env}.
308  @end deffn  @end deffn
309    
310  @deffn primitive export-environment-signature env  @deffn {Scheme Procedure} export-environment-signature env
311    @deffnx {C Function} scm_export_environment_signature (env)
312  Return the signature of export environment @var{env}.  Return the signature of export environment @var{env}.
313  @end deffn  @end deffn
314    
315  @deffn primitive export-environment-set-signature! env signature  @deffn {Scheme Procedure} export-environment-set-signature! env signature
316    @deffnx {C Function} scm_export_environment_set_signature_x (env, signature)
317  Change the signature of export environment @var{env}.  Change the signature of export environment @var{env}.
318  @end deffn  @end deffn
319    
320  @deffn primitive %compute-slots class  @deffn {Scheme Procedure} %compute-slots class
321    @deffnx {C Function} scm_sys_compute_slots (class)
322  Return a list consisting of the names of all slots belonging to  Return a list consisting of the names of all slots belonging to
323  class @var{class}, i. e. the slots of @var{class} and of all of  class @var{class}, i. e. the slots of @var{class} and of all of
324  its super-classes.  its superclasses.
325  @end deffn  @end deffn
326    
327  @deffn primitive get-keyword key l default_value  @deffn {Scheme Procedure} get-keyword key l default_value
328    @deffnx {C Function} scm_get_keyword (key, l, default_value)
329  Determine an associated value for the keyword @var{key} from  Determine an associated value for the keyword @var{key} from
330  the list @var{l}.  The list @var{l} has to consist of an even  the list @var{l}.  The list @var{l} has to consist of an even
331  number of elements, where, starting with the first, every  number of elements, where, starting with the first, every
# Line 303  If @var{l} does not hold a value for @va Line 334  If @var{l} does not hold a value for @va
334  @var{default_value} is returned.  @var{default_value} is returned.
335  @end deffn  @end deffn
336    
337  @deffn primitive slot-ref-using-class class obj slot_name  @deffn {Scheme Procedure} slot-ref-using-class class obj slot_name
338    @deffnx {C Function} scm_slot_ref_using_class (class, obj, slot_name)
339    
340  @end deffn  @end deffn
341    
342  @deffn primitive slot-set-using-class! class obj slot_name value  @deffn {Scheme Procedure} slot-set-using-class! class obj slot_name value
343    @deffnx {C Function} scm_slot_set_using_class_x (class, obj, slot_name, value)
344    
345  @end deffn  @end deffn
346    
347  @deffn primitive class-of x  @deffn {Scheme Procedure} class-of x
348    @deffnx {C Function} scm_class_of (x)
349  Return the class of @var{x}.  Return the class of @var{x}.
350  @end deffn  @end deffn
351    
352  @deffn primitive %goops-loaded  @deffn {Scheme Procedure} %goops-loaded
353    @deffnx {C Function} scm_sys_goops_loaded ()
354  Announce that GOOPS is loaded and perform initialization  Announce that GOOPS is loaded and perform initialization
355  on the C level which depends on the loaded GOOPS modules.  on the C level which depends on the loaded GOOPS modules.
356  @end deffn  @end deffn
357    
358  @deffn primitive %method-more-specific? m1 m2 targs  @deffn {Scheme Procedure} %method-more-specific? m1 m2 targs
359    @deffnx {C Function} scm_sys_method_more_specific_p (m1, m2, targs)
360    
361  @end deffn  @end deffn
362    
363  @deffn primitive find-method . l  @deffn {Scheme Procedure} find-method . l
364    @deffnx {C Function} scm_find_method (l)
365    
366  @end deffn  @end deffn
367    
368  @deffn primitive primitive-generic-generic subr  @deffn {Scheme Procedure} primitive-generic-generic subr
369    @deffnx {C Function} scm_primitive_generic_generic (subr)
370    
371  @end deffn  @end deffn
372    
373  @deffn primitive enable-primitive-generic! . subrs  @deffn {Scheme Procedure} enable-primitive-generic! . subrs
374    @deffnx {C Function} scm_enable_primitive_generic_x (subrs)
375    
376  @end deffn  @end deffn
377    
378  @deffn primitive generic-capability? proc  @deffn {Scheme Procedure} generic-capability? proc
379    @deffnx {C Function} scm_generic_capability_p (proc)
380    
381  @end deffn  @end deffn
382    
383  @deffn primitive %invalidate-method-cache! gf  @deffn {Scheme Procedure} %invalidate-method-cache! gf
384    @deffnx {C Function} scm_sys_invalidate_method_cache_x (gf)
385    
386  @end deffn  @end deffn
387    
388  @deffn primitive %invalidate-class class  @deffn {Scheme Procedure} %invalidate-class class
389    @deffnx {C Function} scm_sys_invalidate_class (class)
390    
391  @end deffn  @end deffn
392    
393  @deffn primitive %modify-class old new  @deffn {Scheme Procedure} %modify-class old new
394    @deffnx {C Function} scm_sys_modify_class (old, new)
395    
396  @end deffn  @end deffn
397    
398  @deffn primitive %modify-instance old new  @deffn {Scheme Procedure} %modify-instance old new
399    @deffnx {C Function} scm_sys_modify_instance (old, new)
400    
401  @end deffn  @end deffn
402    
403  @deffn primitive %set-object-setter! obj setter  @deffn {Scheme Procedure} %set-object-setter! obj setter
404    @deffnx {C Function} scm_sys_set_object_setter_x (obj, setter)
405    
406  @end deffn  @end deffn
407    
408  @deffn primitive %allocate-instance class initargs  @deffn {Scheme Procedure} %allocate-instance class initargs
409    @deffnx {C Function} scm_sys_allocate_instance (class, initargs)
410  Create a new instance of class @var{class} and initialize it  Create a new instance of class @var{class} and initialize it
411  from the arguments @var{initargs}.  from the arguments @var{initargs}.
412  @end deffn  @end deffn
413    
414  @deffn primitive slot-exists? obj slot_name  @deffn {Scheme Procedure} slot-exists? obj slot_name
415    @deffnx {C Function} scm_slots_exists_p (obj, slot_name)
416  Return @code{#t} if @var{obj} has a slot named @var{slot_name}.  Return @code{#t} if @var{obj} has a slot named @var{slot_name}.
417  @end deffn  @end deffn
418    
419  @deffn primitive slot-bound? obj slot_name  @deffn {Scheme Procedure} slot-bound? obj slot_name
420    @deffnx {C Function} scm_slot_bound_p (obj, slot_name)
421  Return @code{#t} if the slot named @var{slot_name} of @var{obj}  Return @code{#t} if the slot named @var{slot_name} of @var{obj}
422  is bound.  is bound.
423  @end deffn  @end deffn
424    
425  @deffn primitive slot-set! obj slot_name value  @deffn {Scheme Procedure} slot-set! obj slot_name value
426    @deffnx {C Function} scm_slot_set_x (obj, slot_name, value)
427  Set the slot named @var{slot_name} of @var{obj} to @var{value}.  Set the slot named @var{slot_name} of @var{obj} to @var{value}.
428  @end deffn  @end deffn
429    
430  @deffn primitive slot-exists-using-class? class obj slot_name  @deffn {Scheme Procedure} slot-exists-using-class? class obj slot_name
431    @deffnx {C Function} scm_slot_exists_using_class_p (class, obj, slot_name)
432    
433  @end deffn  @end deffn
434    
435  @deffn primitive slot-bound-using-class? class obj slot_name  @deffn {Scheme Procedure} slot-bound-using-class? class obj slot_name
436    @deffnx {C Function} scm_slot_bound_using_class_p (class, obj, slot_name)
437    
438  @end deffn  @end deffn
439    
440  @deffn primitive %fast-slot-set! obj index value  @deffn {Scheme Procedure} %fast-slot-set! obj index value
441    @deffnx {C Function} scm_sys_fast_slot_set_x (obj, index, value)
442  Set the slot with index @var{index} in @var{obj} to  Set the slot with index @var{index} in @var{obj} to
443  @var{value}.  @var{value}.
444  @end deffn  @end deffn
445    
446  @deffn primitive %fast-slot-ref obj index  @deffn {Scheme Procedure} %fast-slot-ref obj index
447    @deffnx {C Function} scm_sys_fast_slot_ref (obj, index)
448  Return the slot value with index @var{index} from @var{obj}.  Return the slot value with index @var{index} from @var{obj}.
449  @end deffn  @end deffn
450    
451  @deffn primitive @@assert-bound-ref obj index  @deffn {Scheme Procedure} @@assert-bound-ref obj index
452    @deffnx {C Function} scm_at_assert_bound_ref (obj, index)
453  Like @code{assert-bound}, but use @var{index} for accessing  Like @code{assert-bound}, but use @var{index} for accessing
454  the value from @var{obj}.  the value from @var{obj}.
455  @end deffn  @end deffn
456    
457  @deffn primitive assert-bound value obj  @deffn {Scheme Procedure} assert-bound value obj
458    @deffnx {C Function} scm_assert_bound (value, obj)
459  Return @var{value} if it is bound, and invoke the  Return @var{value} if it is bound, and invoke the
460  @var{slot-unbound} method of @var{obj} if it is not.  @var{slot-unbound} method of @var{obj} if it is not.
461  @end deffn  @end deffn
462    
463  @deffn primitive unbound? obj  @deffn {Scheme Procedure} unbound? obj
464    @deffnx {C Function} scm_unbound_p (obj)
465  Return @code{#t} if @var{obj} is unbound.  Return @code{#t} if @var{obj} is unbound.
466  @end deffn  @end deffn
467    
468  @deffn primitive make-unbound  @deffn {Scheme Procedure} make-unbound
469    @deffnx {C Function} scm_make_unbound ()
470  Return the unbound value.  Return the unbound value.
471  @end deffn  @end deffn
472    
473  @deffn primitive accessor-method-slot-definition obj  @deffn {Scheme Procedure} accessor-method-slot-definition obj
474    @deffnx {C Function} scm_accessor_method_slot_definition (obj)
475  Return the slot definition of the accessor @var{obj}.  Return the slot definition of the accessor @var{obj}.
476  @end deffn  @end deffn
477    
478  @deffn primitive method-procedure obj  @deffn {Scheme Procedure} method-procedure obj
479    @deffnx {C Function} scm_method_procedure (obj)
480  Return the procedure of the method @var{obj}.  Return the procedure of the method @var{obj}.
481  @end deffn  @end deffn
482    
483  @deffn primitive method-specializers obj  @deffn {Scheme Procedure} method-specializers obj
484    @deffnx {C Function} scm_method_specializers (obj)
485  Return specializers of the method @var{obj}.  Return specializers of the method @var{obj}.
486  @end deffn  @end deffn
487    
488  @deffn primitive method-generic-function obj  @deffn {Scheme Procedure} method-generic-function obj
489    @deffnx {C Function} scm_method_generic_function (obj)
490  Return the generic function for the method @var{obj}.  Return the generic function for the method @var{obj}.
491  @end deffn  @end deffn
492    
493  @deffn primitive generic-function-methods obj  @deffn {Scheme Procedure} generic-function-methods obj
494    @deffnx {C Function} scm_generic_function_methods (obj)
495  Return the methods of the generic function @var{obj}.  Return the methods of the generic function @var{obj}.
496  @end deffn  @end deffn
497    
498  @deffn primitive generic-function-name obj  @deffn {Scheme Procedure} generic-function-name obj
499    @deffnx {C Function} scm_generic_function_name (obj)
500  Return the name of the generic function @var{obj}.  Return the name of the generic function @var{obj}.
501  @end deffn  @end deffn
502    
503  @deffn primitive class-environment obj  @deffn {Scheme Procedure} class-environment obj
504    @deffnx {C Function} scm_class_environment (obj)
505  Return the environment of the class @var{obj}.  Return the environment of the class @var{obj}.
506  @end deffn  @end deffn
507    
508  @deffn primitive class-slots obj  @deffn {Scheme Procedure} class-slots obj
509    @deffnx {C Function} scm_class_slots (obj)
510  Return the slot list of the class @var{obj}.  Return the slot list of the class @var{obj}.
511  @end deffn  @end deffn
512    
513  @deffn primitive class-precedence-list obj  @deffn {Scheme Procedure} class-precedence-list obj
514    @deffnx {C Function} scm_class_precedence_list (obj)
515  Return the class precedence list of the class @var{obj}.  Return the class precedence list of the class @var{obj}.
516  @end deffn  @end deffn
517    
518  @deffn primitive class-direct-methods obj  @deffn {Scheme Procedure} class-direct-methods obj
519    @deffnx {C Function} scm_class_direct_methods (obj)
520  Return the direct methods of the class @var{obj}  Return the direct methods of the class @var{obj}
521  @end deffn  @end deffn
522    
523  @deffn primitive class-direct-subclasses obj  @deffn {Scheme Procedure} class-direct-subclasses obj
524    @deffnx {C Function} scm_class_direct_subclasses (obj)
525  Return the direct subclasses of the class @var{obj}.  Return the direct subclasses of the class @var{obj}.
526  @end deffn  @end deffn
527    
528  @deffn primitive class-direct-slots obj  @deffn {Scheme Procedure} class-direct-slots obj
529    @deffnx {C Function} scm_class_direct_slots (obj)
530  Return the direct slots of the class @var{obj}.  Return the direct slots of the class @var{obj}.
531  @end deffn  @end deffn
532    
533  @deffn primitive class-direct-supers obj  @deffn {Scheme Procedure} class-direct-supers obj
534  Return the direct super-classes of the class @var{obj}.  @deffnx {C Function} scm_class_direct_supers (obj)
535    Return the direct superclasses of the class @var{obj}.
536  @end deffn  @end deffn
537    
538  @deffn primitive class-name obj  @deffn {Scheme Procedure} class-name obj
539    @deffnx {C Function} scm_class_name (obj)
540  Return the class name of @var{obj}.  Return the class name of @var{obj}.
541  @end deffn  @end deffn
542    
543  @deffn primitive instance? obj  @deffn {Scheme Procedure} instance? obj
544    @deffnx {C Function} scm_instance_p (obj)
545  Return @code{#t} if @var{obj} is an instance.  Return @code{#t} if @var{obj} is an instance.
546  @end deffn  @end deffn
547    
548  @deffn primitive %inherit-magic! class dsupers  @deffn {Scheme Procedure} %inherit-magic! class dsupers
549    @deffnx {C Function} scm_sys_inherit_magic_x (class, dsupers)
550    
551  @end deffn  @end deffn
552    
553  @deffn primitive %prep-layout! class  @deffn {Scheme Procedure} %prep-layout! class
554    @deffnx {C Function} scm_sys_prep_layout_x (class)
555    
556  @end deffn  @end deffn
557    
558  @deffn primitive %initialize-object obj initargs  @deffn {Scheme Procedure} %initialize-object obj initargs
559    @deffnx {C Function} scm_sys_initialize_object (obj, initargs)
560  Initialize the object @var{obj} with the given arguments  Initialize the object @var{obj} with the given arguments
561  @var{initargs}.  @var{initargs}.
562  @end deffn  @end deffn
563    
564  @deffn primitive make . args  @deffn {Scheme Procedure} make . args
565    @deffnx {C Function} scm_make (args)
566  Make a new object.  @var{args} must contain the class and  Make a new object.  @var{args} must contain the class and
567  all necessary initialization information.  all necessary initialization information.
568  @end deffn  @end deffn
569    
570  @deffn primitive slot-ref obj slot_name  @deffn {Scheme Procedure} slot-ref obj slot_name
571    @deffnx {C Function} scm_slot_ref (obj, slot_name)
572  Return the value from @var{obj}'s slot with the name  Return the value from @var{obj}'s slot with the name
573  @var{slot_name}.  @var{slot_name}.
574  @end deffn  @end deffn
575    
576  @deffn primitive builtin-bindings  @deffn {Scheme Procedure} builtin-bindings
577  Create and return a copy of the global symbol table, removing all  Create and return a copy of the global symbol table, removing all
578  unbound symbols.  unbound symbols.
579  @end deffn  @end deffn
580    
581  @deffn primitive %tag-body body  @deffn {Scheme Procedure} %tag-body body
582    @deffnx {C Function} scm_sys_tag_body (body)
583  Internal GOOPS magic---don't use this function!  Internal GOOPS magic---don't use this function!
584  @end deffn  @end deffn
585    
586  @deffn primitive list*  @deffn {Scheme Procedure} list*
587  implemented by the C function "scm_cons_star"  implemented by the C function "scm_cons_star"
588  @end deffn  @end deffn
589    
590  @deffn primitive set-current-module module  @deffn {Scheme Procedure} set-current-module module
591    @deffnx {C Function} scm_set_current_module (module)
592  Set the current module to @var{module} and return  Set the current module to @var{module} and return
593  the previous current module.  the previous current module.
594  @end deffn  @end deffn
595    
596  @deffn primitive current-module  @deffn {Scheme Procedure} current-module
597    @deffnx {C Function} scm_current_module ()
598  Return the current module.  Return the current module.
599  @end deffn  @end deffn
600    
601  @deffn primitive c-clear-registered-modules  @deffn {Scheme Procedure} c-clear-registered-modules
602    @deffnx {C Function} scm_clear_registered_modules ()
603  Destroy the list of modules registered with the current Guile process.  Destroy the list of modules registered with the current Guile process.
604  The return value is unspecified.  @strong{Warning:} this function does  The return value is unspecified.  @strong{Warning:} this function does
605  not actually unlink or deallocate these modules, but only destroys the  not actually unlink or deallocate these modules, but only destroys the
# Line 526  records of which modules have been loade Line 607  records of which modules have been loade
607  only by module bookkeeping operations.  only by module bookkeeping operations.
608  @end deffn  @end deffn
609    
610  @deffn primitive c-registered-modules  @deffn {Scheme Procedure} c-registered-modules
611    @deffnx {C Function} scm_registered_modules ()
612  Return a list of the object code modules that have been imported into  Return a list of the object code modules that have been imported into
613  the current Guile process.  Each element of the list is a pair whose  the current Guile process.  Each element of the list is a pair whose
614  car is the name of the module, and whose cdr is the function handle  car is the name of the module, and whose cdr is the function handle
# Line 534  for that module's initializer function. Line 616  for that module's initializer function.
616  has been passed to scm_register_module_xxx.  has been passed to scm_register_module_xxx.
617  @end deffn  @end deffn
618    
619  @deffn primitive include-deprecated-features  @deffn {Scheme Procedure} include-deprecated-features
620  Return @code{#t} iff deprecated features should be included  Return @code{#t} iff deprecated features should be included
621  in public interfaces.  in public interfaces.
622  @end deffn  @end deffn
623    
624  @deffn primitive issue-deprecation-warning . msgs  @deffn {Scheme Procedure} issue-deprecation-warning . msgs
625  Output @var{msgs} to @code{(current-error-port)} when this  Output @var{msgs} to @code{(current-error-port)} when this
626  is the first call to @code{issue-deprecation-warning} with  is the first call to @code{issue-deprecation-warning} with
627  this specific @var{msg}.  Do nothing otherwise.  this specific @var{msg}.  Do nothing otherwise.
# Line 547  The argument @var{msgs} should be a list Line 629  The argument @var{msgs} should be a list
629  they are printed in turn, each one followed by a newline.  they are printed in turn, each one followed by a newline.
630  @end deffn  @end deffn
631    
632  @deffn primitive variable-set-name-hint! var hint  @deffn {Scheme Procedure} variable-set-name-hint! var hint
633    @deffnx {C Function} scm_variable_set_name_hint (var, hint)
634  Do not use this function.  Do not use this function.
635  @end deffn  @end deffn
636    
637  @deffn primitive valid-object-procedure? proc  @deffn {Scheme Procedure} valid-object-procedure? proc
638    @deffnx {C Function} scm_valid_object_procedure_p (proc)
639  Return @code{#t} iff @var{proc} is a procedure that can be used with @code{set-object-procedure}.  It is always valid to use a closure constructed by @code{lambda}.  Return @code{#t} iff @var{proc} is a procedure that can be used with @code{set-object-procedure}.  It is always valid to use a closure constructed by @code{lambda}.
640  @end deffn  @end deffn
641    
642  @deffn primitive %get-pre-modules-obarray  @deffn {Scheme Procedure} %get-pre-modules-obarray
643    @deffnx {C Function} scm_get_pre_modules_obarray ()
644  Return the obarray that is used for all new bindings before the module system is booted.  The first call to @code{set-current-module} will boot the module system.  Return the obarray that is used for all new bindings before the module system is booted.  The first call to @code{set-current-module} will boot the module system.
645  @end deffn  @end deffn
646    
647  @deffn primitive standard-interface-eval-closure module  @deffn {Scheme Procedure} standard-interface-eval-closure module
648    @deffnx {C Function} scm_standard_interface_eval_closure (module)
649  Return a interface eval closure for the module @var{module}. Such a closure does not allow new bindings to be added.  Return a interface eval closure for the module @var{module}. Such a closure does not allow new bindings to be added.
650  @end deffn  @end deffn
651    
652  @deffn primitive env-module env  @deffn {Scheme Procedure} env-module env
653    @deffnx {C Function} scm_env_module (env)
654  Return the module of @var{ENV}, a lexical environment.  Return the module of @var{ENV}, a lexical environment.
655  @end deffn  @end deffn
656    
657  @deffn primitive load-extension lib init  @deffn {Scheme Procedure} load-extension lib init
658    @deffnx {C Function} scm_load_extension (lib, init)
659  Load and initialize the extension designated by LIB and INIT.  Load and initialize the extension designated by LIB and INIT.
660  When there is no pre-registered function for LIB/INIT, this is  When there is no pre-registered function for LIB/INIT, this is
661  equivalent to  equivalent to
# Line 603  well.  For example, Line 691  well.  For example,
691  (load-extension "libguile-bla-blum" "bla_init_blum")  (load-extension "libguile-bla-blum" "bla_init_blum")
692  @end lisp  @end lisp
693  @end deffn  @end deffn
694    
695    @deffn {Scheme Procedure} single-active-thread?
696    implemented by the C function "scm_single_thread_p"
697    @end deffn
698    
699    @deffn {Scheme Procedure} substring-move-right!
700    implemented by the C function "scm_substring_move_x"
701    @end deffn
702    
703    @deffn {Scheme Procedure} substring-move-left!
704    implemented by the C function "scm_substring_move_x"
705    @end deffn

Legend:
Removed from v.1.1.2.3  
changed lines
  Added in v.1.1.2.4

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