"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "test/indirectbuiltin.awk" between
gawk-5.0.1.tar.xz and gawk-5.1.0.tar.xz

About: GNU awk - pattern scanning and processing language.

indirectbuiltin.awk  (gawk-5.0.1.tar.xz):indirectbuiltin.awk  (gawk-5.1.0.tar.xz)
skipping to change at line 200 skipping to change at line 200
print_result("time", fun, b1, i1) print_result("time", fun, b1, i1)
fun = "systime" fun = "systime"
b1 = systime() b1 = systime()
i1 = @fun() i1 = @fun()
print_result("time", fun, b1, i1) print_result("time", fun, b1, i1)
# regexp functions # regexp functions
fun = "match" fun = "match"
b1 = match("o+", "fooob") b1 = match("fooob", "o+")
rstart = RSTART rstart = RSTART
rlength = RLENGTH rlength = RLENGTH
i1 = @fun("o+", "fooob") i1 = @fun("fooob", "o+")
print_result("regexp", fun, b1, i1) print_result("regexp", fun, b1, i1)
if (rstart != RSTART) { if (rstart != RSTART) {
printf("match: failure: biRSTART (%d) != iRSTART (%d)\n", printf("match: failure: biRSTART (%d) != iRSTART (%d)\n",
rstart, RSTART) rstart, RSTART)
exit 1 exit 1
} }
if (rlength != RLENGTH) { if (rlength != RLENGTH) {
printf("match: failure: biRLENGTH (%d) != iRLENGTH (%d)\n", printf("match: failure: biRLENGTH (%d) != iRLENGTH (%d)\n",
rlength, RLENGTH) rlength, RLENGTH)
exit 1 exit 1
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)