From ecc350ca5c2eb50be8309c5f14f8bf0d87db9a02 Mon Sep 17 00:00:00 2001 From: Moon Flower Date: Mon, 12 Oct 2026 08:46:23 +0330 Subject: a --- docs/history/07-zygote/code/repl.s | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 docs/history/07-zygote/code/repl.s (limited to 'docs/history/07-zygote/code/repl.s') diff --git a/docs/history/07-zygote/code/repl.s b/docs/history/07-zygote/code/repl.s new file mode 100644 index 0000000..35ab7d4 --- /dev/null +++ b/docs/history/07-zygote/code/repl.s @@ -0,0 +1,11 @@ +:;teach_the_resident_assembler_that_p_means_out +112 48009 @ 12 + ! +:;each_backtick-separated_chunk_of_input_is_assembled_at_40000_and_called +:nx ? rd0 z q +:rd0 30000 ptr ! +:rd ? ch z go j +:ch , 0 $ 96 - eos z ptr @ ! ptr @ 1 + ptr ! rd j +:eos _ +:go 0 ptr @ ! 30000 48004 @ ! 40000 48005 @ ! 40000 48006 @ ! 41000 48007 @ ! 48002 c + 40000 c nx j +:ptr #0 -- cgit v1.2.3