hcl/lib/posix/h2-io-file-get_default_option.adb
2014-06-21 16:33:31 +00:00

14 lines
251 B
Ada

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;