diff options
Diffstat (limited to 'gcc/ada/s-direio.adb')
| -rw-r--r-- | gcc/ada/s-direio.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/s-direio.adb b/gcc/ada/s-direio.adb index 2dac1b1a178..d7d94957c0b 100644 --- a/gcc/ada/s-direio.adb +++ b/gcc/ada/s-direio.adb @@ -319,6 +319,10 @@ package body System.Direct_IO is procedure Do_Write; -- Do the actual write + -------------- + -- Do_Write -- + -------------- + procedure Do_Write is begin FIO.Write_Buf (AP (File), Item, Size); |