1 files changed, 12 insertions, 0 deletions
diff --git a/recompile.e b/recompile.e
new file mode 100644
index 0000000..c6a6f7a
--- /dev/null
+++ b/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