Skip to content

Commit f1d555c

Browse files
committed
The max Unicode char code applies now on all platforms.
1 parent e002531 commit f1d555c

File tree

1 file changed

+3
-13
lines changed

1 file changed

+3
-13
lines changed

src/Tests/library/test_pio.pl

Lines changed: 3 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -170,23 +170,13 @@
170170
max_char(text, 0xfffff). % Only if Locale is UTF-8! How to test?
171171
max_char(iso_latin_1, 255).
172172
max_char(utf8, Max) :-
173-
( current_prolog_flag(windows, true)
174-
-> Max = 0xffff % UCS-2
175-
; Max = 0xfffff % Full Unicode range
176-
).
173+
current_prolog_flag(max_char_code, Max).
177174
max_char(utf16be, Max) :-
178-
( current_prolog_flag(windows, true)
179-
-> Max = 0xffff % UCS-2
180-
; Max = 0xfffff % Full Unicode range
181-
).
175+
current_prolog_flag(max_char_code, Max).
182176
max_char(utf16le, Max) :-
183177
max_char(utf16be, Max).
184178
max_char(wchar_t, Max) :-
185-
( current_prolog_flag(windows, true)
186-
-> Max = 0xffff % UCS-2
187-
; Max = 0xfffff
188-
).
189-
179+
current_prolog_flag(max_char_code, Max).
190180

191181
save_list(File, Codes, Enc) :-
192182
open(File, write, Out, [encoding(Enc)]),

0 commit comments

Comments
 (0)