diff --git a/eg/c64/demo-game/demo-game.60p b/eg/c64/demo-game/demo-game.60p
index 69ade0d..4097f70 100644
--- a/eg/c64/demo-game/demo-game.60p
+++ b/eg/c64/demo-game/demo-game.60p
@@ -457,7 +457,7 @@
     goto dispatch_game_state
 }
 
-routine main
+define main routine
   inputs cinv
   outputs cinv, save_cinv, pos, dispatch_game_state,
           screen1, screen2, screen3, screen4, colormap1, colormap2, colormap3, colormap4
diff --git a/eg/c64/ribos/ribos2.60p b/eg/c64/ribos/ribos2.60p
index b9d9877..ee86006 100644
--- a/eg/c64/ribos/ribos2.60p
+++ b/eg/c64/ribos/ribos2.60p
@@ -49,7 +49,7 @@
 // generating them as part of a SixtyPical program would not
 // be practical.  So we just jump to this location instead.
 
-routine pla_tay_pla_tax_pla_rti
+define pla_tay_pla_tax_pla_rti routine
   inputs a
   trashes a
     @ $EA81
diff --git a/eg/rudiments/add-word.60p b/eg/rudiments/add-word.60p
index ccf4d7a..a3c1d86 100644
--- a/eg/rudiments/add-word.60p
+++ b/eg/rudiments/add-word.60p
@@ -1,5 +1,5 @@
 word score
-routine main
+define main routine
   inputs score
   outputs score
   trashes a, c, z, v, n
diff --git a/eg/rudiments/buffer.60p b/eg/rudiments/buffer.60p
index ce4dfbe..79bc512 100644
--- a/eg/rudiments/buffer.60p
+++ b/eg/rudiments/buffer.60p
@@ -2,7 +2,7 @@
 pointer ptr @ 254
 byte foo
 
-routine main
+define main routine
   inputs buf
   outputs buf, y, foo
   trashes a, z, n, ptr
diff --git a/eg/rudiments/call.60p b/eg/rudiments/call.60p
index bfa0b89..a7fc616 100644
--- a/eg/rudiments/call.60p
+++ b/eg/rudiments/call.60p
@@ -1,16 +1,16 @@
-routine chrout
+define chrout routine
   inputs a
   trashes a
   @ 65490
 
-routine print
+define print routine
   trashes a, z, n
 {
     ld a, 65
     call chrout
 }
 
-routine main
+define main routine
   trashes a, z, n
 {
     call print
diff --git a/eg/rudiments/forever.60p b/eg/rudiments/forever.60p
index e8b1c61..a9968cf 100644
--- a/eg/rudiments/forever.60p
+++ b/eg/rudiments/forever.60p
@@ -1,4 +1,4 @@
-routine main
+define main routine
   trashes a, y, z, n, c
 {
     ld y, 65
diff --git a/eg/rudiments/goto.60p b/eg/rudiments/goto.60p
index 5c8c0f8..6aafcbb 100644
--- a/eg/rudiments/goto.60p
+++ b/eg/rudiments/goto.60p
@@ -1,14 +1,14 @@
-routine chrout
+define chrout routine
   inputs a
   trashes a
   @ 65490
 
-routine bar trashes a, z, n {
+define bar routine trashes a, z, n {
     ld a, 66
     call chrout
 }
 
-routine main trashes a, z, n {
+define main routine trashes a, z, n {
     ld a, 65
     call chrout
     goto bar
diff --git a/eg/rudiments/if.60p b/eg/rudiments/if.60p
index 64c63ae..3900724 100644
--- a/eg/rudiments/if.60p
+++ b/eg/rudiments/if.60p
@@ -1,4 +1,4 @@
-routine foo
+define main routine
   inputs a
   outputs a
 {
diff --git a/eg/rudiments/loop.60p b/eg/rudiments/loop.60p
index 7de6f09..2f3d95b 100644
--- a/eg/rudiments/loop.60p
+++ b/eg/rudiments/loop.60p
@@ -1,9 +1,9 @@
-routine chrout
+define chrout routine
   inputs a
   trashes a
   @ 65490
 
-routine main
+define main routine
   trashes a, y, z, n, c
 {
     ld y, 65
diff --git a/eg/rudiments/memloc.60p b/eg/rudiments/memloc.60p
index f8886ce..d6e49d1 100644
--- a/eg/rudiments/memloc.60p
+++ b/eg/rudiments/memloc.60p
@@ -1,11 +1,11 @@
 byte foo
 
-routine chrout
+define chrout routine
   inputs a
   trashes a
   @ 65490
 
-routine print
+define print routine
   inputs foo
   trashes a, z, n
 {
@@ -13,7 +13,7 @@
     call chrout
 }
 
-routine main
+define main routine
   trashes a, y, z, n, foo
 {
     ld y, 65
diff --git a/eg/rudiments/print.60p b/eg/rudiments/print.60p
index c1c29c3..d060ebc 100644
--- a/eg/rudiments/print.60p
+++ b/eg/rudiments/print.60p
@@ -1,9 +1,9 @@
-routine chrout
+define chrout routine
   inputs a
   trashes a
   @ 65490
 
-routine main
+define main routine
   inputs a
   trashes a, z, n
 {
diff --git a/eg/vic20/hearts.60p b/eg/vic20/hearts.60p
index e4a615b..ffc4369 100644
--- a/eg/vic20/hearts.60p
+++ b/eg/vic20/hearts.60p
@@ -3,7 +3,7 @@
 // Define where the screen starts in memory:
 byte table[256] screen @ 7680
 
-routine main
+define main routine
   // These are the values that will be written to by this routine:
   trashes a, x, z, n, screen
 {