From e889b122cee2eb60cd1577c22560c8918b30d749 Mon Sep 17 00:00:00 2001 From: Irene Knapp Date: Mon, 5 Oct 2026 01:58:58 -0700 Subject: move around a bunch of the files that aren't actually in use to better describe their status Force-Push: yes Change-Id: If5ef70b7872700ff36ef07f20aac1f3b991dff45 --- experiments/recompile.e | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 experiments/recompile.e (limited to 'experiments/recompile.e') diff --git a/experiments/recompile.e b/experiments/recompile.e new file mode 100644 index 0000000..c6a6f7a --- /dev/null +++ b/experiments/recompile.e @@ -0,0 +1,12 @@ +~ (entry pointer --) +: recompile + dup word-heading + dup guess-entry-end swap entry-to-execution-token 8 + + { 2dup < } + { space dup @ dup is-codeword + { execution-token-to-entry entry-to-name emitstring } + { . } if-else + 8 + } while newline ; + +' , recompile +bye -- cgit 1.4.1