mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-30 20:00:19 +02:00
48 lines
1.2 KiB
Text
48 lines
1.2 KiB
Text
@page
|
|
@node Translation
|
|
@chapter Support for Translating Other Languages
|
|
|
|
[Describe translation framework.]
|
|
|
|
@menu
|
|
* Emacs Lisp Support:: Helper primitives for Emacs Lisp.
|
|
@end menu
|
|
|
|
|
|
@node Emacs Lisp Support
|
|
@section Emacs Lisp Support
|
|
|
|
@deffn {Scheme Procedure} nil-car x
|
|
@deffnx {C Function} scm_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
|
|
|
|
@deffn {Scheme Procedure} nil-cdr x
|
|
@deffnx {C Function} scm_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
|
|
|
|
@deffn {Scheme Procedure} nil-cons x y
|
|
@deffnx {C Function} scm_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
|
|
|
|
@deffn {Scheme Procedure} nil-eq x y
|
|
Compare @var{x} and @var{y} and return Lisp's t if they are
|
|
@code{eq?}, return Lisp's nil otherwise.
|
|
@end deffn
|
|
|
|
@deffn {Scheme Procedure} null x
|
|
@deffnx {C Function} scm_null (x)
|
|
Return Lisp's @code{t} if @var{x} is nil in the LISP sense,
|
|
return Lisp's nil otherwise.
|
|
@end deffn
|
|
|
|
|
|
@c Local Variables:
|
|
@c TeX-master: "guile.texi"
|
|
@c End:
|