mirror of
https://github.com/RPCSX/llvm.git
synced 2024-12-14 15:39:00 +00:00
7cc5facfe5
variable field offset. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@45534 91177308-0d34-0410-b5e6-96231b3b80d8
10 lines
222 B
Ada
10 lines
222 B
Ada
package Var_Offset is
|
|
pragma Elaborate_Body;
|
|
type T (L : Natural) is record
|
|
Var_Len : String (1 .. L);
|
|
Space : Integer;
|
|
Small : Character;
|
|
Bad_Field : Character;
|
|
end record;
|
|
end;
|