From: Michael D. Lowis <mike@mdlowis.com>
Date: Sun, 23 Nov 2014 02:25:50 +0000 (-0500)
Subject: Corrected dumpw handling of embedded literals
X-Git-Url: https://git.mdlowis.com/?a=commitdiff_plain;h=d2c128bea6b1c55e4582fea4a5b0efa9d7e37774;p=projs%2Fonward.git

Corrected dumpw handling of embedded literals
---

diff --git a/source/main.c b/source/main.c
index 14565f7..f30ca5e 100755
--- a/source/main.c
+++ b/source/main.c
@@ -19,8 +19,11 @@ defcode("dumpw", dumpw, LATEST_BUILTIN, 0u) {
         printf("code:");
         word_t** code = (word_t**)word->code;
         while(*code) {
-            printf("\t%s\n", (*code)->name);
+            printf("\t%s", (*code)->name);
+            if (*code == &lit)
+                printf(" %zd", (intptr_t)*(++code));
             code++;
+            puts("");
         }
         printf("\tret\n");
     }