summaryrefslogtreecommitdiff
path: root/testsuite/tests/numeric/should_run/arith009.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/numeric/should_run/arith009.hs')
-rw-r--r--testsuite/tests/numeric/should_run/arith009.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/numeric/should_run/arith009.hs b/testsuite/tests/numeric/should_run/arith009.hs
new file mode 100644
index 0000000000..43fe1b2923
--- /dev/null
+++ b/testsuite/tests/numeric/should_run/arith009.hs
@@ -0,0 +1,6 @@
+-- a prefix minus precedence test
+
+f :: Int -> Int -> Int -> Int
+f x y z = - x * y ^ z
+
+main = putStr (shows (f 5 2 3) "\n")