--* From postmaster%watson.vnet.ibm.com@yktvmv.watson.ibm.com  Wed Nov 17 10:22:43 1993
--* Received: from yktvmv.watson.ibm.com by leonardo.watson.ibm.com (AIX 3.2/UCB 5.64/4.03)
--*           id AA09125; Wed, 17 Nov 1993 10:22:43 -0500
--* X-External-Networks: yes
--* Received: from watson.vnet.ibm.com by yktvmv.watson.ibm.com (IBM VM SMTP V2R3)
--*    with BSMTP id 5251; Wed, 17 Nov 93 10:29:08 EST
--* Received: from YKTVMV by watson.vnet.ibm.com with "VAGENT.V1.0"
--*           id <A.BRONSTEI.NOTE.YKTVMV.5267.Nov.17.10:29:05.-0500>
--*           for asbugs@watson; Wed, 17 Nov 93 10:29:07 -0500
--* Received: from bernina.ethz.ch by watson.ibm.com (IBM VM SMTP V2R3) with TCP;
--*    Wed, 17 Nov 93 10:29:05 EST
--* Received: from neptune by bernina.ethz.ch with SMTP inbound id <19047-0@bernina.ethz.ch>; Wed, 17 Nov 1993 16:28:46 +0100
--* From: Manuel Bronstein <bronstei@inf.ethz.ch>
--* Received: from rutishauser.inf.ethz.ch (rutishauser-gw.inf.ethz.ch) by neptune id AA28237; Wed, 17 Nov 93 16:28:41 +0100
--* Date: Wed, 17 Nov 93 16:28:39 +0100
--* Message-Id: <9311171528.AA18116@rutishauser.inf.ethz.ch>
--* Received: from vinci.inf.ethz.ch.rutishauser by rutishauser.inf.ethz.ch id AA18116; Wed, 17 Nov 93 16:28:39 +0100
--* To: asbugs@watson.ibm.com
--* Subject: report from GMD Bonn

--@ Fixed  by:  SSD   Fri Nov 11 13:53:29 EST 1994 
--@ Tested by:  none 
--@ Summary:    Changed CharMax macro in foam_l.lsp to use (code-char (1- char-code-limit)). 


Here are a few comments from the Bonn (CATHODE) beta:

----------------------------------------------------------------
Date: Wed, 17 Nov 93 14:44:20 +0100
From: weiss@casun.gmd.de (Juergen Weiss)
MTo: <bronstei@inf.ethz.ch>
Subject: bug in foam_l.l

Hallo Manuel,

unfortunately I do not have the email address of NAG. I
found a bug in the file foam_l.l.

First of all, they use the lisp function `int-char', which
was eliminated from the ansi common lisp definition. But
besides that (a replacment could be `code-char'), they
use it in the wrong way.

The line

(defmacro |CharMax|      ()  #.(int-char char-code-limit))

must read

(defmacro |CharMax|      ()  #.(int-char (1- char-code-limit)))

because char-code-limit is the exclusive upper limit.

Greetings,

Juergen

Juergen Weiss         Gesellschaft fuer Mathematik und Datenverarbeitung (GMD)
                      Institut I1, Postfach 1316
                      53731 Sankt Augustin, Germany
-------------------------------------------------------------------
 
