summaryrefslogtreecommitdiff
path: root/testsuite/tests/programs
diff options
context:
space:
mode:
authorGabor Greif <ggreif@gmail.com>2015-08-03 13:38:48 +0200
committerGabor Greif <ggreif@gmail.com>2015-08-03 16:21:05 +0200
commit7ec6ffc4e8ccf5c24149d9ab34c3619516dc3081 (patch)
treec0be6db8439304b015ccba88f5d81899d2cd2343 /testsuite/tests/programs
parentd9d2102ea7f6da1bc3a69fa469b89ea843cb8b02 (diff)
downloadhaskell-7ec6ffc4e8ccf5c24149d9ab34c3619516dc3081.tar.gz
Typos in comments [skip ci]
Diffstat (limited to 'testsuite/tests/programs')
-rw-r--r--testsuite/tests/programs/galois_raytrace/Data.hs2
-rw-r--r--testsuite/tests/programs/galois_raytrace/Eval.hs2
2 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/programs/galois_raytrace/Data.hs b/testsuite/tests/programs/galois_raytrace/Data.hs
index a92eb9bf23..f02aabe7bf 100644
--- a/testsuite/tests/programs/galois_raytrace/Data.hs
+++ b/testsuite/tests/programs/galois_raytrace/Data.hs
@@ -125,7 +125,7 @@ lookupEnv (Env e) n = lookup n e
-- All primitive operators
--
-- There is no Op_apply, Op_false, Op_true and Op_if
--- (because they appear explcitly in the rules).
+-- (because they appear explicitly in the rules).
data GMLOp
= Op_acos
diff --git a/testsuite/tests/programs/galois_raytrace/Eval.hs b/testsuite/tests/programs/galois_raytrace/Eval.hs
index 58dc1f3688..5939d4750b 100644
--- a/testsuite/tests/programs/galois_raytrace/Eval.hs
+++ b/testsuite/tests/programs/galois_raytrace/Eval.hs
@@ -248,7 +248,7 @@ doPrimOp primOp op args
types = getPrimOpType primOp
--- Render is somewhat funny, becauase it can only get called at top level.
+-- Render is somewhat funny, because it can only get called at top level.
-- All other operations are purely functional.
doAllOp :: PrimOp -> GMLOp -> Stack -> IO Stack