[sort enumerated partial apps so they are contiguous, get rid of need for -fno-strict-aliasing with gcc annotations
John Meacham <john@repetae.net>**20070228052426] hunk ./C/FromGrin2.hs 86
-    enum_tag_t = text "enum {" $$ nest 4 (P.vcat (punctuate P.comma $ map (uncurry g) (Map.toList wenum) ++ (zipWith f (Set.toList ts) [0 ..]))) $$ text "};" where
-        f t n = tshow (nodeTagName t) <> text " = " <> tshow (n :: Int)
-        g t n = tshow t <> text " = " <> tshow (n :: Int)
+    enum_tag_t = text "enum {" $$ nest 4 (P.vcat (punctuate P.comma $ map (uncurry f) (Map.toList wenum) ++ (zipWith f (Set.toList (Set.map nodeTagName ts)) [0 ..]))) $$ text "};" where
+        f t n = tshow t <> text " = " <> tshow (n :: Int)
hunk ./Main.hs 805
-        comm = shellQuote $ [optCC options, "-std=gnu99", "-D_GNU_SOURCE", "-falign-functions=4", "-fno-strict-aliasing", "-ffast-math", "-Wall", "-o", fn, cf ] ++ (map ("-l" ++) rls) ++ debug ++ optCCargs options  ++ boehmOpts ++ profileOpts
+        comm = shellQuote $ [optCC options, "-std=gnu99", "-D_GNU_SOURCE", "-falign-functions=4", "-ffast-math", "-Wall", "-o", fn, cf ] ++ (map ("-l" ++) rls) ++ debug ++ optCCargs options  ++ boehmOpts ++ profileOpts
hunk ./data/jhc_rts.c 26
+#define A_MAYALIAS __attribute__ ((__may_alias__))
hunk ./data/jhc_rts.c 32
-#define A_STD    A_REGPARM __attribute__ ((nothrow))
+#define A_STD    A_REGPARM
+
+
hunk ./data/jhc_rts.c 36
+#define A_MAYALIAS
hunk ./data/jhc_rts2.c 92
-} node_t;
+} A_MAYALIAS node_t;
hunk ./data/jhc_rts2.c 97
-} dnode_t;
+} A_MAYALIAS dnode_t;
hunk ./data/jhc_rts2.c 143
+