procedure gnat.os_lib.a is b:boolean;begin copy_File("test.adb","/dev/fd/1",b);end;