From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,ebe6e2ef707c0384,start
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!postnews.google.com!h54g2000cwb.googlegroups.com!not-for-mail
From: "markww" <markww@gmail.com>
Newsgroups: comp.lang.ada
Subject: how to create a record
Date: 2 Nov 2006 19:14:58 -0800
Organization: http://groups.google.com
Message-ID: <1162523698.802339.225760@h54g2000cwb.googlegroups.com>
NNTP-Posting-Host: 69.112.238.205
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
X-Trace: posting.google.com 1162523705 26432 127.0.0.1 (3 Nov 2006 03:15:05
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Fri, 3 Nov 2006 03:15:05 +0000 (UTC)
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1;
 .NET CLR 1.1.4322; .NET CLR 2.0.50727),gzip(gfe),gzip(gfe)
Complaints-To: groups-abuse@google.com
Injection-Info: h54g2000cwb.googlegroups.com; posting-host=69.112.238.205;
   posting-account=cNKOMg0AAADT2ug8oGSYYXo8bsDvrHzw
Xref: g2news2.google.com comp.lang.ada:7338
Date: 2006-11-02T19:14:58-08:00
List-Id: <comp.lang.ada>

Hi,

How can I define a record or a class to this source file and create an
instance of it?

with Ada.Text_IO;

    type struct_device is
        record
           major_number : Integer          := 0;
           minor_number : Integer          := 0;
        end record;

procedure Ada_LinkedList is
begin
   Ada.Text_IO.Put_Line("Hello, world!");
   Ada.Text_IO.Put_Line("just terrible!");
end Ada_LinkedList;


I tried creating a record like in the above example, and compiling with
gnatmake but get the error:

C:\>gnatmake C:\Ada_LinkedList.adb
gcc -c -IC:\ -I- C:\ada_linkedlist.adb
ada_linkedlist.adb:4:05: compilation unit expected
gnatmake: "C:\ada_linkedlist.adb" compilation error

Thanks