diff options
Diffstat (limited to 'contrib/awk/test/fnarydel.awk')
-rw-r--r-- | contrib/awk/test/fnarydel.awk | 60 |
1 files changed, 0 insertions, 60 deletions
diff --git a/contrib/awk/test/fnarydel.awk b/contrib/awk/test/fnarydel.awk deleted file mode 100644 index 8a1264cbed64..000000000000 --- a/contrib/awk/test/fnarydel.awk +++ /dev/null @@ -1,60 +0,0 @@ -#!/usr/local/bin/gawk -f -BEGIN { - process() -} - -function process(aa,a) { - delete aa -} - -BEGIN { - for (i = 1; i < 10; i++) - a[i] = i; - - print "first loop" - for (i in a) - print a[i] - - delete a - - print "second loop" - for (i in a) - print a[i] - - for (i = 1; i < 10; i++) - a[i] = i; - - print "third loop" - for (i in a) - print a[i] - - print "call func" - delit(a) - - print "fourth loop" - for (i in a) - print a[i] - - stressit() -} - -function delit(arr) -{ - delete arr -} - -function stressit( array, i) -{ - delete array - array[4] = 4 - array[5] = 5 - delete array[5] - print "You should just see: 4 4" - for (i in array) - print i, array[i] - delete array - print "You should see nothing between this line" - for (i in array) - print i, array[i] - print "And this one" -} |