diff options
Diffstat (limited to 'gcc/ada/switch-c.adb')
| -rw-r--r-- | gcc/ada/switch-c.adb | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index c860af4..f0acc45 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -228,6 +228,12 @@ package body Switch.C is Ptr := Ptr + 1; Operating_Mode := Check_Semantics; + -- Processing for C switch + + when 'C' => + Ptr := Ptr + 1; + CodePeer_Mode := True; + -- Processing for d switch when 'd' => @@ -358,6 +364,14 @@ package body Switch.C is return; + -- -gnateC switch (CodePeer SCIL generation) + -- Not enabled for now, keep it for later??? + -- use -gnatd.I only for now + + -- when 'C' => + -- Ptr := Ptr + 1; + -- Generate_SCIL := True; + -- -gnateD switch (preprocessing symbol definition) when 'D' => |