kanaka/mal
1
1
Fork 0
mirror of https://github.com/kanaka/mal.git synced 2024-09-11 13:55:55 +03:00
Code Issues Projects Releases Wiki Activity

make rep handle mal exceptions

Browse Source
This commit is contained in:
Fabian 2021-04-05 19:43:19 +02:00 committed by Joel Martin
parent e9cd0923c2
commit a8d4e41be6
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
impls/sml/step9_try.sml
View File

@ -99,6 +99,7 @@ fun rep e s =
| SyntaxError msg => "SYNTAX ERROR: " ^ msg
| NotApplicable msg => "CANNOT APPLY: " ^ msg
| NotDefined msg => "NOT DEFINED: " ^ msg
| MalException e => "ERROR: " ^ (prStr e)
| e => "ERROR: " ^ (exnMessage e)
val initEnv = ENV (NS (ref [])) |> bind coreNs