From 3232399b3893f93678a2d1a519bd0d4011275dba Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sat, 9 Aug 2008 16:54:04 -0400
Subject: Re-consistent-ify naming of union members

---
 src/cjr_print.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/cjr_print.sml')

diff --git a/src/cjr_print.sml b/src/cjr_print.sml
index 4b173aa1..6d115fd1 100644
--- a/src/cjr_print.sml
+++ b/src/cjr_print.sml
@@ -853,7 +853,7 @@ fun p_file env (ds, ps) =
                                  newline,
                                  case to of
                                      NONE => box []
-                                   | SOME t => box [string "tmp->data.__lwc_",
+                                   | SOME t => box [string "tmp->data.lw_",
                                                     string x',
                                                     space,
                                                     string "=",
-- 
cgit v1.2.3