4 lines
96 B
Text
4 lines
96 B
Text
|
let r = ref "This test is KO.\n"
|
||
|
let test =
|
||
|
r := "This test is OK.\n";
|
||
|
print_string (!r)
|