Instantiating package problems

[Andrew Shvets <andrew.shvets@gmail.com>]

Hi all,

This is coming from the perspective of someone that has far more C++ OOP experience.  Basically, what I'm trying to do is create an instance of a package and then call a function from that object.  This is what I have below.  The calculator package is a simple package with the Addition function (which, you guessed it, just adds numbers together) that takes two integers and returns an integer.

I think I'm not quite getting this right or I've misunderstood something.  Here is my code so far and the results that I get when I compile it.

=========================================================
with Ada.Text_IO;

with Calculator;

procedure Main is
  Calc : Calculator;
begin
  ...

  Ada.Text_IO.Put_Line(" Addition:       " & Integer'Image(Calc.Addition(52, 31)));
  Ada.Text_IO.New_Line;
end Main;

OUTPUT:$ gnatmake -g main.adb calculator.adb
gcc -c -g main.adb
main.adb:10:10: subtype mark required in this context
main.adb:10:10: found "calculator" declared at calculator.ads:5
main.adb:22:60: invalid prefix in selected component "Calc"
gnatmake: "main.adb" compilation error
=========================================================