diff options
| author | Scott Lawrence <scott+git@ineffectivetheory.com> | 2024-06-26 21:16:48 -0700 |
|---|---|---|
| committer | Scott Lawrence <scott+git@ineffectivetheory.com> | 2024-06-26 21:16:48 -0700 |
| commit | ede8966c44cca6854012078329482a70235a19ce (patch) | |
| tree | 3e6629114cc11037a6364b30e6c63c402d3ccca6 /bin/main.ml | |
| parent | a4c197dea1a0192b93e205daf8738f99a4f039b2 (diff) | |
| download | agate-ede8966c44cca6854012078329482a70235a19ce.tar.gz agate-ede8966c44cca6854012078329482a70235a19ce.tar.bz2 agate-ede8966c44cca6854012078329482a70235a19ce.zip | |
Diffstat (limited to 'bin/main.ml')
| -rw-r--r-- | bin/main.ml | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/bin/main.ml b/bin/main.ml deleted file mode 100644 index bb0d6ac..0000000 --- a/bin/main.ml +++ /dev/null @@ -1,17 +0,0 @@ -type interpreter = { - stack : int list -} - -type token = Word of string - -let tokenize line : token list = - String.split_on_char ' ' line |> List.map (fun s -> Word s) - -let parse line = - let _tokens = tokenize line in - () - -let () = - let line = input_line stdin |> parse in - print_string "HI" |> print_newline - |