update to new AM37 syntax

[fleet.git] / ships / Fifo.ship

diff --git a/ships/Fifo.ship b/ships/Fifo.ship
index 8cbd38c..0a620b2 100644 (file)
--- a/ships/Fifo.ship
+++ b/ships/Fifo.ship
@@ -51,21 +51,21 @@ at least 16 words.
 #ship debug        : Debug
 #ship fifo         : Fifo
 
-debug.in:   [*] take, deliver;
+debug.in:   set ilc=*;  recv, deliver;
 fifo.in:
-  literal 9;
+  set word= 9;
   deliver;
-  load repeat counter with 63;
-  take, deliver;
-  load repeat counter with 37;
-  take, deliver;
+  set ilc=63;
+  recv, deliver;
+  set ilc=37;
+  recv, deliver;
 
 fifo.out:
-  load repeat counter with 63;
-  take, sendto fifo.in;
-  load repeat counter with 36;
-  take, sendto fifo.in;
-  take, sendto debug.in;
+  set ilc=63;
+  collect, send to fifo.in;
+  set ilc=36;
+  collect, send to fifo.in;
+  collect, send to debug.in;