summaryrefslogtreecommitdiff
path: root/src/ortho/mcode/binary_file.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/ortho/mcode/binary_file.ads')
-rw-r--r--src/ortho/mcode/binary_file.ads1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/ortho/mcode/binary_file.ads b/src/ortho/mcode/binary_file.ads
index 1a2bf58..4618aeb 100644
--- a/src/ortho/mcode/binary_file.ads
+++ b/src/ortho/mcode/binary_file.ads
@@ -154,6 +154,7 @@ private
type Byte_Array_Base is array (Pc_Type range <>) of Byte;
subtype Byte_Array is Byte_Array_Base (Pc_Type);
type Byte_Array_Acc is access Byte_Array;
+ pragma No_Strict_Aliasing (Byte_Array_Acc);
type String_Acc is access String;
--type Section_Flags is new Unsigned_32;