Commit | Line | Data |
---|---|---|
a0e07ba4 NJ |
1 | @page |
2 | @node Translation | |
3 | @chapter Support for Translating Other Languages | |
4 | ||
5 | [Describe translation framework.] | |
6 | ||
7 | @menu | |
8 | * Emacs Lisp Support:: Helper primitives for Emacs Lisp. | |
9 | @end menu | |
10 | ||
11 | ||
12 | @node Emacs Lisp Support | |
13 | @section Emacs Lisp Support | |
14 | ||
8f85c0c6 NJ |
15 | @deffn {Scheme Procedure} nil-car x |
16 | @deffnx {C Function} scm_nil_car (x) | |
a0e07ba4 NJ |
17 | Return the car of @var{x}, but convert it to LISP nil if it |
18 | is Scheme's end-of-list. | |
19 | @end deffn | |
20 | ||
8f85c0c6 NJ |
21 | @deffn {Scheme Procedure} nil-cdr x |
22 | @deffnx {C Function} scm_nil_cdr (x) | |
a0e07ba4 NJ |
23 | Return the cdr of @var{x}, but convert it to LISP nil if it |
24 | is Scheme's end-of-list. | |
25 | @end deffn | |
26 | ||
8f85c0c6 NJ |
27 | @deffn {Scheme Procedure} nil-cons x y |
28 | @deffnx {C Function} scm_nil_cons (x, y) | |
a0e07ba4 NJ |
29 | Create a new cons cell with @var{x} as the car and @var{y} as |
30 | the cdr, but convert @var{y} to Scheme's end-of-list if it is | |
31 | a LISP nil. | |
32 | @end deffn | |
33 | ||
8f85c0c6 | 34 | @deffn {Scheme Procedure} nil-eq x y |
85a9b4ed TTN |
35 | Compare @var{x} and @var{y} and return Lisp's t if they are |
36 | @code{eq?}, return Lisp's nil otherwise. | |
a0e07ba4 NJ |
37 | @end deffn |
38 | ||
8f85c0c6 NJ |
39 | @deffn {Scheme Procedure} null x |
40 | @deffnx {C Function} scm_null (x) | |
85a9b4ed TTN |
41 | Return Lisp's @code{t} if @var{x} is nil in the LISP sense, |
42 | return Lisp's nil otherwise. | |
a0e07ba4 NJ |
43 | @end deffn |
44 | ||
45 | ||
46 | @c Local Variables: | |
47 | @c TeX-master: "guile.texi" | |
48 | @c End: |