diff options
Diffstat (limited to 'src/mono_print.sml')
| -rw-r--r-- | src/mono_print.sml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/mono_print.sml b/src/mono_print.sml index a5e795b2..d1f5fc27 100644 --- a/src/mono_print.sml +++ b/src/mono_print.sml @@ -334,9 +334,9 @@ fun p_exp' par env (e, _) = space, p_exp env e2, string ")"] - | EUnurlify (e, _) => box [string "unurlify(", - p_exp env e, - string ")"] + | EUnurlify (e, _, _) => box [string "unurlify(", + p_exp env e, + string ")"] | EJavaScript (m, e) => box [string "JavaScript(", p_mode env m, string ",", |