--- a/TL1/Todo	Wed May 12 12:57:20 2021 +0900
+++ b/TL1/Todo	Wed May 12 12:58:37 2021 +0900
@@ -1,3 +1,35 @@
+Sat May  4 10:39:12 JST 2019
+
+    possible extension
+
+    array as an arguments
+      put entire array on stack ( callee's local variable )
+    ARRAY TEND[]               allocate pointer size buffer 2 for 6809, 4 for 32bit, 8 for 64bit
+    anonymous array
+      "test"
+      "test\n\0"
+      INT(0,1,2,3)             ARRAY of CPU endian orderd int
+
+    memory stream
+      DICT := OPENM(INT(2,0))      allocate $200 memory
+    write to the stream  (should be BYTE(0))
+      WRITE(DICT:ASCII(0))
+
+      TEND := POSITION(DICT)      get stream pointer in TENC
+                                  return array offset in frame pointer, copied in caller's code
+      SEEK(DICT,INT(0))             set position in byte
+
+      VAL := SEEK(DICT,TEND)   set absolute position to TEND and get the value
+      K:=SEEKR(DICT,-1)        seek relative and get a value (K can be an array)
+      HASNEXT(DICT)            eof check
+
+   multibyte arithmetic
+      NEG(PTR)
+      PTR := PTR+PTR1
+      PTR := PTR-PTR1
+      PTR := PTR*PTR1
+      PTR := PTR/PTR1
+
 Mon Apr 15 00:18:30 JST 2019
 
     8bit/16bit offset