You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
8 lines
274 B
8 lines
274 B
let () =
|
|
Format.printf "succes code is %d@\n" Exit.success_code;
|
|
Format.printf "failure code is %d@\n" Exit.failure_code;
|
|
if Exit.success_code = 0 && Exit.failure_code = 1 then Exit.success ()
|
|
else begin
|
|
Format.printf "not POSIX !@\n";
|
|
Exit.failure ()
|
|
end
|
|
|