diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2015-06-19 12:40:38 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2015-06-19 12:40:38 +0300 |
| commit | f7cd8a03c09a00c4cb520f881bbe838cf76e718f (patch) | |
| tree | b4089722a537426cf28d607a2eab7e8be01c29d9 /z3.awk | |
| parent | 20037f36ee350ee64699d311e4296be1f0367dd2 (diff) | |
| download | egawk-f7cd8a03c09a00c4cb520f881bbe838cf76e718f.tar.gz egawk-f7cd8a03c09a00c4cb520f881bbe838cf76e718f.tar.bz2 egawk-f7cd8a03c09a00c4cb520f881bbe838cf76e718f.zip | |
Cleanup files and fix up tests for typed regexes and typeof.
Diffstat (limited to 'z3.awk')
| -rw-r--r-- | z3.awk | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/z3.awk b/z3.awk deleted file mode 100644 index 408f5259..00000000 --- a/z3.awk +++ /dev/null @@ -1,19 +0,0 @@ -function testit(count, re, repl, fun, bi, n1, n2) -{ - $0 = "foo" - n1 = gsub(re, repl) - bi = $0 - - $0 = "foo" - fun = "gsub" - n2 = @fun(re, repl) - printf("%d: n1 = %d, bi -> %s, n2 = %d, indirect -> %s\n", - count, n1, bi, n2, $0) -} - -BEGIN { - testit(1, @/o/, "q") - p = @/o/ -stopme() - testit(2, p, "q") -} |