bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Fix SWAP LHS$[L],RHS$[R]

Browse Source
This commit is contained in:
otya128
2017-07-03 18:24:56 +09:00
parent 3c7159a2ca
commit ffb4b6e685
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
SMILEBASIC/VM.d
View File

@@ -2348,6 +2348,11 @@ class SwapCode : Code
refitem2.stringArrayReference = new Array!wchar([wc]); refitem2.stringArrayReference = new Array!wchar([wc]);
return; return;
} }
if (refitem2.type == ValueType.StringArrayReference && refitem1.type == ValueType.StringArrayReference)
{
refitem1.stringArrayReference.swap(refitem2.stringArrayReference);
return;
}
throw new TypeMismatch(); throw new TypeMismatch();
} }
} }