Skip to content
Snippets Groups Projects
Commit 9f6cdd5d authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

[project @ 1999-12-29 12:12:59 by simonpj]

Add rn037
parent 7da2408f
No related merge requests found
......@@ -2,10 +2,14 @@ TOP = ../..
include $(TOP)/mk/boilerplate.mk
include $(TOP)/mk/should_compile.mk
SRC_HC_OPTS += -noC -dcore-lint
SRC_HC_OPTS += -dcore-lint
# There used to be a -noC flag, but I removed it because
# Rn037Help needs to generate an interface file, and
# if -noC is on I can't see how to. (Driver grottiness.)
rn017_HC_OPTS = -hi -hi-with-exports
rn025_HC_OPTS = -hi -hi-with-exports
# rn017_HC_OPTS = -hi -hi-with-exports
# rn025_HC_OPTS = -hi -hi-with-exports
# Rn037Help_HC_OPTS = -hi
include $(TOP)/mk/target.mk
......
module Rn037Help( T(C) ) where
data T = C
-- !!! Checking that you can hide a constructor
module ShouldSucceed where
import Rn037Help hiding( C )
-- C is the constructor, but we should
-- still be able to hide it
f x = Rn037Help.C
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment