Data commit

Task/String-concatenation/M2000-Interpreter/string-concatenation.m2000

@@ -0,0 +1,16 @@
+Module CheckString {
+      s$ = "hello"
+      PRINT s$;" literal" 'or s$ + " literal"
+      s2$ = s$ + " literal"
+      PRINT s2$
+      Print Len(s2$)=13
+      \\ get an ansi string
+      k$=Str$("Hello")
+      Print Len(k$)=2.5  ' 2.5 words or 5 bytes
+      Print Chr$(k$)
+      k2$=k$+Str$(" literal")
+      Print Len(k2$)=6.5  ' 13 bytes
+      Print Chr$(k2$)
+      Print Len(Chr$(k2$))=13 ' words
+}
+CheckString