aboutsummaryrefslogtreecommitdiffstats
path: root/test/reverse.awk
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2010-07-16 12:41:09 +0300
committerArnold D. Robbins <arnold@skeeve.com>2010-07-16 12:41:09 +0300
commit8c042f99cc7465c86351d21331a129111b75345d (patch)
tree9656e653be0e42e5469cec77635c20356de152c2 /test/reverse.awk
parent8ceb5f934787eb7be5fb452fb39179df66119954 (diff)
downloadegawk-8c042f99cc7465c86351d21331a129111b75345d.tar.gz
egawk-8c042f99cc7465c86351d21331a129111b75345d.tar.bz2
egawk-8c042f99cc7465c86351d21331a129111b75345d.zip
Move to gawk-3.0.0.
Diffstat (limited to 'test/reverse.awk')
-rw-r--r--test/reverse.awk13
1 files changed, 0 insertions, 13 deletions
diff --git a/test/reverse.awk b/test/reverse.awk
deleted file mode 100644
index c6b2e299..00000000
--- a/test/reverse.awk
+++ /dev/null
@@ -1,13 +0,0 @@
-#this program creates palindromic output - slightly modified from Gawk Manual
-{
- rev($0, length)
-}
-
-function rev(str, len) {
- if (len == 0) {
- print " ", $0
- return
- }
- printf "%c", substr(str, len, 1)
- rev(str, len - 1)
-}