diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-05 09:28:44 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-05 09:28:44 +0000 |
commit | 1d09b51bf91b2f5cf7e75bd423df9364c429049d (patch) | |
tree | b980f1ccd45d364189d873fb59b18dde45f146fc /gcc/ada/g-sercom.ads | |
parent | 52ff39785d407a54b7d4aaaf1b8582047fe6b51a (diff) | |
download | gcc-1d09b51bf91b2f5cf7e75bd423df9364c429049d.tar.gz |
2008-08-05 Thomas Quinot <quinot@adacore.com>
* g-sercom.adb, g-sercom.ads, g-sercom-mingw.adb,
g-sercom-linux.adb (Data_Bits): Change literals B7 and B8 to CS7 and
CS8.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@138687 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-sercom.ads')
-rw-r--r-- | gcc/ada/g-sercom.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/g-sercom.ads b/gcc/ada/g-sercom.ads index 3d327cec76f..e425d9d5550 100644 --- a/gcc/ada/g-sercom.ads +++ b/gcc/ada/g-sercom.ads @@ -51,7 +51,7 @@ package GNAT.Serial_Communications is (B1200, B2400, B4800, B9600, B19200, B38400, B57600, B115200); -- Speed of the communication - type Data_Bits is (B8, B7); + type Data_Bits is (CS8, CS7); -- Communication bits type Stop_Bits_Number is (One, Two); @@ -71,7 +71,7 @@ package GNAT.Serial_Communications is procedure Set (Port : Serial_Port; Rate : Data_Rate := B9600; - Bits : Data_Bits := B8; + Bits : Data_Bits := CS8; Stop_Bits : Stop_Bits_Number := One; Parity : Parity_Check := None; Block : Boolean := True; |