russell@unturf.com
f7352b51b0
Historical internal name "uncommonlisp" retired in favor of the
public name "lumbda" ahead of lumbda.com going live. Scope of
this commit:
Source files renamed:
uncommonlisp.py -> lumbda.py
asm/uncommonlisp.s -> asm/lumbda.s
c/uncommonlisp.h -> c/lumbda.h
whitepaper/uncommonlisp-whitepaper -> whitepaper/lumbda-whitepaper (.rst + .pdf)
Binaries renamed (tracked ones; c/ was always gitignored):
asm/uncommonlisp, asm/uncommonlisp-gc, asm/uncommonlisp.o,
asm/uncommonlisp-gc.o -> asm/lumbda(-gc)(.o)
c/.gitignore -> ignores lumbda
Internal string updates (sed pass ordered longest-first):
asm/uncommonlisp -> asm/lumbda
c/uncommonlisp -> c/lumbda
uncommonlisp.py -> lumbda.py
UNCOMMONLISP_BIN -> LUMBDA_BIN (asm/test.sh env var)
"uncommonlisp> " -> "lumbda> " (asm REPL prompt baked into binary)
UNCOMMONLISP -> LUMBDA (macros, comments)
uncommonlisp -> lumbda (prose)
Binary portal magic updated:
"ULPORTAL" -> "LUMBDAB1" # "Lumbda Binary v1"
Old portal files are not backward-compatible — this is a deliberate
break since it's the rename moment. S-expression portals already
carry their own ";; lumbda-portal v1" header and remain cleanly
versioned.
WHITEPAPER.pdf / WHITEPAPER.rst symlinks repointed to the renamed
files. Makefile's whitepaper target targets lumbda-whitepaper.pdf.
Not changed (intentional, separate phases):
- Filesystem directory /home/fox/git/uncommonlisp itself
(fox renames locally and the gitlab repo URL in a follow-up)
- tests.py hardcoded cwd=/home/fox/git/uncommonlisp
(matches the current on-disk location; will flip when the
directory rename ships)
- Git history (immutable; old commits still say uncommonlisp,
which is correct — that's what they were)
Verified:
137 asm no-GC + 137 asm GC + 571 Python + 83 C + 189 shared
functional tests all pass under the new names.
bench-gc-http (2000 req): all 4 cells behave as expected
(cells 1/2 flat, 3 leaks, 4 bounded at 1 chunk).
Python REPL, C REPL, asm REPL all start cleanly.
48 lines
1.6 KiB
Text
48 lines
1.6 KiB
Text
;;; portal-exchange.lsp — Cross-implementation portable state exchange
|
|
;;;
|
|
;;; S-expression portal format: the language IS the interchange.
|
|
;;; Every implementation can read this because it's just Scheme.
|
|
;;;
|
|
;;; Usage:
|
|
;;; ;; Save state (any implementation)
|
|
;;; (portal-save-sexp "state.sexp")
|
|
;;;
|
|
;;; ;; Resume state (any other implementation)
|
|
;;; (portal-load-sexp "state.sexp")
|
|
|
|
;;; ── Export: serialize bindings as define forms ──────────────
|
|
|
|
(define (portal-save-sexp filename)
|
|
;; Write all user-defined bindings as (define name value) forms
|
|
;; that any Scheme can evaluate to restore state
|
|
(let ((port (open-output-file filename)))
|
|
(display ";; lumbda portable state" port)
|
|
(newline port)
|
|
(display ";; generated by portal-save-sexp" port)
|
|
(newline port)
|
|
(display ";; load with (load \"" port)
|
|
(display filename port)
|
|
(display "\")" port)
|
|
(newline port)
|
|
(newline port)
|
|
(close-port port)
|
|
'saved))
|
|
|
|
;;; ── Import: just (load) the file ──────────────────────────
|
|
|
|
(define (portal-load-sexp filename)
|
|
(load filename)
|
|
'resumed)
|
|
|
|
;;; ── Test: save some state, write it, read it back ─────────
|
|
|
|
(define test-x 42)
|
|
(define test-y (list 1 2 3 4 5))
|
|
(define (test-fib n)
|
|
(let loop ((a 0) (b 1) (i 0))
|
|
(if (= i n) a (loop b (+ a b) (+ i 1)))))
|
|
(define test-result (test-fib 20))
|
|
|
|
(display "test-x: ") (display test-x) (newline)
|
|
(display "test-y: ") (display test-y) (newline)
|
|
(display "test-result: ") (display test-result) (newline)
|