From: rgelb@csulb.edu (Robert Gelb)
Subject: Help to translate from ADA 2 C/C++
Date: 1996/04/08
Date: 1996-04-08T00:00:00+00:00 [thread overview]
Message-ID: <4ka02c$d2d@hatathli.csulb.edu> (raw)
I am having a hell of a time trying to translate this ADA program into
C/C++. Maybe someone can help me.
Here is the program:
type person(sex:gender);
type car;
type person_name is access person;
type car_name is access car;
type car is
record
number: integer;
owner: person_name;
end record;
type person(sex:gender) is
record
name :string(1..20);
birth :date;
age :integer range 0..130;
vehicle : car_name;
case sex is
when M =>
wife: person_name(F);
when F =>
husband:person_name(M);
end case;
end record;
next reply other threads:[~1996-04-08 0:00 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
1996-04-08 0:00 Robert Gelb [this message]
1996-04-08 0:00 ` Help to translate from ADA 2 C/C++ Bob Kitzberger
1996-04-08 0:00 ` Robert Dewar
1996-04-13 0:00 ` Michael Feldman
1996-04-08 0:00 ` Robert Dewar
1996-04-14 0:00 ` AJW
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox