diff options
Diffstat (limited to 'testsuite/tests/programs')
| -rw-r--r-- | testsuite/tests/programs/Makefile-OLD | 2 | ||||
| -rw-r--r-- | testsuite/tests/programs/andy_cherry/DataTypes.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/programs/andy_cherry/Interp.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/programs/seward-space-leak/Main.lhs | 4 |
4 files changed, 5 insertions, 5 deletions
diff --git a/testsuite/tests/programs/Makefile-OLD b/testsuite/tests/programs/Makefile-OLD index 0fab32f683..c6d37fe912 100644 --- a/testsuite/tests/programs/Makefile-OLD +++ b/testsuite/tests/programs/Makefile-OLD @@ -29,7 +29,7 @@ NOT_THESE += jeff-bug lennart_array # compiles but doesn't run NOT_THESE += dmgob_native1 dmgob_native2 -# Native library doens't exist +# Native library doesn't exist ifneq "$(HWL_NOFIB_HACK)" "" NOT_THESE += callback zhang_ccall diff --git a/testsuite/tests/programs/andy_cherry/DataTypes.hs b/testsuite/tests/programs/andy_cherry/DataTypes.hs index bcb6cbcf60..01df7f5abd 100644 --- a/testsuite/tests/programs/andy_cherry/DataTypes.hs +++ b/testsuite/tests/programs/andy_cherry/DataTypes.hs @@ -13,7 +13,7 @@ class Presentable a where - userFormat :: a -> String -- in prefered display format + userFormat :: a -> String -- in preferred display format diff --git a/testsuite/tests/programs/andy_cherry/Interp.hs b/testsuite/tests/programs/andy_cherry/Interp.hs index e323dc34f7..9b5f391409 100644 --- a/testsuite/tests/programs/andy_cherry/Interp.hs +++ b/testsuite/tests/programs/andy_cherry/Interp.hs @@ -93,7 +93,7 @@ | head tag == '(' && take 2 (reverse tag) == ":)" && length rest > 1 = getCurrColour `thenP` \ col -> let - invert Black r = r -- because the move has *already* happend + invert Black r = r -- because the move has *already* happened invert _ "0.00" = "0.00" -- don't negate 0 invert _ ('-':r) = r invert _ r = '-':r diff --git a/testsuite/tests/programs/seward-space-leak/Main.lhs b/testsuite/tests/programs/seward-space-leak/Main.lhs index 6c3f9f9d32..fb1527e330 100644 --- a/testsuite/tests/programs/seward-space-leak/Main.lhs +++ b/testsuite/tests/programs/seward-space-leak/Main.lhs @@ -97,7 +97,7 @@ parameter numbering starts at 1). @Call@. Calls to other functions are done with @Call@, which expects the callee to return @Zero@ or @One@, and selects the relevant -branch. The @Tag@s identify calls in the dependancy list. +branch. The @Tag@s identify calls in the dependency list. Although a @Call@ is a glorified @Case@ statement, the only allowed return values are @Zero@ and @One@. Hence the @CDS CDS@ continuations rather than the more comprehensive @(AList Return CDS)@. @@ -166,7 +166,7 @@ as necessary. ToDo: Need to rename call sites? I don't think so. Main CDS evaluator takes \begin{itemize} \item the code store -\item the dependancy list, a list of @Tag@s of calls which are +\item the dependency list, a list of @Tag@s of calls which are currently in progress \item the current arguments \item the CDS fragment currently being worked on |