Fix string sort

2017-07-04 21:03:39 +09:00
parent 21a31a7ddd
commit af1a6aa6f2
2 changed files with 4 additions and 2 deletions
--- a/SMILEBASIC/TEST.txt
+++ b/SMILEBASIC/TEST.txt
@@ -39,6 +39,8 @@ DEF SORTTEST
 ASSERT__ A[3]==0,"RSORT"
 ASSERT__ B$[3]=="3","RSORT"
 ASSERT__ C$[3]=="D","RSORT"
+ RSORT B$
+ ASSERT__ B$[3]=="0","RSORT2"
 SORTTEST2
 END
 DEF SORTTEST2