summaryrefslogtreecommitdiffstats
path: root/contrib/bc/Test/arrayp.b
diff options
context:
space:
mode:
authorgabor <gabor@FreeBSD.org>2010-02-21 14:28:03 +0000
committergabor <gabor@FreeBSD.org>2010-02-21 14:28:03 +0000
commitfa4f0af78a622f11cab7366751ecb1a4700eca23 (patch)
treeb3eb6d7631ef53fad942d51b66b7a7918b1ceab4 /contrib/bc/Test/arrayp.b
parent1fdea921e1450bf99dc432803cd6c88e08540a21 (diff)
downloadFreeBSD-src-fa4f0af78a622f11cab7366751ecb1a4700eca23.zip
FreeBSD-src-fa4f0af78a622f11cab7366751ecb1a4700eca23.tar.gz
- Remove GNU bc/dc bits. There has not been any regressions seen after
BSD bc/dc import. It has been tested with make universe that this code is not used by anything any more. Approved by: delphij (mentor)
Diffstat (limited to 'contrib/bc/Test/arrayp.b')
-rw-r--r--contrib/bc/Test/arrayp.b30
1 files changed, 0 insertions, 30 deletions
diff --git a/contrib/bc/Test/arrayp.b b/contrib/bc/Test/arrayp.b
deleted file mode 100644
index 3f3ca50..0000000
--- a/contrib/bc/Test/arrayp.b
+++ /dev/null
@@ -1,30 +0,0 @@
-"This tests arrays!
-"
-define p(a[],x,y) {
- auto i;
- for (i=x; i<y; i++) a[i];
-}
-
-define m(a[],x,y) {
- auto i;
- for (i=x; i<y; i++) a[i] = i;
-}
-
-define m1(*a[],x,y) {
- auto i;
- print "m1\n"
- for (i=x; i<y; i++) a[i] = i;
-}
-
-for (i=0; i<10; i++) a[i] = i;
-j = p(a[],0,10);
-
-j = m(b[],0,10);
-j = p(b[],0,10);
-
-print "---\n";
-j = m1(b[],0,10);
-j = p(b[],0,10);
-
-quit
-
OpenPOWER on IntegriCloud