| [Mumps2Py:] [115] test file for the $order() intrinsic |
[ Thread Index |
Date Index
| More lists.mumps2py.org/discuss Archives
]
Revision: 115
Author: pgallot
Date: 2008-02-15 21:20:48 +0000 (Fri, 15 Feb 2008)
Log Message:
-----------
test file for the $order() intrinsic
Added Paths:
-----------
trunk/testfiles/order.mps
Added: trunk/testfiles/order.mps
===================================================================
--- trunk/testfiles/order.mps (rev 0)
+++ trunk/testfiles/order.mps 2008-02-15 21:20:48 UTC (rev 115)
@@ -0,0 +1,5 @@
+ S (a(1),a(2000),a("CAT"),a("cat"),a("ALF"),a(12))=1
+ S x="" F S x=$O(a(x)) Q:x="" W x,!
+ W !,"---",!
+ K a("CAT") SET a(5,10)="woolworths",a("cat")="last"
+ S x="" F S x=$O(a(x),-1) Q:x="" W !,x