diff options
Diffstat (limited to 'testsuite')
-rwxr-xr-x | testsuite/awk.tests | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/testsuite/awk.tests b/testsuite/awk.tests index bcaafe8fd..93e25d8c1 100755 --- a/testsuite/awk.tests +++ b/testsuite/awk.tests | |||
@@ -102,9 +102,13 @@ testing "awk unused function args are evaluated" \ | |||
102 | optional DESKTOP | 102 | optional DESKTOP |
103 | testing "awk hex const 1" "awk '{ print or(0xffffffff,1) }'" "4294967295\n" "" "\n" | 103 | testing "awk hex const 1" "awk '{ print or(0xffffffff,1) }'" "4294967295\n" "" "\n" |
104 | testing "awk hex const 2" "awk '{ print or(0x80000000,1) }'" "2147483649\n" "" "\n" | 104 | testing "awk hex const 2" "awk '{ print or(0x80000000,1) }'" "2147483649\n" "" "\n" |
105 | testing "awk oct const" "awk '{ print or(01234,1) }'" "669\n" "" "\n" | 105 | testing "awk oct const" "awk '{ print or(01234,1) }'" "669\n" "" "\n" |
106 | SKIP= | 106 | SKIP= |
107 | 107 | ||
108 | # check that "hex/oct integer" heuristic doesn't kick in on input | ||
109 | # (must be done only when parsing program text) | ||
110 | testing "awk input is never oct" "awk '{ print \$1, \$1+1 }'" "011 12\n" "" "011\n" | ||
111 | |||
108 | # check that "hex/oct integer" heuristic doesn't kick in on 00NN.NNN | 112 | # check that "hex/oct integer" heuristic doesn't kick in on 00NN.NNN |
109 | testing "awk floating const with leading zeroes" \ | 113 | testing "awk floating const with leading zeroes" \ |
110 | "awk '{ printf \"%f %f\n\", \"000.123\", \"009.123\" }'" \ | 114 | "awk '{ printf \"%f %f\n\", \"000.123\", \"009.123\" }'" \ |
@@ -469,4 +473,10 @@ testing 'awk printf %% prints one %' \ | |||
469 | "%\n" \ | 473 | "%\n" \ |
470 | '' '' | 474 | '' '' |
471 | 475 | ||
476 | testing 'awk backslash+newline eaten with no trace' \ | ||
477 | "awk 'BEGIN { printf \"Hello\\ | ||
478 | world\n\" }'" \ | ||
479 | "Hello world\n" \ | ||
480 | '' '' | ||
481 | |||
472 | exit $FAILCOUNT | 482 | exit $FAILCOUNT |