Commit | Line | Data |
---|---|---|
38a93523 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 | ||
15 | @c docstring begin (texi-doc-string "guile" "nil-car") | |
16 | @deffn primitive nil-car x | |
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 | ||
21 | @c docstring begin (texi-doc-string "guile" "nil-cdr") | |
22 | @deffn primitive nil-cdr x | |
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 | ||
27 | @c docstring begin (texi-doc-string "guile" "nil-cons") | |
28 | @deffn primitive nil-cons x y | |
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 | ||
34 | @c docstring begin (texi-doc-string "guile" "nil-eq") | |
35 | @deffn primitive nil-eq x y | |
36 | Compare @var{x} and @var{y} and return LISP's t if they are | |
37 | @code{eq?}, return LISP's nil otherwise. | |
38 | @end deffn | |
39 | ||
40 | @c docstring begin (texi-doc-string "guile" "null") | |
41 | @deffn primitive null x | |
42 | Return LISP's @code{t} if @var{x} is nil in the LISP sense, | |
43 | return LISP's nil otherwise. | |
44 | @end deffn | |
45 | ||
46 | ||
47 | @c Local Variables: | |
48 | @c TeX-master: "guile.texi" | |
49 | @c End: |