--- gforth/arch/alpha/testasm.fs	1999/02/02 22:02:55	1.1
+++ gforth/arch/alpha/testasm.fs	2000/06/29 16:46:13	1.5
@@ -1,4 +1,5 @@
-here
+also assembler
+create test_asm
 1 2 3 addf,
 1 2 3 addg,
 1 2 3 addl,
@@ -13,20 +14,20 @@ here
 1 2 3 addt,
 1 2 3 and,
 1 2 3 and#,
-1 2   beq,
-1 2   bge,
-1 2   bgt,
+1 here beq,
+1 here bge,
+1 here bgt,
 1 2 3 bic,
 1 2 3 bic#,
 1 2 3 bis,
 1 2 3 bis#,
-1 2   blbc,
-1 2   blbs,
-1 2   ble,
-1 2   blt,
-1 2   bne,
-1 2   br,
-1 2   bsr,
+1 here blbc,
+1 here blbs,
+1 here ble,
+1 here blt,
+1 here bne,
+1 here br,
+1 here bsr,
 1     call_pal,
 1 2 3 cmoveq,
 1 2 3 cmoveq#,
@@ -102,12 +103,12 @@ here
 1 2 3 extwh#,
 1 2 3 extwl,
 1 2 3 extwl#,
-1 2   fbeq,
-1 2   fbge,
-1 2   fbgt,
-1 2   fble,
-1 2   fblt,
-1 2   fbne,
+1 here fbeq,
+1 here fbge,
+1 here fbgt,
+1 here fble,
+1 here fblt,
+1 here fbne,
 1 2 3 fcmoveq,
 1 2 3 fcmovge,
 1 2 3 fcmovgt,
@@ -232,4 +233,13 @@ here
 1 2 3 zap#,
 1 2 3 zapnot,
 1 2 3 zapnot#,
-
+5 gt if,
+begin,
+ahead,
+2 cs-roll
+else,
+endif,
+endif,
+6 lbs while,
+repeat,
+previous
\ No newline at end of file