diff options
| -rw-r--r-- | shell/main.mu | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/shell/main.mu b/shell/main.mu index 5f9f919e..831c7f09 100644 --- a/shell/main.mu +++ b/shell/main.mu @@ -43,6 +43,13 @@ fn load-sandbox data-disk: (addr disk), _self: (addr sandbox) { var initial-root/ecx: (addr handle cell) <- address initial-root-storage read-cell data, initial-root, 0/no-trace clear-gap-buffer data + # + { + var initial-root-addr/eax: (addr cell) <- lookup *initial-root + compare initial-root-addr, 0 + break-if-!= + return + } # print: cell -> stream print-cell initial-root, s, 0/no-trace # stream -> gap-buffer |