#endif
TEST 134: test sbu W2S
MAIN 0
+#ifdef W2S
ldc 1
ldc 1
sbu W2S
zne *1
OK
#endif
+#endif
TEST 135: test mlu W2S
MAIN 0
+#ifdef W2S
ldc 5
ldc 9
mlu W2S
zne *1
OK
#endif
+#endif
TEST 136: test dvu W2S
MAIN 0
+#ifdef W2S
ldc 15
ldc 5
dvu W2S
zne *1
OK
#endif
+#endif
TEST 137: test rmu W2S
MAIN 0
#ifdef W2S
dch
cmp
zne *1
+OK
lal PS
loi PS
lal 0
lpb
cmp
zne *1
+OK
lal 2*PS
loi PS
lal PS
dch
cmp
zne *1
+OK
lal PS
loi PS
lal 0
lpb
cmp
zne *1
+OK
; now create GTO descriptor
lal 0
loi PS ; LB