1 files changed, 26 insertions, 0 deletions
diff --git a/inscribe-hex.e b/inscribe-hex.e
new file mode 100644
index 0000000..7d9aafa
--- /dev/null
+++ b/inscribe-hex.e
@@ -0,0 +1,26 @@
+: prepare
+  here @ dup
+  s" core.e" pack-file-contents
+  s" linux.e" pack-file-contents
+  s" output.e" pack-file-contents
+  s" amd64.e" pack-file-contents
+  s" execution-support.e" pack-file-contents
+  s" log-load.e" pack-file-contents
+  s" dynamic.e" pack-file-contents
+  s" input.e" pack-file-contents
+  s" interpret.e" pack-file-contents
+  s" flow-control.e" pack-file-contents
+  s" linux-dynamic.e" pack-file-contents
+  s" labels.e" pack-file-contents
+  s" elf.e" pack-file-contents
+  s" hex.e" pack-file-contents
+  8 packalign here !
+  s" hex-source" variable
+
+  1024 1024 * allocate s" hex-binary" variable
+  1024 1024 * allocate s" hex-metadata" variable ;
+
+prepare
+hex-metadata hex-binary dup hex-source hex-transform
+bye
+