impbit.adb

来自「用于进行gcc测试」· ADB 代码 · 共 7 行

with System;
with Ada.Text_IO;
procedure Impbit is
begin
   Ada.Text_IO.Put_Line (System.Address'Size'Img);
end Impbit;