From cfcf50297f832725641be0210f142a972cfe103c Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Sat, 4 Apr 2009 12:29:53 +0000
Subject: [PATCH] Added the new tock include directory to the standard search
 path

---
 data/CompState.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/data/CompState.hs b/data/CompState.hs
index ebf87e1..b9b6fcc 100644
--- a/data/CompState.hs
+++ b/data/CompState.hs
@@ -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,