blob: bbe47249cd7fbc5960493633e0998a72f8ce5530 [file] [log] [blame]
package body inline_scope_p is
procedure Assert (Expr : Boolean; Str : String) is
begin
if Expr then
null;
end if;
end Assert;
end;