diff options
| author | Bad Diode <bd@badd10de.dev> | 2021-10-13 17:18:31 +0200 |
|---|---|---|
| committer | Bad Diode <bd@badd10de.dev> | 2021-10-13 17:18:31 +0200 |
| commit | e068d45199bb23452821727e5b82a2307ae0256d (patch) | |
| tree | 3ea7c52adda766e4732306c0fa0787e0244edc15 /examples | |
| parent | ed1f406102738812fafa5e49ee131fe06c177687 (diff) | |
| download | bdl-e068d45199bb23452821727e5b82a2307ae0256d.tar.gz bdl-e068d45199bb23452821727e5b82a2307ae0256d.zip | |
Add eq? primitive procedure
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/types.bdl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/types.bdl b/examples/types.bdl index 36dab7a..22ffdce 100644 --- a/examples/types.bdl +++ b/examples/types.bdl | |||
| @@ -39,7 +39,7 @@ | |||
| 39 | (print "(fixnum? (+ 1 2 3)) -> ") (fixnum? (+ 1 2 3)) | 39 | (print "(fixnum? (+ 1 2 3)) -> ") (fixnum? (+ 1 2 3)) |
| 40 | (print "(fixnum? (not 1)) -> ") (fixnum? (not 1)) | 40 | (print "(fixnum? (not 1)) -> ") (fixnum? (not 1)) |
| 41 | 41 | ||
| 42 | ;; Symbol | 42 | ;; Symbol. |
| 43 | (print "(symbol? true) -> ") (symbol? true) | 43 | (print "(symbol? true) -> ") (symbol? true) |
| 44 | (print "(symbol? false) -> ") (symbol? false) | 44 | (print "(symbol? false) -> ") (symbol? false) |
| 45 | (print "(symbol? 1) -> ") (symbol? 1) | 45 | (print "(symbol? 1) -> ") (symbol? 1) |