--* From postmaster%watson.vnet.ibm.com@yktvmv.watson.ibm.com  Wed May 12 08:22:12 1993
--* Received: from yktvmv2.watson.ibm.com by radical.watson.ibm.com (AIX 3.2/UCB 5.64/900524)
--*           id AA14587; Wed, 12 May 1993 08:22:12 -0400
--* X-External-Networks: yes
--* Received: from watson.vnet.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 1641; Wed, 12 May 93 08:22:37 EDT
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.LAMBE.NOTE.YKTVMV.3929.May.12.08:22:36.-0400>
--*           for asbugs@watson; Wed, 12 May 93 08:22:37 -0400
--* Received: from kth.se by watson.ibm.com (IBM VM SMTP V2R3) with TCP;
--*    Wed, 12 May 93 08:22:35 EDT
--* Received: from candida.matematik.su.se by kth.se (5.65+bind 1.7+ida 1.4.2/6.0)
--* 	id AA21409; Wed, 12 May 93 14:22:30 +0200
--* Received: from insanus (insanus.matematik.su.se) by candida.matematik.su.se (4.1/6.0)
--* 	id AA10481; Wed, 12 May 93 14:26:28 +0200
--* From: Larry Lambe  <lambe@matematik.su.se>
--* Received: by insanus (4.1/6.0)
--* 	id AA07300; Wed, 12 May 93 14:27:14 +0200
--* Date: Wed, 12 May 93 14:27:14 +0200
--* Message-Id: <9305121227.AA07300@insanus>
--* To: asbugs@watson.ibm.com
--* Subject: lines commented out show up in compilation (use testas) [commentBug.as][sun SPARC 10 OS 4.1.3 cc]

--@ Fixed  by: SMW Wed Oct 13 16:27:04 1993
--@ Tested by: n/a
--@ Summary:   Not a bug -- see explanation of testas

--> testrun -lasdem

#include "aslib.as"

#library Dlib "asdem"

import Dlib
import SingleInteger

R ==> Integer
import R

hdp ==> HomogeneousDirectProduct(18)
import hdp

poly ==> Polynomial(R,hdp)
import poly

-- l : List poly := [pa,pb,pc]
-- print(l)()

import GroebnerPackage(R,hdp,poly)
import String

-- base := groebner(l,"info")
-- print(base)()
 
--+ We are not able to reproduce the reported problem and suspect that it
--+ may be a misunderstanding about "testas".  Testas runs a program and
--+ compares its results against a standard test result.  If you comment out
--+ lines in the test, the test result will still have them so they will
--+ show up in the diffs.
