The SuffixArray example araises infinite loop for SJIS input

The SuffixArray example enters an infinite loop like below:

```sml
- CM.make "example/SuffixArray/main/sources.cm";
- SuffixArray.find "Shift_JIS" "./example/SuffixArray/example/sjis.txt" "剣";
<infinite loop>
```

