Added a missing file

This commit is contained in:
hyung-hwan 2014-06-21 16:33:31 +00:00
parent 91cd073f8b
commit 45db0d7198

View File

@ -0,0 +1,13 @@
separate (H2.IO.File)
function Get_Default_Option return Option_Record is
Default_Option: constant Option_Record := (
Bits => OPTION_CRLF_IN,
CR => Ascii.Code.CR,
LF => Ascii.Code.LF
);
begin
return Default_Option;
end Get_Default_Option;