From: Robert Dewar Date: Fri, 1 Aug 2008 07:37:40 +0000 (+0200) Subject: s-ststop.adb: Add some ??? comments X-Git-Tag: releases/gcc-4.4.0~3526 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a49b649fb8bd364696f32549227978f2024110d3;p=thirdparty%2Fgcc.git s-ststop.adb: Add some ??? comments 2008-08-01 Robert Dewar * s-ststop.adb: Add some ??? comments From-SVN: r138456 --- diff --git a/gcc/ada/s-ststop.adb b/gcc/ada/s-ststop.adb index 7dca75fbbe03..12dcdcef04b0 100644 --- a/gcc/ada/s-ststop.adb +++ b/gcc/ada/s-ststop.adb @@ -98,8 +98,12 @@ package body System.Strings.Stream_Ops is -- Canonical_Streams is present. A value of zero indicates whether any -- stream-related optimizations are enabled, while a value of one -- indicates a disabled status. + -- What is all this rubbish about C flags for a global config pragma??? Canonical_Streams : constant Boolean := Flag = 1; + -- This seems dubious, surely it should be (Flag /= 0) for normal + -- C semantics. Why not just import as a pragma Convention C Boolean + -- anyway, avoiding the need for junk flag ??? -- Block IO is used when the low level can support block IO, the size -- of the character type is a multiple of the stream element type and