diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-07-31 10:06:27 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-07-31 10:06:27 -0400 |
| commit | f4351288c5b57b130c0a75e5e84a445ca513527f (patch) | |
| tree | c0e69cdf2d843fbf3c5d2853ce2effe487090970 /src/source_print.sml | |
| parent | aa1b3a24913edd0dc97af0d1fc9e3dc0026a2460 (diff) | |
Elaborating some basic pattern matching
Diffstat (limited to 'src/source_print.sml')
| -rw-r--r-- | src/source_print.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/source_print.sml b/src/source_print.sml index 79f3c254..4bd7e28e 100644 --- a/src/source_print.sml +++ b/src/source_print.sml @@ -252,7 +252,7 @@ fun p_exp' par (e, _) = | ECase (e, pes) => parenIf par (box [string "case", space, - p_exp' false e, + p_exp e, space, string "of", space, |