diff options
author | Gabor Greif <ggreif@gmail.com> | 2017-07-26 15:13:04 +0200 |
---|---|---|
committer | Gabor Greif <ggreif@gmail.com> | 2017-07-26 15:55:22 +0200 |
commit | 362339dd4cfd652b63c7cd1b7ea5a7486bb40944 (patch) | |
tree | 0f3ec7abbd3166e58feddadde9d6fd52a5ec3022 /testsuite/tests/programs | |
parent | d31181b90cff7c791465687377cd2093627df429 (diff) | |
download | haskell-362339dd4cfd652b63c7cd1b7ea5a7486bb40944.tar.gz |
Fix note references and some typos
Diffstat (limited to 'testsuite/tests/programs')
-rw-r--r-- | testsuite/tests/programs/galois_raytrace/Eval.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/programs/galois_raytrace/Eval.hs b/testsuite/tests/programs/galois_raytrace/Eval.hs index bf43d10605..001842edad 100644 --- a/testsuite/tests/programs/galois_raytrace/Eval.hs +++ b/testsuite/tests/programs/galois_raytrace/Eval.hs @@ -243,7 +243,7 @@ doPrimOp primOp op args show op ++ " takes " ++ show (length types) ++ " argument" ++ s ++ " with" ++ the ++ " type" ++ s ++ "\n|\n|" ++ " " ++ unwords [ show ty | ty <- types ] ++ "\n|\n|" ++ - " currently, the relevent argument" ++ s ++ " on the stack " ++ + " currently, the relevant argument" ++ s ++ " on the stack " ++ are ++ "\n|\n| " ++ unwords [ "(" ++ show arg ++ ")" | arg <- reverse (take (length types) args) ] ++ "\n|\n| " |