Sign in
gnu
/
gcc
/
358dab90186b30a5d287710f13625c327210218d
/
.
/
gcc
/
testsuite
/
ada
/
acats
/
support
/
impbit.adb
blob: 5e189b0625702e8996d864b51a52d6053cc7114a [
file
] [
log
] [
blame
]
with
System
;
with
Ada
.
Text_IO
;
procedure
Impbit
is
begin
Ada
.
Text_IO
.
Put_Line
(
System
.
Address
'Size'
Img
);
end
Impbit
;