diff options
| author | Robert Dewar <dewar@adacore.com> | 2006-10-31 19:15:40 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2006-10-31 19:15:40 +0100 |
| commit | e0ae4e94e9d2794ea89724bd7a7986728d019f15 (patch) | |
| tree | a0fad22476c6b71855e4e022da5369a844414a66 /gcc/ada/s-osinte-vms.adb | |
| parent | ba1cbfb946aef122c53787e3c6b5dd8ff32a539c (diff) | |
| download | gcc-e0ae4e94e9d2794ea89724bd7a7986728d019f15.zip gcc-e0ae4e94e9d2794ea89724bd7a7986728d019f15.tar.gz gcc-e0ae4e94e9d2794ea89724bd7a7986728d019f15.tar.bz2 | |
s-osinte-tru64.adb: Mark Asm statements Volatile to prevent warnings (seems a reasonable change...
2006-10-31 Robert Dewar <dewar@adacore.com>
* s-osinte-tru64.adb:
Mark Asm statements Volatile to prevent warnings (seems a
reasonable change anyway)
Fixes new warnings
* s-mastop-irix.adb: Add Volatile to Asm statements
Suppresses warning, and seems appropriate in any case
* s-osinte-vms.adb: Add Volatile to Asm statement
* s-vaflop-vms-alpha.adb: Add Volatile to Asm statements
* exp_code.ads, exp_code.adb (Asm_Input_Value): Note that Error can be
returned.
Add call to Check_Code_Statement
From-SVN: r118329
Diffstat (limited to 'gcc/ada/s-osinte-vms.adb')
| -rw-r--r-- | gcc/ada/s-osinte-vms.adb | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/s-osinte-vms.adb b/gcc/ada/s-osinte-vms.adb index 6215653..411bac3 100644 --- a/gcc/ada/s-osinte-vms.adb +++ b/gcc/ada/s-osinte-vms.adb @@ -7,7 +7,7 @@ -- B o d y -- -- -- -- Copyright (C) 1991-1994, Florida State University -- --- Copyright (C) 1995-2005, AdaCore -- +-- Copyright (C) 1995-2006, AdaCore -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -57,8 +57,9 @@ package body System.OS_Interface is begin Asm ("call_pal 0x9e" & LF & HT & "bis $31, $0, %0", - Outputs => pthread_t'Asm_Output ("=r", Self), - Clobber => "$0"); + Outputs => pthread_t'Asm_Output ("=r", Self), + Clobber => "$0", + Volatile => True); return Self; end pthread_self; |