diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2016-06-14 21:30:50 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-06-14 21:30:50 +0300 |
| commit | 92edf3d8864ca092c9cffb7e1211e38ef7556be5 (patch) | |
| tree | 8c9de16a939fc069a339c5ddfd9c0b4802637bd3 /test/subback.awk | |
| parent | 68773e1444b7e353346e52756e9db8fb487b56d4 (diff) | |
| parent | b5a63ab37a2d018b0ae08abbf76ee2e88c3aff4c (diff) | |
| download | egawk-92edf3d8864ca092c9cffb7e1211e38ef7556be5.tar.gz egawk-92edf3d8864ca092c9cffb7e1211e38ef7556be5.tar.bz2 egawk-92edf3d8864ca092c9cffb7e1211e38ef7556be5.zip | |
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'test/subback.awk')
| -rw-r--r-- | test/subback.awk | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/test/subback.awk b/test/subback.awk new file mode 100644 index 00000000..d91513c1 --- /dev/null +++ b/test/subback.awk @@ -0,0 +1,16 @@ +BEGIN { + A[0] = "&" + for(i=1;i<=11;i++) { + A[i] = "\\" A[i-1] + } +## A[] holds & \& \\& \\\& \\\\& ... +} + +{ + for(i=0; i <= 11 ; i++) { + x = $0 + sub(/B/, A[i], x) + y = gensub(/B/, A[i], "1", $0) + print i, x, y + } +} |