Skip to content

Commit 56f196d

Browse files
committed
Fix compile-literals bug.
1 parent a61b633 commit 56f196d

1 file changed

Lines changed: 2 additions & 0 deletions

File tree

langs/outlaw/compile-literals.rkt

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -81,6 +81,8 @@
8181
(append-map literals-e cs)]
8282
[(Match e ps es)
8383
(append (literals-e e) (append-map literals-match-clause ps es))]
84+
[(Apply e es el)
85+
(append (literals-e e) (append-map literals-e es) (literals-e el))]
8486
[_ '()]))
8587

8688
;; Pat Expr -> [Listof Symbol]

0 commit comments

Comments
 (0)