--* From BMT%WATSON.vnet.ibm.com@yktvmh.watson.ibm.com  Fri Oct 15 11:37:06 1993
--* Received: from yktvmh.watson.ibm.com by radical.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA13518; Fri, 15 Oct 1993 11:37:06 -0400
--* Received: from watson.vnet.ibm.com by yktvmh.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 3604; Fri, 15 Oct 93 11:43:34 EDT
--* Received: from YKTVMH by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.BMT.NOTE.VAGENT2.9384.Oct.15.11:43:34.-0400>
--*           for asbugs@watson; Fri, 15 Oct 93 11:43:34 -0400
--* Received: from YKTVMH by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id 9382; Fri, 15 Oct 1993 11:43:33 EDT
--* Received: from cyst.watson.ibm.com by yktvmh.watson.ibm.com (IBM VM SMTP V2R3)
--*    with TCP; Fri, 15 Oct 93 11:43:33 EDT
--* Received: from spadserv.watson.ibm.com by cyst.watson.ibm.com (AIX 3.2/UCB 5.64/900528)
--*   id AA53544; Fri, 15 Oct 1993 11:43:01 -0400
--* Received: by spadserv.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA20164; Fri, 15 Oct 1993 11:44:54 -0400
--* Date: Fri, 15 Oct 1993 11:44:54 -0400
--* From: bmt@spadserv.watson.ibm.com
--* X-External-Networks: yes
--* Message-Id: <9310151544.AA20164@spadserv.watson.ibm.com>
--* To: asbugs@watson.ibm.com
--* Subject: asharp -Wcheck gives Bug: bad foam reference in const 0: [rectest.as][current]

--@ Fixed  by:  PI   Sun Mar 20 22:10:02 EST 1994 
--@ Tested by:  none 
--@ Summary:    no more a bug 


#include "aslib.as"
--#library listlib "list.aso"
--import listlib
f():List Record(a:Integer,b:Integer) == nil