diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/libsndfile.ads | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/src/libsndfile.ads b/src/libsndfile.ads index 2c0866c..d88c06d 100644 --- a/src/libsndfile.ads +++ b/src/libsndfile.ads @@ -7,6 +7,10 @@ pragma Ada_2012; +with + + Interfaces; + private with Interfaces.C, @@ -28,12 +32,12 @@ package Libsndfile is type Seek_From is (From_Start, From_Current, From_End); - type Short_Data is array (Positive range <>) of Short_Integer; - type Integer_Data is array (Positive range <>) of Integer; - type Float_Data is array (Positive range <>) of Float; - type Double_Data is array (Positive range <>) of Long_Float; + type Short_Data is array (Positive range <>) of Interfaces.Integer_16; + type Integer_Data is array (Positive range <>) of Interfaces.Integer_32; + type Float_Data is array (Positive range <>) of Interfaces.IEEE_Float_32; + type Double_Data is array (Positive range <>) of Interfaces.IEEE_Float_64; - type Raw_Data is new String; + type Raw_Data is array (Positive range <>) of Interfaces.Unsigned_8; type Metadata is (Title_String, |