RosettaCodeData/Task/Function-definition/Ada/function-definition-6.ada
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

7 lines
213 B
Ada

with Multiply;
...
function Multiply_Integer is new Multiply(Number => Integer);
use Multiply_Integer; -- If you must
type My_Integer is Range -100..100;
function Multiply_My_Integer is new Multiply(My_Integer);