--* From SMWATT%WATSON.vnet.ibm.com@yktvmv.watson.ibm.com  Thu Jun 16 17:10:32 1994
--* Received: from yktvmv-ob.watson.ibm.com by asharp.watson.ibm.com (AIX 3.2/UCB 5.64/930311)
--*           id AA16413; Thu, 16 Jun 1994 17:10:32 -0400
--* Received: from watson.vnet.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 5563; Thu, 16 Jun 94 17:10:33 EDT
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.SMWATT.NOTE.VAGENT2.8603.Jun.16.17:10:32.-0400>
--*           for asbugs@watson; Thu, 16 Jun 94 17:10:33 -0400
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id 8597; Thu, 16 Jun 1994 17:10:32 EDT
--* Received: from spadserv.watson.ibm.com by yktvmv.watson.ibm.com
--*    (IBM VM SMTP V2R3) with TCP; Thu, 16 Jun 94 17:10:32 EDT
--* Received: by spadserv.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA11223; Thu, 16 Jun 1994 17:13:33 -0400
--* Date: Thu, 16 Jun 1994 17:13:33 -0400
--* From: smwatt@spadserv.watson.ibm.com (Stephen Watt)
--* X-External-Networks: yes
--* Message-Id: <9406162113.AA11223@spadserv.watson.ibm.com>
--* To: asbugs@watson.ibm.com
--* Subject: [3] multiple value returns clashing between "=>" and "return" give assertion failure or segmentation violation [foo.as][v35.6]

--@ Fixed  by:  PAB   Sat Aug 6 11:03:23 EDT 1994 
--@ Tested by:  embed.as 
--@ Summary:    made embed tags appear more often 


#include "aslib"

f(a: Integer): (Integer, Integer) == {
	a = 0 => (2,3);
	return (4,5)
}