Use copy of var/ptr strings.

options.bmx

@@ -25,7 +25,7 @@ SuperStrict
 
 Import "base.configmap.bmx"
 
-Const version:String = "0.14"
+Const version:String = "0.15"
 
 Const BUILDTYPE_APP:Int = 0
 Const BUILDTYPE_MODULE:Int = 1

parser.bmx

@@ -610,7 +610,7 @@ Type TParser
 
 	Method ParseArgs:TExpr[]( stmt:Int )
 		Local args:TExpr[]
-'DebugStop
+
 		If stmt
 			If AtEos() Return args
 		Else

type.bmx

@@ -79,6 +79,10 @@ Type TType
 	bbdoc: map to a pointer type
 	End Rem
 	Function MapToPointerType:TType(ty:TType)
+		If ty = stringType Then
+			ty = ty.Copy()
+		End If
+
 		If Not (ty._flags & T_PTR) Then
 			ty._flags :| T_PTR
 			Return ty
@@ -98,6 +102,10 @@ Type TType
 	End Function
 
 	Function MapToVarType:TType(ty:TType)
+		If ty = stringType Then
+			ty = ty.Copy()
+		End If
+		
 		If Not (ty._flags & T_VAR) Then
 			ty._flags :| T_VAR
 			Return ty
@@ -112,6 +120,10 @@ Type TType
 	bbdoc: map to a var pointer type
 	End Rem
 	Function MapToVarPointerType:TType(ty:TType)
+		If ty = stringType Then
+			ty = ty.Copy()
+		End If
+
 		If Not (ty._flags & T_VARPTR) Then
 			ty._flags :| T_VARPTR
 			Return ty