I REQUEST ANY ONE TO TELL ME HOW TO WRITE STUBS IN RTRT FOR ADA95 LANGUAGE FOR THE FOLLOWING TYPE PROG
PACKAGE PACK1
BEGIN
PROCEDURE ADD(I,K:IN INTEGER,G:OUT INTEGER);
FUNCTION MUL(I,K:IN INTEGER)RETURN INTEGER;
END PACK1;
PACKAGE BODY PACK1
BEGIN
PROCEDURE ADD(I,K:IN INTEGER,G:OUT INTEGER)
IS BEGIN
G:=I+K;
END ADD;
FUNCTION MUL(I,K:IN INTEGER)RETURN INTEGER IS
BEGIN
RETURN (I*K);
END BODY PACK1;
WITH PACK1;
PROCEDURE MAIN IS
RES1,RES2:INTEGER;
BEGIN
PACK1.ADD(X,Y,RES1);
RES2:=PACK1.MUL(X,Y);
END MAIN;
I LIKE TETS THE PROCEDURE MAIN BY WRITING STUBS FOR ADD AND MUL IN RTRT
USING ADA95 LANGUAGE
