diff src/source_print.sml @ 58:fd8a81ecd598

include
author Adam Chlipala <adamc@hcoop.net>
date Sun, 22 Jun 2008 18:17:21 -0400
parents 0a5c312de09a
children abb2b32c19fb
line wrap: on
line diff
--- a/src/source_print.sml	Sun Jun 22 15:23:16 2008 -0400
+++ b/src/source_print.sml	Sun Jun 22 18:17:21 2008 -0400
@@ -238,6 +238,9 @@
                                 string ":",
                                 space,
                                 p_sgn sgn]
+      | SgiInclude sgn => box [string "include",
+                               space,
+                               p_sgn sgn]
 
 and p_sgn (sgn, _) =
     case sgn of