Unified · Split
| @@ -1,5 +1,6 @@ | ||
| 1 | −;; code generation state, constant tables, bytecode encoding | |
| 1 | +;;;; built-in compiler | |
| 2 | 2 | |
| 3 | +;; code generation state, constant tables, bytecode encoding | |
| 3 | 4 | (def (make-code-emitter) (vec NIL (table) 0 NIL 0)) |
| 4 | 5 | (defmacro (bcode:code b) `(aref ,b 0)) |
| 5 | 6 | (defmacro (bcode:ctable b) `(aref ,b 1)) |
| @@ -1,7 +1,4 @@ | ||
| 1 | − | |
| 2 | −; StreetLISP standard library | |
| 3 | −; by Jeff Bezanson (C) 2009 | |
| 4 | −; Distributed under the BSD License | |
| 1 | +;;;; standard library | |
| 5 | 2 | |
| 6 | 3 | ;;; void |
| 7 | 4 | |