diff options
author | Adam Chlipala <adamc@hcoop.net> | 2008-10-21 16:41:11 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2008-10-21 16:41:11 -0400 |
commit | 1a5acb4732536e4be288895eb89d139b19aebc94 (patch) | |
tree | e4856ac916556022e401a21e2ff722af1b472aa1 /src/source_print.sml | |
parent | a3418cf924752accf2f68fc2673da2a661276ae5 (diff) |
New implicit argument handling
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 324b50d5..f9fc8a53 100644 --- a/src/source_print.sml +++ b/src/source_print.sml @@ -199,7 +199,7 @@ fun p_exp' par (e, _) = string ")"] | EPrim p => Prim.p_t p - | EVar (ss, s) => p_list_sep (string ".") string (ss @ [s]) + | EVar (ss, s, _) => p_list_sep (string ".") string (ss @ [s]) | EApp (e1, e2) => parenIf par (box [p_exp e1, space, p_exp' true e2]) |