--* From IGLIO%WATSON.vnet.ibm.com@yktvmv.watson.ibm.com  Sat Jul 30 16:58:30 1994
--* Received: from yktvmv-ob.watson.ibm.com by asharp.watson.ibm.com (AIX 3.2/UCB 5.64/930311)
--*           id AA22641; Sat, 30 Jul 1994 16:58:30 -0400
--* Received: from watson.vnet.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 9819; Sat, 30 Jul 94 16:58:34 EDT
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.IGLIO.NOTE.VAGENT2.2291.Jul.30.16:58:33.-0400>
--*           for asbugs@watson; Sat, 30 Jul 94 16:58:34 -0400
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id 2287; Sat, 30 Jul 1994 16:58:33 EDT
--* Received: from galois.watson.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with TCP; Sat, 30 Jul 94 16:58:33 EDT
--* Received: by galois.watson.ibm.com (AIX 3.2/UCB 5.64/4.03)
--*           id AA13039; Sat, 30 Jul 1994 16:58:42 -0400
--* Date: Sat, 30 Jul 1994 16:58:42 -0400
--* From: iglio@galois.watson.ibm.com
--* Message-Id: <9407302058.AA13039@galois.watson.ibm.com>
--* To: asbugs@watson.ibm.com
--* Subject: [3] No output for record field in interactive mode [rec.as][v0.36.1]

--@ Fixed  by:  SSD   Mon Aug 1 08:47:49 EDT 1994 
--@ Tested by:  none 
--@ Summary:    Use tfDefineeType in fintWrapVerbose 


#include "aslib"

SI==>SingleInteger
Couple==>Record(x:SI,y:SI)

import from Couple

a := [1,2]

a.x  -- no output in interactive mode

print << a.x  -- output ok