Clean up example programs a little bit.

eg/new-style-routine.60p

@@ -0,0 +1,22 @@
+// SixtyPical 0.11 introduced a new syntax for defining routines
+// (routine was made into a type, and you can now say: define name type.)
+
+typedef routine
+  inputs x
+  outputs x
+  trashes z, n
+    routine_type
+
+vector routine_type vec
+
+define foo routine_type
+{
+  inc x
+}
+
+define main routine
+  outputs vec
+  trashes a, z, n
+{
+    copy foo, vec
+}

eg/vector-table.60p

@@ -1,3 +1,8 @@
+//
+// Demonstrates vector tables.
+// Prints "AABAB".
+//
+
 vector routine
   trashes a, z, n
     print
@@ -31,8 +36,7 @@ routine main
   trashes print, a, x, z, n, c
 {
     ld x, 0
-    copy printa, print
+    copy printa, vectors + x
-    copy print, vectors + x
     inc x
     copy printa, print
     copy print, vectors + x
@@ -40,13 +44,9 @@ routine main
     copy printb, print
     copy print, vectors + x
     inc x
-    copy printa, print
+    copy printa, vectors + x
-    copy print, vectors + x
     inc x
-    copy printb, print
+    copy printb, vectors + x
-    copy print, vectors + x
-
-    copy printa, print
 
     ld x, 0
     repeat {

eg/vector-table2.60p

@@ -1,51 +0,0 @@
-vector routine
-  trashes a, z, n
-    print
-
-vector (routine
-  trashes a, z, n)
-    table[32] vectors
-
-routine chrout
-  inputs a
-  trashes a
-  @ 65490
-
-routine printa
-  trashes a, z, n
-{
-    ld a, 65
-    call chrout
-}
-
-routine printb
-  trashes a, z, n
-{
-    ld a, 66
-    call chrout
-}
-
-routine main
-  inputs vectors
-  outputs vectors
-  trashes print, a, x, z, n, c
-{
-    ld x, 0
-    copy printa, vectors + x
-    inc x
-    copy printa, vectors + x
-    inc x
-    copy printb, vectors + x
-    inc x
-    copy printa, vectors + x
-    inc x
-    copy printb, vectors + x
-
-    ld x, 0
-    repeat {
-        copy vectors + x, print
-        call print
-        inc x
-        cmp x, 5
-    } until z
-}