--* From postmaster%watson.vnet.ibm.com@yktvmv.watson.ibm.com  Tue Jul  5 16:57:22 1994
--* Received: from yktvmv-ob.watson.ibm.com by asharp.watson.ibm.com (AIX 3.2/UCB 5.64/930311)
--*           id AA20387; Tue, 5 Jul 1994 16:57:22 -0400
--* Received: from watson.vnet.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 8227; Tue, 05 Jul 94 16:57:25 EDT
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.JENKS.NOTE.VAGENT2.3403.Jul.05.16:57:17.-0400>
--*           for asbugs@watson; Tue, 05 Jul 94 16:57:24 -0400
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id 3373; Tue, 5 Jul 1994 16:57:17 EDT
--* Received: from leonardo.watson.ibm.com by yktvmv.watson.ibm.com
--*    (IBM VM SMTP V2R3) with TCP; Tue, 05 Jul 94 16:56:44 EDT
--* Received: by leonardo.watson.ibm.com (AIX 3.2/UCB 5.64/920123)
--*           id AA22079; Tue, 5 Jul 1994 16:52:00 -0400
--* Date: Tue, 5 Jul 1994 16:52:00 -0400
--* From: jenks@leonardo.watson.ibm.com
--* X-External-Networks: yes
--* Message-Id: <9407052052.AA22079@leonardo.watson.ibm.com>
--* To: asbugs@watson.ibm.com
--* Subject: [5] Type "Record" after asharp -gloop; I want to see operations exported but information is incomplete [/u/jenks/record.asbug][?]

--@ Fixed  by:  SSD   Wed Aug 10 17:06:42 EDT 1994 
--@ Tested by:  none 
--@ Summary:    Now printing export lists for more categories, but the type of Record/Union/Enum is correctly being reported. Other builtin symes from these types just do not show up in the category. 


$ asharp -gloop
%1 >>
      ^.........^...........^
[L1 C1] #3 (Error) There are no suitable meanings for the operator `Record'.
[L1 C11] #2 (Error) No meaning for identifier `Integer'.
[L1 C23] #1 (Error) No meaning for identifier `Float'.

%2 >> #include "aslib.as"
%3 >>
  () @ Join(
 with
    ==  add ()
, BasicType)
%4 >> #int help

Available options:

#int verbose [on|off]  print the value of an evaluated expression.
#int history [on|off]  try to wrap an assignment around the current line.
#int confirm [on|off]  ask for confirmation before redefining something.
#int msg-limit [num]  set the limit size of some messages; 0 for no-limit.
#int options ...  reset command line options.
#int gc     perform garbage collection.
#int help     display this message.
%5 >> #int msg-limit 0
msg-limit is none.
%6 >> Record(a: Integer, b: Float)
  () @ Join(
 with
    ==  add ()
, BasicType)
%7 >> Record;
  () @ (T: Tuple(Type)) -> Join(
 with
    ==  add ()
, BasicType)