我正在尝试从通过 ocaml 中的 stdinput 传入的文件中读取字符。我想知道为什么当我可以 print_char 我在以下代码中收到的字符时,我一直得到一个单位。另外,我正在尝试列出这些目前无法使用的字符。
let () =
let charList = [] in
let inchar = open_in Sys.argv.(1) in
try
while true do
let c = Char.uppercase(input_char inchar) in
print_char c; print_int (List.length charList);c::charList
done
with End_of_file -> close_in inchar;(*; print_int (List.length charList); printTest charList;*)
;;