testing update

seliopou · Apr 11, 2009 · 0b11f62 · 0b11f62
1 parent 1830241
commit 0b11f62
Show file tree

Hide file tree

Showing 4 changed files with 5 additions and 34 deletions.
diff --git a/src/BrownPLT/Test.hs b/src/BrownPLT/Test.hs
@@ -7,6 +7,7 @@ module BrownPLT.Test
   , commandIO
   , rhinoIO
   , rhinoIOFile
+  , SourcePos
   , module Test.HUnit 
   ) where
 
@@ -39,7 +40,7 @@ import BrownPLT.JavaScript.Parser (parseScriptFromString,parseJavaScriptFromFile
   ParsedStatement)
 
 pretty :: [ParsedStatement] -> String
-pretty stmts = renderStatements
+pretty stmts = renderStatements stmts
 
 isPrettyPrintError :: ParseError -> Bool
 isPrettyPrintError pe = 

diff --git a/tests/MozSuite.hs b/tests/MozSuite.hs
@@ -6,8 +6,8 @@ import System.FilePath
 import System.Directory
 import Control.Monad
 
-import WebBits.Test
+import BrownPLT.Test
-import WebBits.JavaScript
+import BrownPLT.JavaScript
 import qualified Data.ByteString.Char8 as B
 
 isTestCall :: Statement SourcePos -> Bool

diff --git a/tests/ParsePretty.hs b/tests/ParsePretty.hs
diff --git a/tests/Rhino.hs b/tests/Rhino.hs
@@ -5,7 +5,7 @@ module Rhino where
 
 import Control.Monad
 import qualified Data.ByteString.Char8 as B
-import WebBits.Test
+import BrownPLT.Test