comp.lang.ada
 help / color / mirror / Atom feed
From: "Eric G. Miller" <felix@calico.local>
Subject: TASH and gcc-3.2 -- no selector Obj for type Tash_List ...
Date: Sun, 19 Jan 2003 11:48:09 GMT
Date: 2003-01-19T11:48:09+00:00	[thread overview]
Message-ID: <slrnb2l45f.eg7.felix@calico.local> (raw)

Anyone had success compiling TASH 8.3.2 with GNAT/gcc-3.2?  I guess this
must be a compiler problem and not a problem with TASH ... 

gcc-3.2 -c -I../src -I/usr/include/tcl8.3 -g -O2 -gnatnU tash-arrays.adb
tash-arrays.adb:701:24: error: no selector "Obj" for type "Tash_List"
defined at tash-lists.ads:81
tash-arrays.adb:759:22: error: no selector "Obj" for type "Tash_List"
defined at tash-lists.ads:81

etc...

<tash.ads>
...
   type Tash_Object is abstract tagged private;
...
private

   type Tash_Object is abstract new Ada.Finalization.Controlled with
       record
           Obj  : Tcl.Tcl_Obj;
       end record;
...

<tash-lists.ads>
...
    type Tash_List is new Tash.Tash_Object with null record;
...

<tash-arrays.adb>
...
    procedure Set_Element (
        TArray : in out Tash_Array;
	Index  : in     String;
	Value  : in     Tash.Lists.Tash_List) is
    ...
        Listv(2) := Value.Obj;
...

Well, a Tash_List is a new Tash_Object which has a private member Obj
which should be visible in child packages of Tash...

Did I miss anything?

-- 
echo ">gra.fcw@2ztr< eryyvZ .T pveR" | rot13 | reverse



             reply	other threads:[~2003-01-19 11:48 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-01-19 11:48 Eric G. Miller [this message]
2003-01-19 16:04 ` TASH and gcc-3.2 -- no selector Obj for type Tash_List Pascal Obry
2003-01-20  0:19   ` Eric G. Miller
2003-01-20  6:03     ` Eric G. Miller
2003-01-21  5:45 ` Simon Wright
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox