diff options
Diffstat (limited to 'cfrontend/CPragmas.ml')
| -rw-r--r-- | cfrontend/CPragmas.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/cfrontend/CPragmas.ml b/cfrontend/CPragmas.ml index 2a86977..6fa6d5c 100644 --- a/cfrontend/CPragmas.ml +++ b/cfrontend/CPragmas.ml @@ -27,8 +27,7 @@ let process_section_pragma classname istring ustring addrmode accmode = ?uname: (if ustring = "" then None else Some ustring) ?writable: (if accmode = "" then None else Some(String.contains accmode 'W')) ?executable: (if accmode = "" then None else Some(String.contains accmode 'X')) - ?near: (if addrmode = "" then None - else Some(addrmode = "near-code" || addrmode = "near-data")) + ?near: (if addrmode = "" then None else Some(addrmode = "near-data")) () (* #pragma use_section *) |