diff options
Diffstat (limited to 'apps')
-rw-r--r-- | apps/browse/main.mu | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/apps/browse/main.mu b/apps/browse/main.mu index dca84559..3736c1f4 100644 --- a/apps/browse/main.mu +++ b/apps/browse/main.mu @@ -27,6 +27,7 @@ fn main args-on-stack: (addr array addr array byte) -> exit-status/ebx: int { } fn interactive args: (addr array addr array byte) -> exit-status/ebx: int { +$interactive:body: { # initialize fs from args[1] var filename/eax: (addr array byte) <- first-arg args var file-storage: (handle buffered-file) @@ -34,6 +35,14 @@ fn interactive args: (addr array addr array byte) -> exit-status/ebx: int { open filename, 0, file-storage-addr var _fs/eax: (addr buffered-file) <- lookup file-storage var fs/esi: (addr buffered-file) <- copy _fs + # if no file, exit + { + compare fs, 0 + break-if-!= + print-string-to-real-screen "file not found\n" + exit-status <- copy 1 + break $interactive:body + } # enable-screen-grid-mode enable-keyboard-immediate-mode @@ -53,6 +62,7 @@ fn interactive args: (addr array addr array byte) -> exit-status/ebx: int { enable-screen-type-mode exit-status <- copy 0 } +} fn render screen: (addr paginated-screen), fs: (addr buffered-file) { start-drawing screen |