diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2011-03-20 13:15:11 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2011-03-20 13:15:11 -0400 |
| commit | b656abc33d2a0235ebf53097be398b04df17e2b6 (patch) | |
| tree | c3caa153c1a6ee83a7deb3e7f4212562f498d460 /src/cjr_print.sml | |
| parent | 58031fc2c166e3909f13825e6d10d73547193417 (diff) | |
Fix C compilation of empty records; use DESTDIR in 'make install/uninstall'
Diffstat (limited to 'src/cjr_print.sml')
| -rw-r--r-- | src/cjr_print.sml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/cjr_print.sml b/src/cjr_print.sml index a41ba0d2..d6c0db98 100644 --- a/src/cjr_print.sml +++ b/src/cjr_print.sml @@ -249,6 +249,7 @@ fun p_patMatch (env, disc) (p, loc) = p] end + | PRecord [] => string "1" | PRecord xps => p_list_sep (box [space, string "&&", space]) (fn (x, p, _) => p_patMatch (env, disc ^ ".__uwf_" ^ ident x) p) xps |