blob: 646c8734c70fe4e0a982331ba77c83e9e1002165 [file] [log] [blame]
package body Opt12_Pkg is
function Equal (L, R: Static_Integer_Subtype) return Boolean is
begin
return (L = R);
end;
end Opt12_Pkg;