gbdev/rgbds
1
0
Fork 0
mirror of https://github.com/gbdev/rgbds.git synced 2025-11-20 18:22:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add some more string test cases

Browse Source
This commit is contained in:
Rangi42
2025-01-27 23:44:52 -05:00
parent c4b456b166
commit 34a9c8e083
8 changed files with 32 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
test/asm/invalid-utf-8-strings.asm
View File

@@ -21,3 +21,17 @@ println "\"{invalid}\" == \"{copy}\" ({d:n})"
DEF mid1 EQUS STRSUB("{invalid}", 5, 2)
DEF mid2 EQUS STRSUB("{invalid}", 9, 1)
println "\"{mid2}{mid1}\""
; characters:
; 1: U+0041 A
; 2: U+0020 space
; 3: invalid byte 0xFE
; 4: invalid byte 0x81
; 5: invalid byte 0xFF
; 6: U+0020 space
; 7: U+0042 B
REDEF invalid EQUS "A <20><><EFBFBD> B"
DEF n = strlen("{invalid}")
DEF r = charlen("{invalid}")
println "\"{#s:invalid}\": {d:n} != {d:r}"