diff options
Diffstat (limited to 'src/jscomp.sml')
-rw-r--r-- | src/jscomp.sml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/jscomp.sml b/src/jscomp.sml index 7d9ee955..1f5d669a 100644 --- a/src/jscomp.sml +++ b/src/jscomp.sml @@ -690,7 +690,7 @@ fun process file = val (e, st) = jsE inner (e, st) in - (strcat [str ("{c:\"f\",f:" ^ name ^ ",:a:cons("), + (strcat [str ("{c:\"f\",f:" ^ name ^ ",a:cons("), e, str ",null)}"], st) @@ -728,7 +728,7 @@ fun process file = let val (e, st) = jsE inner (e, st) in - (strcat [str ("cons({n:\"" ^ x ^ ",v:"), + (strcat [str ("cons({n:\"" ^ x ^ "\",v:"), e, str "},", es, |