56 lines
677 B
Plaintext
56 lines
677 B
Plaintext
;; Atom String Table
|
|
; t
|
|
116
|
|
; quote
|
|
113 117 111 116 101
|
|
; +
|
|
43
|
|
; -
|
|
45
|
|
; *
|
|
42
|
|
; /
|
|
47
|
|
; %
|
|
37
|
|
; <
|
|
60
|
|
; =
|
|
61
|
|
; car
|
|
99 97 114
|
|
; cdr
|
|
99 100 114
|
|
; not
|
|
100 111 116
|
|
; lambda
|
|
108 97 109 98 100 97
|
|
;define
|
|
100 101 102 105 100 101
|
|
; eval
|
|
101 118 97 108
|
|
; if
|
|
105 102
|
|
; let
|
|
108 101 116
|
|
; let*
|
|
108 101 116 42
|
|
; str-len
|
|
115 116 114 45 108 101 100
|
|
; list-len
|
|
108 105 115 116 45 108 101 100
|
|
; str-parts
|
|
115 116 114 45 112 97 114 116 115
|
|
; syscall
|
|
115 121 115 99 97 108 108
|
|
; print-env
|
|
112 114 105 100 116 45 101 100 118
|
|
; \Space
|
|
92 83 112 97 99 101
|
|
; \NL
|
|
92 78 76
|
|
; \Tab
|
|
92 84 97 98
|
|
;; Atom Table
|
|
; ref-count| length | pointer to string |
|
|
01 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 |