summaryrefslogtreecommitdiff
path: root/testsuite/awk.tests
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/awk.tests')
-rwxr-xr-xtestsuite/awk.tests12
1 files changed, 11 insertions, 1 deletions
diff --git a/testsuite/awk.tests b/testsuite/awk.tests
index bcaafe8..93e25d8 100755
--- a/testsuite/awk.tests
+++ b/testsuite/awk.tests
@@ -102,9 +102,13 @@ testing "awk unused function args are evaluated" \
optional DESKTOP
testing "awk hex const 1" "awk '{ print or(0xffffffff,1) }'" "4294967295\n" "" "\n"
testing "awk hex const 2" "awk '{ print or(0x80000000,1) }'" "2147483649\n" "" "\n"
-testing "awk oct const" "awk '{ print or(01234,1) }'" "669\n" "" "\n"
+testing "awk oct const" "awk '{ print or(01234,1) }'" "669\n" "" "\n"
SKIP=
+# check that "hex/oct integer" heuristic doesn't kick in on input
+# (must be done only when parsing program text)
+testing "awk input is never oct" "awk '{ print \$1, \$1+1 }'" "011 12\n" "" "011\n"
+
# check that "hex/oct integer" heuristic doesn't kick in on 00NN.NNN
testing "awk floating const with leading zeroes" \
"awk '{ printf \"%f %f\n\", \"000.123\", \"009.123\" }'" \
@@ -469,4 +473,10 @@ testing 'awk printf %% prints one %' \
"%\n" \
'' ''
+testing 'awk backslash+newline eaten with no trace' \
+ "awk 'BEGIN { printf \"Hello\\
+ world\n\" }'" \
+ "Hello world\n" \
+ '' ''
+
exit $FAILCOUNT