summaryrefslogtreecommitdiff
path: root/Jennisys/Printer.fs
diff options
context:
space:
mode:
Diffstat (limited to 'Jennisys/Printer.fs')
-rw-r--r--Jennisys/Printer.fs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Jennisys/Printer.fs b/Jennisys/Printer.fs
index 53bf6b6d..54d0dc43 100644
--- a/Jennisys/Printer.fs
+++ b/Jennisys/Printer.fs
@@ -36,6 +36,7 @@ let rec PrintExpr ctx expr =
match expr with
| IntLiteral(n) -> sprintf "%d" n
| BoolLiteral(b) -> sprintf "%b" b
+ | VarLiteral(id)
| IdLiteral(id) -> id
| Star -> "*"
| Dot(e,id) -> sprintf "%s.%s" (PrintExpr 100 e) id