spacepaste
new
Paste details
reply
|
raw
let
parse_line
line
=
let
i
=
ref
0
in
begin
try
i
:=
int_of_string
line
with
Failure
_
->
()
;
printf
"%d
\n
%!"
!
i
;
end