From 4351c21b9c472d35682fe1000aa23b392b85a914 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 22 Aug 2008 17:07:34 +0200 Subject: checks.adb (Determine_Range): Deal with values that might be invalid 2008-08-22 Robert Dewar * checks.adb (Determine_Range): Deal with values that might be invalid * opt.adb, opt.ads (Assume_No_Invalid_Values[_Config]): New configuration switches. * par-prag.adb: Dummy entry for pragma Assume_No_Invalid_Values * sem_prag.adb: Implement pragma Assume_No_Default_Values * snames.adb, snames.ads, snames.h: Add entries for pragma Assume_No_Invalid_Values * switch-c.adb: Add processing for -gnatB switch * usage.adb: Add entry for flag -gnatB (no bad invalid values) From-SVN: r139484 --- gcc/ada/switch-c.adb | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'gcc/ada/switch-c.adb') diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index 63a1a6d..98f70f9 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -212,6 +212,12 @@ package body Switch.C is Ptr := Ptr + 1; Brief_Output := True; + -- Processing for B switch + + when 'B' => + Ptr := Ptr + 1; + Assume_No_Invalid_Values := True; + -- Processing for c switch when 'c' => -- cgit v1.1