Added the new tock include directory to the standard search path

This commit is contained in:
Neil Brown 2009-04-04 12:29:53 +00:00
parent 0466a50dfa
commit cfcf50297f

View File

@ -34,6 +34,7 @@ import qualified AST as A
import Errors (Die, dieP, ErrorReport, Warn, WarningType(..), warnP, WarningReport)
import Metadata
import OrdAST ()
import Paths
import TypeSizes
import UnifyType
import Utils
@ -176,7 +177,7 @@ emptyState = CompState {
csRunIndent = False,
csClassicOccamMobility = False,
csUnknownStackSize = 512,
csSearchPath = ["."],
csSearchPath = [".", tockIncludeDir],
csCurrentFile = "none",
csUsedFiles = Set.empty,