:- module charbug.

:- interface.

:- import_module io.

:- pred main(io::di, io::uo) is det.

:- implementation.

:- import_module char.

main(!IO) :-
	(if det_from_int(255) = '\xFF\' then print("succeed\n", !IO) else print("fail\n", !IO)),
	(if 255 = to_int('\xFF\') then print("succeed\n", !IO) else print("fail\n", !IO)).