[project @ 1998-11-10 08:50:50 by sof]

_casm_ unfolding test

ghc/tests/reader/should_compile/Makefile

@@ -2,8 +2,10 @@ TOP = ../..
 include $(TOP)/mk/boilerplate.mk
 include $(TOP)/mk/should_compile.mk
 
-SRC_HC_OPTS += -noC -dcore-lint
+SRC_HC_OPTS += -dcore-lint
 
 read004_HC_OPTS = -fno-implicit-prelude
+read012_HC_OPTS += -O -funfold-casms-in-hi-file -fglasgow-exts
+read013_HC_OPTS += -O -funfold-casms-in-hi-file -fglasgow-exts
 
 include $(TOP)/mk/target.mk

ghc/tests/reader/should_compile/read012.hs

+module T1 where
+malloc :: IO Int
+malloc = _casm_ ``%r = 42;''

ghc/tests/reader/should_compile/read013.hs

+module T2 where
+import T1
+blah :: IO Int
+blah = malloc