aboutsummaryrefslogtreecommitdiff
path: root/miniMAL/printer.json
diff options
context:
space:
mode:
Diffstat (limited to 'miniMAL/printer.json')
-rw-r--r--miniMAL/printer.json8
1 files changed, 7 insertions, 1 deletions
diff --git a/miniMAL/printer.json b/miniMAL/printer.json
index 8029413..df2ac82 100644
--- a/miniMAL/printer.json
+++ b/miniMAL/printer.json
@@ -28,7 +28,13 @@
["`", "false"],
["if", ["symbol?", "exp"],
["get", "exp", ["`", "val"]],
- ["str", ["`", "#<unknown: "], "exp", ["`", ">"]]]]]]]]]]],
+ ["if", ["malfunc?", "exp"],
+ ["str", ["`", "(fn* "],
+ ["pr-str", ["get", "exp", ["`", "params"]]],
+ ["`", " "],
+ ["pr-str", ["get", "exp", ["`", "ast"]]],
+ ["`", ")"]],
+ ["str", ["`", "#<unknown: "], "exp", ["`", ">"]]]]]]]]]]]],
["def", "pr-list", ["fn", ["lst", "print_readably", "sep"],
[".", ["map", ["fn", ["s"], ["pr-str", "s", "print_readably"]], "lst"],