From stolcke@ICSI.Berkeley.EDU  Tue Jul  5 15:29:39 1994
Return-Path: <stolcke@ICSI.Berkeley.EDU>
Received: from cli.com by jingles.cli.com.cliftp (4.1/SMI-4.1)
	id AA02813; Tue, 5 Jul 94 15:29:39 CDT
Received: from icsia.ICSI.Berkeley.EDU by cli.com (4.1/SMI-4.1)
	id AA21383; Tue, 5 Jul 94 14:24:55 CDT
Received: from tiramisu (stolcke@tiramisu.ICSI.Berkeley.EDU [128.32.201.72])  by icsia.ICSI.Berkeley.EDU (8.6.8/HUB+V8$Revision: 1.21 $) with ESMTP id MAA01102; Tue, 5 Jul 1994 12:10:17 -0700
Received: from localhost (stolcke@localhost) 
	by tiramisu (8.6.8/1.8) with ESMTP
	id MAA05980; Tue, 5 Jul 1994 12:10:14 -0700
Message-Id: <199407051910.MAA05980@tiramisu>
X-Authentication-Warning: tiramisu: stolcke owned process doing -bs
To: schelter@posso.ibp.fr (William Schelter)
Cc: gcl@cli.com, tkunze@vader.kgw.TU-Berlin.DE, poirot@aio.jsc.nasa.gov,
        cwitty@csl.sri.com, kcng@iet.com, bm1822@adasv2.sbc.com
Subject: Re: pcl (clos) under gcl 1.0 
In-Reply-To: Your message of Tue, 05 Jul 1994 18:59:00 +0200.
             <9407051659.AA14629@posso.ibp.fr> 
Date: Tue, 05 Jul 1994 12:10:13 PDT
From: Andreas Stolcke <stolcke@ICSI.Berkeley.EDU>

In message <9407051659.AA14629@posso.ibp.fr>you wrote:
> I have put a complete version of PCL (the xerox common lisp object system)
> adapted for GNU common lisp (GCL version 1.0) on 
> 

great! a small problem seems to remain:  defclass.lisp makes use of
the CltL2 macro `declaim' which is not defined in GCL.  It's trivial
to fix it to use the old `proclaim' instead.

I was successful in build pcl-gcl for sun4 and testing it on 
some 20k lines of CLOS code from my thesis.  I wasn't as lucky
with the sgi4d version.  I fails to compile gcl-low.c because cc complains
about the line 

use_fast_links();

generated at line 1877.  Any ideas?
s
--Andreas

*** defclass.lisp.orig	Mon Dec 21 13:24:38 1992
--- defclass.lisp	Tue Jul  5 10:39:11 1994
***************
*** 178,189 ****
                     (if defstruct-p '(load eval) *defclass-times*)
  		   `(progn
  		      ,@(mapcar #'(lambda (x)
! 				    `(declaim (ftype (function (t) t) ,x)))
  				#+cmu *readers* #-cmu nil)
  		      ,@(mapcar #'(lambda (x)
  				    #-setf (when (consp x)
  					     (setq x (get-setf-function-name (cadr x))))
! 				    `(declaim (ftype (function (t t) t) ,x)))
  				#+cmu *writers* #-cmu nil)
  		      (let ,(mapcar #'cdr *initfunctions*)
  			(load-defclass ',name
--- 178,189 ----
                     (if defstruct-p '(load eval) *defclass-times*)
  		   `(progn
  		      ,@(mapcar #'(lambda (x)
! 				    `(proclaim '(ftype (function (t) t) ,x)))
  				#+cmu *readers* #-cmu nil)
  		      ,@(mapcar #'(lambda (x)
  				    #-setf (when (consp x)
  					     (setq x (get-setf-function-name (cadr x))))
! 				    `(proclaim '(ftype (function (t t) t) ,x)))
  				#+cmu *writers* #-cmu nil)
  		      (let ,(mapcar #'cdr *initfunctions*)
  			(load-defclass ',name

From chrisp@max.tiac.net  Fri Jul 15 07:26:13 1994
Return-Path: <chrisp@max.tiac.net>
Received: from cli.com by jingles.cli.com.cliftp (4.1/SMI-4.1)
	id AA03840; Fri, 15 Jul 94 07:26:13 CDT
Received: from max.tiac.net by cli.com (4.1/SMI-4.1)
	id AA13439; Fri, 15 Jul 94 06:26:51 CDT
Received: (from chrisp@localhost) by max.tiac.net (8.6.8/8.6.6.Beta9) id HAA13751; Fri, 15 Jul 1994 07:23:42 -0400
Date: Fri, 15 Jul 1994 07:23:42 -0400
From: Chris Patti { Feoh } <chrisp@max.tiac.net>
Message-Id: <199407151123.HAA13751@max.tiac.net>
To: wfs@math.utexas.edu
Cc: gcl@cli.com
Subject: Here are the diffs to gcl.el that made it work for me..


Hi.

I had to bash gcl.el a bit to get it to work. Here is the diff:

83c83,84
<   (require 'shell)
---
>   (require 'sshell)
>   (load "inf-lisp")
97c98,100
< 	  (t  (inferior-lisp-mode))))
---
> 	  (t
> 	   (inferior-lisp-mode)
> 	   (setq inferior-lisp-buffer (get-buffer "*gcl-lisp*")))))
347d349
< 

'run' was failing on make-shell because you had required 'shell instead of 
'sshell.

The bigger problem was that you were trying to use inferior-lisp-mode which
doesn't come pre-loaded <at least not with emacs 19.22>. it's only loaded 
after inferior-lisp is called which autoloads the rest of the package.. The
way I got around this <inelegant?> is to load inf-lisp.el which contains the 
appropriate code.

The only other problem was that once we'd successfully entered inferior-lisp-
mode emacs didn't know which lisp to send to, so I set the inferior-lisp-buffer
variable to the buffer named *gcl-lisp* which gets created by make-shell.

That's about it.

Am I missing something blatantly obvious? Did I do all this for naught because
I forgot some subtle trick in the installation procedure?

-Chris
P.S. It's so short I'm going to include the full gcl.el here since I'm not
sure I did the right thing with diff. <My man page is missing, Uhgh.>


From rcthakur@map.iitd.ernet.in  Tue Oct 18 04:51:55 1994
Return-Path: <rcthakur@map.iitd.ernet.in>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02281; Tue, 18 Oct 94 04:51:55 CDT
Received: from sangam.ncst.ernet.in by cli.com (4.1/SMI-4.1)
	id AA19734; Tue, 18 Oct 94 03:41:41 CDT
Received: (from root@localhost) by sangam.ncst.ernet.in (8.6.8.1/8.6.6) with UUCP id OAA22204; Tue, 18 Oct 1994 14:11:10 +0500
Received: from map.iitd.ernet.in (netearth) by henna.iitd.ernet.in (4.1/SMI-4.1-MHS-7.0
 )
	id AA16123; Tue, 18 Oct 94 14:10:49 IST
X-Organisation: Indian Institute of Technology, New Delhi.
Received: by map.iitd.ernet.in; id AA01059; Tue, 18 Oct 1994 14:10:48 +0530
Received: by map; Tue, 18 Oct 1994 14:10:48 +0530
	id AA01059; Tue, 18 Oct 1994 14:10:48 +0530
Date: Tue, 18 Oct 1994 14:10:47 +0530 (IST)
From: "Mr. R.C. Thakur SSO-II" <rcthakur@map.iitd.ernet.in>
Subject: 
To: gcl-request@cli.com
Cc: gcl@cli.com
Message-Id: <Pine.3.89.9410181412.A947-0100000@map.iitd.ernet.in>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

subscribe mailing list


From @festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk  Tue Oct 18 13:05:13 1994
Return-Path: <@festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02318; Tue, 18 Oct 94 13:05:13 CDT
Received: from sun2.nsfnet-relay.ac.uk by cli.com (4.1/SMI-4.1)
	id AA20943; Tue, 18 Oct 94 11:46:04 CDT
Via: uk.ac.edinburgh.festival; Tue, 18 Oct 1994 16:43:48 +0100
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa03962;
          18 Oct 94 16:44 BST
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk;
          Tue, 18 Oct 94 16:42:48 BST
Date: Tue, 18 Oct 94 16:42:47 BST
Message-Id: <22533.9410181542@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Subject: null-terminated strings?
To: gcl@cli.com

Are strings in GCL null-terminated?  It would make it much easier
to pass them to C functions if they were.

-- jeff

From wfs@math.utexas.edu  Tue Oct 18 16:53:20 1994
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02360; Tue, 18 Oct 94 16:53:20 CDT
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA21644; Tue, 18 Oct 94 15:21:00 CDT
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA25421; Tue, 18 Oct 94 15:18:00 -0500
Date: Tue, 18 Oct 94 15:17:53 -0500
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Tue, 18 Oct 94 15:17:53 -0500
Message-Id: <9410182017.AA06001@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA06001; Tue, 18 Oct 94 15:17:53 -0500
To: gcl@cli.com
Cc: jeff@aiai.edinburgh.ac.uk
In-Reply-To: Jeff Dalton's message of Tue, 18 Oct 94 16:42:47 BST <22533.9410181542@subnode.aiai.ed.ac.uk>
Subject: Re: null-terminated strings?
Reply-To: wfs@math.utexas.edu


They are not null terminated.

but the function object_to_string(x) takes a lisp string and returns a C string
which is null terminated.

In either the case the string is with fill pointer and fill pointer < length
or in the case length mod 4 is not 0, the result will not require a copy.
Otherwise it is copied.

The functions like defentry automatically invoke this.

Another thing to worry about is that if your string is relocatable,
then it will move on gc, so be careful if you let C hang onto it past
a garbage collection.

















From attardi@DI.UniPi.IT  Wed Oct 19 05:54:06 1994
Return-Path: <attardi@DI.UniPi.IT>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02423; Wed, 19 Oct 94 05:54:06 CDT
Received: from apollo.di.unipi.it by cli.com (4.1/SMI-4.1)
	id AA23119; Wed, 19 Oct 94 04:47:31 CDT
Received: from omega.di.unipi.it by apollo.di.unipi.it with SMTP
	(1.37.109.4/16.2) id AA08170; Wed, 19 Oct 94 10:46:24 +0100
Organization: Dipartimento di Informatica - Universita' di Pisa - Italy
Received: by omega (5.0/SMI-4.1)
	id AA01232; Wed, 19 Oct 1994 10:45:45 --100
Date: Wed, 19 Oct 1994 10:45:45 --100
From: attardi@DI.UniPi.IT
Message-Id: <9410190945.AA01232@omega>
To: jeff@aiai.edinburgh.ac.uk
Cc: gcl@cli.com
In-Reply-To: <22533.9410181542@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Tue, 18 Oct 94 16:42:47 BST)
Subject: Re: null-terminated strings?
Content-Length: 568


   >From <@festival.ed.ac.uk:jeff@aiai.edinburgh.ac.uk> Tue Oct 18 18:55:26 1994
   Date: Tue, 18 Oct 94 16:42:47 BST
   From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>

   Are strings in GCL null-terminated?  It would make it much easier
   to pass them to C functions if they were.

ECoLisp has null terminated strings, stored in non relocatable pages to
avoid the problems mentioned by Schelter.
Many changes were required to the original KCL code to support this feature.
You may look at the ECoLisp code:

	ftp.di.unipi.it:/pub/lang/lisp/ecl-0.15.tar.gz

-- Beppe

From wfs@math.utexas.edu  Wed Oct 19 13:57:54 1994
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02633; Wed, 19 Oct 94 13:57:54 CDT
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA24249; Wed, 19 Oct 94 12:39:38 CDT
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA18540; Wed, 19 Oct 94 12:36:18 -0500
Date: Wed, 19 Oct 94 12:36:06 -0500
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Wed, 19 Oct 94 12:36:06 -0500
Message-Id: <9410191736.AA07089@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA07089; Wed, 19 Oct 94 12:36:06 -0500
To: gcl@cli.com
Cc: jeff@aiai.edinburgh.ac.uk, attardi@DI.UniPi.IT
In-Reply-To: attardi@DI.UniPi.IT's message of Wed, 19 Oct 1994 10:45:45 --100 <9410190945.AA01232@omega>
Subject: Re: null-terminated strings?
Reply-To: wfs@math.utexas.edu


 
   has null terminated strings, stored in non relocatable pages to
   avoid the problems mentioned by Schelter.

Perhaps I was not sufficiently precise.    If you are passing information
frequently to C via a string, to avoid any consing you may reuse a string:

(setq s (make-array (+ n 1) :element-type 'string-char :static t :fill-pointer 0))

if n is the longest string you are interested in.  A convenient way to
copy into a string with fill pointer is to use format..

(format s "~a" x)













From hxl@epic.com  Thu Oct 20 19:22:32 1994
Return-Path: <hxl@epic.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03386; Thu, 20 Oct 94 19:22:32 CDT
Received: from epic.com ([192.58.180.22]) by cli.com (4.1/SMI-4.1)
	id AA28579; Thu, 20 Oct 94 18:02:24 CDT
Received: from weber.epic ([192.58.180.44]) by epic.com (4.1/JMA.3)
	id AA13483; Thu, 20 Oct 94 16:06:49 PDT
Received: by weber.epic (4.1/SMI-4.1)
	id AA17430; Thu, 20 Oct 94 16:02:19 PDT
Date: Thu, 20 Oct 94 16:02:19 PDT
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <9410202302.AA17430@weber.epic>
To: gcl@cli.com
Subject: ftp.cli.com not responding?
Reply-To: hxl@epic.com

Hi,

I'm having trouble with ftp.cli.com, which is supposedly the archive
site for gcl related materials. It doesn't seem to allow anonymous
ftp. Am I doing something wrong?

hxl

From boyer@cli.com  Fri Oct 21 13:25:22 1994
Return-Path: <boyer@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03796; Fri, 21 Oct 94 13:25:22 CDT
Received: from rita (rita.cli.com) by cli.com (4.1/SMI-4.1)
	id AA00759; Fri, 21 Oct 94 12:17:13 CDT
From: boyer@cli.com (Robert S. Boyer)
Received: by rita (4.1) id AA11522; Fri, 21 Oct 94 12:17:13 CDT
Date: Fri, 21 Oct 94 12:17:13 CDT
Message-Id: <9410211717.AA11522@rita>
To: nqthm-users@cli, gcl@cli
Subject: anonymous ftp access to ftp.cli.com is impossible for some

In the past, some software such as GCL and Nqthm has been advertised
as being available through anonymous ftp from ftp.cli.com.  Yesterday
I learned, however, that anonymous ftp to ftp.cli.com does not work
from some Internet sites, namely from any site whose IP number cannot
be resolved into a hostname.

Until yesterday, people encountering such difficulties simply had
their attempted connections broken, without explanation, immediately
after supplying the "anonymous" login name.  Now at least they should
receive a message that suggests that they try to initiate the ftp
connection from some machine whose hostname is published in some way
that ftp.cli.com can detect.

I regret that this restriction exists.  It is certainly not something
I favor.

I apologize to those who have been disconnected without explanation.

Bob



From hxl@epic.com  Mon Oct 24 17:33:02 1994
Return-Path: <hxl@epic.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04495; Mon, 24 Oct 94 17:33:02 CDT
Received: from epic.com ([192.58.180.22]) by cli.com (4.1/SMI-4.1)
	id AA06756; Mon, 24 Oct 94 15:43:44 CDT
Received: from healy.epic ([192.58.180.73]) by epic.com (4.1/JMA.3)
	id AA29314; Mon, 24 Oct 94 13:49:19 PDT
Received: by healy.epic (4.1/SMI-4.1)
	id AA29489; Mon, 24 Oct 94 13:43:55 PDT
Date: Mon, 24 Oct 94 13:43:55 PDT
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <9410242043.AA29489@healy.epic>
To: gcl@cli.com
Cc: wfs@math.utexas.edu
Subject: compiler optimization --- what am i doing wrong?
Reply-To: hxl@epic.com

Hi,

I'm trying to assess the efficiency of compiled code in gcl (1.1
beta.) I've got the following piece of code to do the hanoi tower
problem:

	(defun hanoi (n)
	  (labels ((move-them (n from to helper)
			      (if (> n 1)
				(progn
				 (move-them (- n 1) from helper to)
	;			 (format t "~a --> ~a~%" from to)
				 (move-them (- n 1) helper to from)))))
		  (move-them n 'L 'C 'R)))

When I compile and run this on a Sparc 10-50, the run times I got are:

	(hanoi 20)	-> 3.7 sec.
	(hanoi 25)	-> 151.56 sec.
	(hanoi 30)	-> (killed after a hour)

Whereas an almost identical program in scheme, when compiled and run
in Scheme->C from DEC, yields:

  	(hanoi 20)	-> 0.3 sec.
	(hanoi 25) 	-> 13.50 sec.
	(hanoi 30)	-> 447.20 sec.

(By the way, I also coded it in C, which run about 3 times faster than
 Scheme->C, and about 20-30 times that of gcl.)

I looked at the C code generated. Here's the guts of the c code from
gcl:

/*      local function MOVE-THEM        */

static L2(base0)
register object *base0;
{       register object *base=vs_base;
        register object *sup=base+VM2; VC2
        vs_check;
        {object V2;
        object V3;
        object V4;
        object V5;
        V2=(base[0]);
        V3=(base[1]);
        V4=(base[2]);
        V5=(base[3]);
        vs_top=sup;
TTL:;
        if(!(number_compare((V2),small_fixnum(1))>0)){
        goto T6;}
        base[4]= number_minus((V2),small_fixnum(1));
        base[5]= (V3);
        base[6]= (V5);
        base[7]= (V4);
        vs_top=(vs_base=base+4)+4;
        L2(base0);
        vs_top=sup;
        V2= number_minus((V2),small_fixnum(1));
        {object V6;
        V6= (V5);
        V5= (V3);
        V3= (V6);}
        goto TTL;
        return;
T6:;
T6:;
        base[4]= Cnil;
        vs_top=(vs_base=base+4)+1;
        return;
        }
}

[ Admittedly I could have added type information and other minor
  tuning. But my scheme code didn't have any of that anyway.]

As much as I can tell, this isn't significantly different from what
Scheme-> produces:

TSCP  hanoi_m2004( n2006, f2007, t2008, h2009 )
        TSCP  n2006, f2007, t2008, h2009;
{
        TSCP  X2, X1;

L2042:
        if  ( LTE( _S2CINT( n2006 ), _S2CINT( _TSCP( 4 ) ) ) )  goto L2043;
        X1 = _TSCP( DIFFERENCE( _S2CINT( n2006 ), 
                                _S2CINT( _TSCP( 4 ) ) ) );
        hanoi_m2004( X1, f2007, h2009, t2008 );
        X1 = _TSCP( DIFFERENCE( _S2CINT( n2006 ), 
                                _S2CINT( _TSCP( 4 ) ) ) );
        X2 = h2009;
        h2009 = f2007;
        f2007 = X2;
        n2006 = X1;
        GOBACK( L2042 );
L2043:
        return( FALSEVALUE );
}

Yet the run time difference is close to 10-fold. I wonder if anyone has
looked at the cause of such differences. Since the generated code is
almost the same, it would be a pity for gcl's run time to be so much
slower than Scheme->C's. Is it caused by the fact that all parameters
in gcl's functions are passed in arrays and therefore indirectly
accessed, whereas in Scheme->C's code they are scalars? 

Regards,

hxl










From wfs@math.utexas.edu  Mon Oct 24 18:20:58 1994
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04540; Mon, 24 Oct 94 18:20:58 CDT
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA06990; Mon, 24 Oct 94 16:59:02 CDT
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA17779; Mon, 24 Oct 94 16:55:34 -0500
Date: Mon, 24 Oct 94 16:55:08 -0500
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Mon, 24 Oct 94 16:55:08 -0500
Message-Id: <9410242155.AA12954@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA12954; Mon, 24 Oct 94 16:55:08 -0500
To: hxl@epic.com, gcl@cli.com
Cc: 
In-Reply-To: Charlie Xiaoli Huang's message of Mon, 24 Oct 94 13:43:55 PDT <9410242043.AA29489@healy.epic>
Subject: Re: compiler optimization --- what am i doing wrong?
Reply-To: wfs@math.utexas.edu



Unfortunately labels constructs are currently slow in gcl [as you noted
the argument passing is slow], and will be
improved.

However when I code this as a regular function, and add the
information that n will be a fixnum, you can see that the gcl times
are almost half the times you reported for scheme.  I suspect the only
difference between what you see in this and what hand written C would
get, is that we do the recursive calls thru a pointer, to allow things
like tracing and redefines to take place.


; hanoi N  gcl  scheme->c   gcl (sun c)
;      20  .27     .39 
;      25  7.8   13.5         7.4
;      30  251  442

I am using your figures for scheme-c Note that if I set the compiler
to not do the link calls [ie no tracing possible], then the time is
6.4 for hanoi 25 using sun c compiler [free version].

Inserting file ~/foo.lisp
---Begin File ~/foo.lisp---

(proclaim '(ftype (function (fixnum t t t) t) hanoi-move))
(defun hanoi-move (n from to helper)
  (declare (fixnum n))
  (if (> n 1)
      (progn
	(hanoi-move (the fixnum (- n 1)) from helper to)
        ;                        (format t "~a --> ~a~%" from to)
	(hanoi-move (the fixnum (- n 1)) helper to from))))


;When I compile and run this on a Sparc 10 the run times I got are:
;
; hanoi N  gcl  scheme->c
;      20  .27     .39
;      25  7.8   13.5
;      30  251  442  

      

---End File ~/foo.lisp---



From attardi@DI.UniPi.IT  Tue Oct 25 04:29:12 1994
Return-Path: <attardi@DI.UniPi.IT>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04741; Tue, 25 Oct 94 04:29:12 CDT
Received: from apollo.di.unipi.it by cli.com (4.1/SMI-4.1)
	id AA08146; Tue, 25 Oct 94 03:31:20 CDT
Received: from omega.di.unipi.it by apollo.di.unipi.it with SMTP
	(1.37.109.4/16.2) id AA18759; Tue, 25 Oct 94 09:30:25 +0100
Organization: Dipartimento di Informatica - Universita' di Pisa - Italy
Received: by omega (5.0/SMI-4.1)
	id AA04465; Tue, 25 Oct 1994 09:29:58 --100
Date: Tue, 25 Oct 1994 09:29:58 --100
From: attardi@DI.UniPi.IT
Message-Id: <9410250829.AA04465@omega>
To: hxl@epic.com
Cc: gcl@cli.com
In-Reply-To: <9410242043.AA29489@healy.epic> (hxl@epic.com)
Subject: Re: compiler optimization --- what am i doing wrong?
Content-Length: 1180


I have tried your example with ECoLisp, a Lisp->C compiler
derived from (A)KCL which uses standard C calling conventions.

This is the compiled code:

/*      function definition for HANOI                                 */
static L1(int narg, object V1)
{ VT3 VLEX3 CLSR3
TTL:
        RETURN(LC2(4,(V1),VV[0],VV[1],VV[2])      /*  MOVE-THEM       */);
}
;;; Emitting code for MOVE-THEM.
 
/*      local function MOVE-THEM                                      */
static LC2(int narg, object V1, object V2, object V3, object V4)
{ VT4 VLEX4 CLSR4
        {int V5;
        V5= fix(V1);
TTL:
        if(!((V5)>(1))){
        goto L2;}
        LC2(4,MAKE_FIXNUM((V5)-(1)),(V2),(V4),(V3))/*  MOVE-THEM      */;
        V5= (V5)-(1);
        {object V6;
        V6= (V4);
        V4= (V2);
        V2= (V6);}
        goto TTL;
L2:
        VALUES(0) = Cnil;
        RETURN(1);
        }
}

by adding (declare (fixnum n)) in move-them.

Even if this code could still be improved, the times are similar to
those of Scheme->C:

	(hanoi 20)	-> 0.233 sec.
	(hanoi 25)	-> 13.717 sec.
	(hanoi 30)	-> 486.817 sec.

-- Beppe

PS
ECoLisp is available for ftp from ftp.di.unipi.it:/pub/lang/lisp.

From loosemore-sandra@CS.YALE.EDU  Wed Dec  7 13:01:09 1994
Return-Path: <loosemore-sandra@CS.YALE.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02781; Wed, 7 Dec 94 13:01:09 CST
Received: from NEBULA.SYSTEMSZ.CS.YALE.EDU (SYSTEMSZ-GW.CS.YALE.EDU) by cli.com (4.1/SMI-4.1)
	id AA06057; Wed, 7 Dec 94 11:52:31 CST
Received: from FUNCTOR.SYSTEMSZ.CS.YALE.EDU by NEBULA.SYSTEMSZ.CS.YALE.EDU via SMTP; Wed, 7 Dec 1994 12:54:22 -0500
Received: by FUNCTOR.SYSTEMSZ.CS.YALE.EDU (Sendmail-5.67b/res.client.cf-3.7)
	id AA03228; Wed, 7 Dec 1994 12:54:07 -0500
Date: Wed, 7 Dec 1994 12:54:07 -0500
From: loosemore-sandra@CS.YALE.EDU (Sandra Loosemore)
Message-Id: <199412071754.AA03228@FUNCTOR.SYSTEMSZ.CS.YALE.EDU>
To: gcl@cli.com
Subject: problems building gcl-1.1

We're having troubles building gcl-1.1 here (on a sparc running SunOS
4.1.3).  It's croaking with a zillion error messages trying to compile
c/sfasl.c (and rel_sun4.c, which it includes).  As far as I can figure
out, it looks like this file isn't even intended to be compiled by
itself (it says it's supposed to be included in unixfasl.c) and is
missing some critical #includes.  Any clue as to what's going on here?
Is the problem in the makefile or the sun4-specific code files?

-Sandra

From smith@io.litton.com  Fri Dec  9 14:20:40 1994
Return-Path: <smith@io.litton.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03352; Fri, 9 Dec 94 14:20:40 CST
Received: from lcsdns1.litton.com by cli.com (4.1/SMI-4.1)
	id AA12827; Fri, 9 Dec 94 13:13:25 CST
Received: from io.dsd.litton.com by lcsdns1.litton.com (4.1/SMI-4.1)
	id AA09032; Fri, 9 Dec 94 11:10:56 PST
Received: by io.dsd.litton.com (Concentrix-2800 3.0/SMI-4.1)
	id AA12190; Fri, 9 Dec 94 11:05:36 PST
Date: Fri, 9 Dec 94 11:05:36 PST
From: Bill Smith <smith@io.dsd.litton.com>
Message-Id: <9412091905.AA12190@io.dsd.litton.com>
To: gcl@cli.com
Subject: Solaris 2.3 port

We're trying to build gcl 1.1 on a Solaris 2.3 system using the
Sparcworks C compiler, but we're running into lots of difficulty.  Has
anyone done this?  Any advice?

We get lots of compiler warnings (which we're ignoring for the time
being), but finally get some errors with data types we can't resolve
and which are making us suspicious that we haven't built our
configuration files correctly.

Thanks
Bill Smith
smith@io.dsd.litton.com (header address probably incorrect)

From Chandan.Haldar@blr.sni.de  Wed Dec 14 06:07:36 1994
Return-Path: <Chandan.Haldar@blr.sni.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04593; Wed, 14 Dec 94 06:07:36 CST
Received: from mail.sni.de by cli.com (4.1/SMI-4.1)
	id AA23211; Wed, 14 Dec 94 05:02:17 CST
Received: from blrsn01.blr.sni.de by mail.sni.de with SMTP (PP) id <17748-0@mail.sni.de>; Wed, 14 Dec 1994 11:59:30 +0100
Received: by blr.sni.de (4.1/SMI-4.1)
	id AA19894; Wed, 14 Dec 94 13:00:18+050
Date: Wed, 14 Dec 94 13:00:18+050
From: Chandan.Haldar@blr.sni.de (Dr. Chandan Haldar)
Message-Id: <9412140800.AA19894@blr.sni.de>
To: gcl@cli.com
Subject: Japanese ...


Apology for non-GCL query, but this is the most likely place I know
where I could ask this!  Does anybody know of a public domain
Japanese-English dictionary (either Kana-English or Kanji-English)
and/or a Japanese grammar spec in some machine-readable form?  Where?

Thanks.

--------------------------------------------------------------------------
Dr. Chandan Haldar
--------------------------------------------------------------------------
Siemens Information Systems Limited
29 Infantry Road, Bangalore 560 001, India.
Phone:    +91 80 559 1113                       Fax:      +91 80 559 1214
Internet: Chandan.Haldar@blr.sni.de
--------------------------------------------------------------------------

From leverich@rand.org  Fri Dec 16 22:29:01 1994
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05066; Fri, 16 Dec 94 22:29:01 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA01765; Fri, 16 Dec 94 21:38:00 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.9/8.6.9) with ESMTP id TAA28867 for <gcl@cli.com>; Fri, 16 Dec 1994 19:37:34 -0800
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.9/8.6.9) with ESMTP id TAA07114 for <gcl@cli.com>; Fri, 16 Dec 1994 19:37:40 -0800
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.9/8.6.9) with SMTP id TAA17006 for <gcl@cli.com>; Fri, 16 Dec 1994 19:37:39 -0800
Message-Id: <199412170337.TAA17006@atlantis.rand.org>
To: gcl@cli.com
Reply-To: Brian_Leverich@rand.org
Subject: SGC on Linux
Date: Fri, 16 Dec 94 19:37:37 PST
From: Brian Leverich <leverich@rand.org>



Before the RAND mafia reinvents the wheel, does anyone have the SGC
working under Linux?  The more recent kernels should have the mprotect
functionality, I think, but GCL (at least GCL 1.0) didn't seem to like
what the OS served up.

BTW, with a little help from Scott Musman at MITRE, we've now got CLX,
GARNET, and GNU ROSS all running together under Linux.  Makes for a
nice environment.  We'll be putting the patched versions of everything
up for ftp after a little cleaning up.  Cheers, B.


-----------
Dr. Brian Leverich
Information Systems Scientist, The RAND Corporation
leverich@rand.org

From windley@lal.cs.byu.edu  Mon Dec 19 13:31:36 1994
Return-Path: <windley@lal.cs.byu.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05367; Mon, 19 Dec 94 13:31:36 CST
Received: from leopard.cs.byu.edu by cli.com (4.1/SMI-4.1)
	id AA05481; Mon, 19 Dec 94 11:47:01 CST
Received: from jaguar.cs.byu.edu by leopard.cs.byu.edu with SMTP
	(1.38.193.4/16.2) id AA26630; Mon, 19 Dec 1994 10:51:45 -0700
Received: from localhost by jaguar.cs.byu.edu (1.38.193.4/CS-Client)
	id AA13985; Mon, 19 Dec 1994 10:49:08 -0700
Message-Id: <9412191749.AA13985@jaguar.cs.byu.edu>
To: gcl@cli.com
Subject: intermitent error: The function NIL is undefined.
Date: Mon, 19 Dec 1994 10:49:07 -0700
From: "Phil Windley" <windley@lal.cs.byu.edu>


I am using GCL 1.0 on an HP7xx to run the HOL theorem proving system.  I've
been having a problem which after some debuggin appears to be something in
LISP, not a problem with HOL.  I get the following message:

    Error: The function NIL is undefined.
    Fast links are on: do (use-fast-links nil) for debugging
    Error signalled by FUN%6115%20.
    Backtrace:  > funcall > lambda > cons > FUN%6115%20
    evaluation failed     lisp error

This happens on some applications *some of the time*.  In other words,
sometimes the expression will work and ither times this message is
generated.  I cannot figure out a pattern as to why it works sometimes.
The expressions are fairly large, but certainly not the largest I do.

These same expressions worked without failure under AKCL 1.615.

Does anyone know what could be causing this?


--phil--



__________________________________________________________________________
Phillip J. Windley, Asst. Professor              |  windley@cs.byu.edu
Laboratory for Applied Logic	                 |  
Dept. of Computer Science, TMCB 3370             |
Brigham Young University                         |  Phone: 801.378.3722
Provo UT                  84602-6576             |  Fax:   801.378.7775
------------------------------------------------------------------------
If you use WWW, I can be found <A
HREF="http://lal.cs.byu.edu/people/windley/windley.html">here</A> or<A
HREF="http://www.imall.com/homepage.html">here</A>.

From jmacd@uclink.berkeley.edu  Sun Jan  1 06:21:12 1995
Return-Path: <jmacd@uclink.berkeley.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07382; Sun, 1 Jan 95 06:21:12 CST
Received: from uclink3.berkeley.edu by cli.com (4.1/SMI-4.1)
	id AA29957; Sun, 1 Jan 95 05:32:46 CST
Received: from uclink.berkeley.edu by uclink3.berkeley.edu (8.6.8/1.33(web)-OV2)
	id DAA07095; Sun, 1 Jan 1995 03:32:45 -0800
Received: by uclink.berkeley.edu (8.6.9/1.33(web)-OV4)
	id DAA24759; Sun, 1 Jan 1995 03:32:44 -0800
Date: Sun, 1 Jan 1995 03:32:44 -0800
From: jmacd@uclink.berkeley.edu (Joshua Peck Macdonald)
Message-Id: <199501011132.DAA24759@uclink.berkeley.edu>
To: gcl@cli.com
Subject: xakcl question


I'm not sure if this is an appropriate place to post a question
regarding xakcl which I"ve (well sort of I guess) compiled for
FreeBSD.  It builds and loads and saves everything properly, but
I can't seem to get anything done and I'm not sure why because
I try to initialize a display with (setq *default-display*
(XOpenDisplay (get-c-string ""))) as it suggests but get-c-string
causes an error.  It seems to be defined like this:

(defCfun "object get_c_string(s) object s;" 0
  " return(s->st.st_self);"
  )

(defentry get_c_string_2 (object) (object get_c_string))

(defun get-c-string (string)
  (get_c_string_2 (concatenate 'string string "^@")))

but it signals a fatal error in PRIN1.  I'm interested in trying
out thisinterface to X through gcl and would appreciate any help.

I'm sorry if this is a stupid/inappropriate/misplaced question.

thanks in advance,

josh

From leverich@rand.org  Sun Jan  1 17:29:31 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07455; Sun, 1 Jan 95 17:29:31 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA00440; Sun, 1 Jan 95 16:30:17 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.9/8.6.9) with ESMTP id OAA16604; Sun, 1 Jan 1995 14:30:04 -0800
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.9/8.6.9) with ESMTP id OAA04274; Sun, 1 Jan 1995 14:30:03 -0800
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.9/8.6.9) with SMTP id OAA08869; Sun, 1 Jan 1995 14:30:01 -0800
Message-Id: <199501012230.OAA08869@atlantis.rand.org>
To: jmacd@uclink.berkeley.edu (Joshua Peck Macdonald)
Cc: gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: xakcl question 
In-Reply-To: Your message of Sun, 01 Jan 95 03:32:44 PST.
             <199501011132.DAA24759@uclink.berkeley.edu> 
Date: Sun, 01 Jan 95 14:29:59 PST
From: Brian Leverich <leverich@rand.org>



We use Linux and CLX rather than FreeBSD and xakcl.  To get that stuff 
to run, we needed the following patch to the header file for the machine
type:

/* Linux version by Scott Musman (MITRE) and Mike Harm (USC) */

#define LISTEN_FOR_INPUT(fp) \
  if((c=0,ioctl((fp)->_fileno, FIONREAD, &c),c<=0) \
	&& ((fp)->_IO_read_ptr >= (fp)->_IO_read_end)) \
     return 0

The other thing we had to do was hack CLX to handle the endianness of
the Intel architecture.

Sorry if these are orthogonal to your problem - I'm still recovering from
last night's partying and I only have 3 neurons confirmed firing.  -B

-- Your message was:   (from "jmacd@uclink.berkeley.edu")
  
  I'm not sure if this is an appropriate place to post a question
  regarding xakcl which I"ve (well sort of I guess) compiled for
  FreeBSD.  It builds and loads and saves everything properly, but
  I can't seem to get anything done and I'm not sure why because
  I try to initialize a display with (setq *default-display*
  (XOpenDisplay (get-c-string ""))) as it suggests but get-c-string
  causes an error.

From hxl@epic.com  Tue Jan  3 19:56:58 1995
Return-Path: <hxl@epic.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07850; Tue, 3 Jan 95 19:56:58 CST
Received: from epic.com (gate.epic.com) by cli.com (4.1/SMI-4.1)
	id AA03927; Tue, 3 Jan 95 19:10:54 CST
Received: from weber.epic (weber.epic.com) by epic.com (4.1/JMA.3)
	id AA21412; Tue, 3 Jan 95 17:18:04 PST
Received: by weber.epic (4.1/SMI-4.1)
	id AA13538; Tue, 3 Jan 95 17:11:53 PST
Date: Tue, 3 Jan 95 17:11:53 PST
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <9501040111.AA13538@weber.epic>
To: gcl@cli.com
Subject: gprof doesn't work? (sun4, gcc 2.4.5, gcl 1.1)
Reply-To: hxl@epic.com

I can't seem to compile a profile-able version of gcl1.1. This is what
I did:

	% ./add-defs sun4
	% make			---> saved_gcl and everything was fine!
	% mkdir go
	% rm -f o/*.o
	% (cd go; ln ../o/makefile .)
	% make kcp		---> got as far as raw_gcl 

Here's the error message and a stack trace from the end of "make kcp":

../unixport/raw_gcl ../unixport/ < foo
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
Initializing ../lsp/evalmacros.o
Initializing ../lsp/top.o
Initializing ../lsp/module.o
loading ../lsp/autoload.lsp

>#<"COMPILER" package>

COMPILER>#<"SYSTEM" package>

SYSTEM>*COMMAND-ARGS*

SYSTEM>#<"USER" package>

>#<"LISP" package>

LISP>#<"SLOOP" package>

SLOOP>6

SLOOP>#<"USER" package>

>Initializing ../lsp/predlib.o

Error: Someone tried to RETURN-FROM a TAGBODY.
Error signalled by TAGBODY.
Broken at BREAK-LEVEL.  Type :H for Help.
SYSTEM>>Bye.

Thanks,

hxl

From hxl@epic.com  Tue Jan  3 19:57:48 1995
Return-Path: <hxl@epic.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07854; Tue, 3 Jan 95 19:57:48 CST
Received: from epic.com (gate.epic.com) by cli.com (4.1/SMI-4.1)
	id AA03920; Tue, 3 Jan 95 19:06:18 CST
Received: from weber.epic (weber.epic.com) by epic.com (4.1/JMA.3)
	id AA21399; Tue, 3 Jan 95 17:13:27 PST
Received: by weber.epic (4.1/SMI-4.1)
	id AA13509; Tue, 3 Jan 95 17:07:17 PST
Date: Tue, 3 Jan 95 17:07:17 PST
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <9501040107.AA13509@weber.epic>
To: gcl@cli.com
Subject: FFI questions 
Reply-To: hxl@epic.com

Hello,

I'm trying to do some work with the FFI provided by gcl. I read the
kcl report and the defCfun/defentry/clines stuff are farily
clear. But there're a few things that are done but are "officially
documented", which I'd like to seek some clarifications of, so that I
can be sure my code will continue to work when I upgrade the version
of my gcl:

First, when I look at some of the code in the lsp and misc directory,
I see access to things like (from misc/rusage.lsp):

	(clines "static mygetrusage(x,y) int x; object y;{return getrusage(x,y->str.str_self);}")

which accesses the internals of an object, and assumes it can be
implicitly used as a struct pointer. Is this supported and documented?
If not, what is the proper way to achieve the same or similar effect?

Second, the chapter on FFI in the kcl report includes things like:

	('nil a)
and
	((cons a b) c)

that can be embedded in a defCfun, but didn't explain the full syntax
and semantics of them. Anywhere else I can look them up? 

In general, what are the C functions (or lisp-ish helper functions
like the ones above) that one can use in defCfun to talk to the lisp
side? I see there're things like make_simple_string and
CMPmakefix_num. But would like to see a formal list and definitions if
possible. 

Please email response to hxl@epic.com.

Thanks,

hxl



From reading@io.litton.com  Wed Jan  4 17:42:27 1995
Return-Path: <reading@io.litton.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA08190; Wed, 4 Jan 95 17:42:27 CST
Received: from lcsdns1.litton.com by cli.com (4.1/SMI-4.1)
	id AA07178; Wed, 4 Jan 95 16:47:05 CST
Received: from io.dsd.litton.com by lcsdns1.litton.com (4.1/SMI-4.1)
	id AA01076; Wed, 4 Jan 95 14:44:23 PST
Received: by io.dsd.litton.com (Concentrix-2800 3.0/SMI-4.1)
	id AA05683; Wed, 4 Jan 95 14:47:17 PST
Date: Wed, 4 Jan 95 14:47:17 PST
From: John D. Reading <reading@io.dsd.litton.com>
Message-Id: <9501042247.AA05683@io.dsd.litton.com>
To: gcl@cli.com
Subject: Problems building PCL

Sorry to bother you all, but I am not sure where else to ask.  I have
downloaded pcl-gcl-1.0 and tried to build it (I also have gcc version
2.6.3 and gcl version 1.1), and things proceeded fine right up until
it core dumped.  The last few lines of output follow:

Compiling VECTOR...
Compiling vector.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of SYMBOL-OR-CONS-LESSP was replaced by iteration.
;; Note: Tail-recursive call of SYMBOL-OR-CONS-LESSP was replaced by iteration.
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling vector.o.
Loading binary of VECTOR...
Compiling SLOTS-BOOT...
Compiling slots-boot.lisp.
; (DEFMACRO ACCESSOR-SLOT-BOUNDP ...) is being compiled.
;; Warning: The variable SYM is not used.
Segmentation Fault - core dumped
*** Error code 139
make: Fatal error: Command failed for target `compile' (on host callisto)


I really don't have the faintest idea of what to do.  Can anybody give
me any help?

Thanks,

John

--
John D. Reading           | Where there is no solution, there is no problem.
reading@io.dsd.litton.com | -- John G. Price III
(818) 597-5152            | 

From horrocks@cs.man.ac.uk  Fri Jan 13 15:11:59 1995
Return-Path: <horrocks@cs.man.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA09998; Fri, 13 Jan 95 15:11:59 CST
Received: from m1.cs.man.ac.uk by cli.com (4.1/SMI-4.1)
	id AA28740; Fri, 13 Jan 95 13:55:58 CST
Received: from r9.cs.man.ac.uk by m1.cs.man.ac.uk (4.1/SMI-4.1:AL5l)
	id AA21218; Fri, 13 Jan 95 00:55:33 GMT
From: Ian Horrocks <horrocks@cs.man.ac.uk>
Message-Id: <9501130055.AA06816@r9.cs.man.ac.uk>
Subject: macroexpand/evaluate
To: gcl@cli.com
Date: Fri, 13 Jan 1995 00:55:31 +0000 (GMT)
X-Mailer: ELM [version 2.4 PL23]
Content-Type: text
Content-Length: 361       

I am having problems with the GCL compiler due to the way it evaluates
macro expansions at compile time. I read in the documentation that this
behavior can be altered using one of the system flags but it didn't say
which one - can anyone assist?

Talking of documentation is fuller documentation available from any source?

Ian Horrocks
horrocks@cs.man.ac.uk



From hxl@epic.com  Tue Jan 17 19:28:41 1995
Return-Path: <hxl@epic.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10673; Tue, 17 Jan 95 19:28:41 CST
Received: from epic.com (gate.epic.com) by cli.com (4.1/SMI-4.1)
	id AA03839; Tue, 17 Jan 95 18:03:24 CST
Received: from weber.epic (weber.epic.com) by epic.com (4.1/JMA.3)
	id AA20565; Tue, 17 Jan 95 16:10:47 PST
Received: by weber.epic (4.1/SMI-4.1)
	id AA09898; Tue, 17 Jan 95 16:04:26 PST
Date: Tue, 17 Jan 95 16:04:26 PST
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <9501180004.AA09898@weber.epic>
To: gcl@cli.com, wfs@math.utexas.edu
Subject: gcl: is there a better way to do this?
Reply-To: hxl@epic.com

I need to interface an application with GCL. One of the API's provided
by the application is something like

	int foo(int argc, char **argv)  

(the API was originally written with TCL in mind...)

How do I accomplish an FFI in GCL with such an interface? 

This is what I'm doing now, but I'd like a more elegant solution:

-----

(clines "static int argc; char *argv[512];"
	"static void reset_args() { argc = 0;}"
	"static int give_me_argv() { return (int)argv;}"
	"static int give_me_argc() { return argc;}"
	"static void add_args(s) char *s; "
	"  { argv[argc++] = s; argv[argc] = 0;}")
(defentry reset-args () (void "reset_args"))
(defentry add-args (string) (void "add_args"))
(defentry give-me-argv () (int "give_me_argv"))
(defentry give-me-argc () (int "give_me_argc"))

(defentry foo1 (int int) (int "foo"))

(defun foo (arg &rest others)
  (reset-args)
  (add-args arg)
  (dolist (x others)
	  (add-args x))
  (foo1 (give-me-argc) (give-me-argv)))

----

Thanks in advance,

hxl


From anders.vinjar@notam.uio.no  Sat Jan 21 13:19:06 1995
Return-Path: <anders.vinjar@notam.uio.no>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11386; Sat, 21 Jan 95 13:19:06 CST
Received: from pat.uio.no by cli.com (4.1/SMI-4.1)
	id AA14214; Sat, 21 Jan 95 12:20:57 CST
Received: from ulrik.uio.no by pat.uio.no with local-SMTP (PP) 
          id <19220-0@pat.uio.no>; Sat, 21 Jan 1995 18:00:52 +0100
Received: by alban.notam.uio.no ; Sat, 21 Jan 95 17:59:28 +0100
Date: Sat, 21 Jan 95 17:59:28 +0100
From: anders.vinjar@notam.uio.no
Message-Id: <9501211659.AA02885@alban.notam.uio.no>
To: gcl@cli.com
Subject: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?

Hello.

I get som strange results while trying to build GCL-1.1 on the above
system.  Can anyone tell me what the following error message means?


            ....... (cut away)
            ../unixport/raw_gcl ../unixport/ < foo
    GCL (GNU Common Lisp)  April 1994  16384 pages
    loading ../lsp/export.lsp
    Initializing ../lsp/defmacro.o
    This file was dumped with FASD version ~a not ~a.         <------!!
    Lisp initialization failed.
            make command
            rm -f xbin/gcl ; echo "#!/bin/sh" > xbin/gcl; \
            echo "/hf/notam/u1/andersvi/lisp/gcl-1.1/unixport/saved_gcl -dir /hf/notam/u1/andersvi/lisp/gcl-1.1/unixport/ \$@ " \
            >> xbin/gcl
            chmod 755 xbin/gcl
            (cd  cmpnew ; make collectfn.o)
            ../unixport/saved_gcl ../unixport/ -compile collectfn
    ../unixport/saved_gcl: Not found
    *** Error code 1 (bu21)

    make: fatal error.
    *** Error code 1 (bu21)

    make: fatal error.
    my-prompt>  


To get any way on the Indy i had to change the following in "c/save_sgi.c":

     /* extern char *sbrk();       changed to the following line:*/ 
        extern void *sbrk(); 

I also had to change a definition of

        _iob() to
        __iob() (with two underscores)

in "c/save-sgi4.c".


Anders Vinjar


From cheimets@blynken.harvard.edu  Sun Jan 22 09:35:47 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11485; Sun, 22 Jan 95 09:35:47 CST
Received: from cfa.harvard.edu by cli.com (4.1/SMI-4.1)
	id AA15114; Sun, 22 Jan 95 08:39:56 CST
Return-Path: <cheimets@blynken.harvard.edu>
Received: by cfa.harvard.edu; Sun, 22 Jan 95 09:39:50 -0500
Received: by blynken.harvard.edu (931110.SGI/920502.SGI)
	for @cfa.harvard.edu:gcl@cli.com id AA02035; Sun, 22 Jan 95 09:40:25 -0500
Date: Sun, 22 Jan 95 09:40:25 -0500
From: cheimets@blynken.harvard.edu (Peter Cheimets)
Message-Id: <9501221440.AA02035@blynken.harvard.edu>
To: anders.vinjar@notam.uio.no
Cc: gcl@cli.com
In-Reply-To: anders.vinjar@notam.uio.no's message of Sat, 21 Jan 95 17:59:28 +0100 <9501211659.AA02885@alban.notam.uio.no>
Subject: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?

I had to make the exact same changes, and got the exact same results.  If you
get any further please let me know.

When I got a hold of Schelter this is the reply I got:

>The point is that the format of the .o files may well have changed.
>Try to determine if when you come to beginning of the read_fasd
>that you are indeed positioned at what was the end of the .o file.
>[put some printf("(%d)",ftell(fp));
>or some such in..]

I am not a C kinda guy, so I could do nothing with this.


Peter Cheimets
Smithsonian Astrophysical Observatory             ,__o-
Smithsonian Institution                         _-\_<,
60 Garden St.                                  (*)/'(*)-
Cambridge, MA 01238                   

cheimets@cfa.harvard.edu
(617)495-7384 X134 (voice)
(617)495-7098      (FAX)


From donhan@engin.umich.edu  Mon Jan 23 13:59:00 1995
Return-Path: <donhan@engin.umich.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11704; Mon, 23 Jan 95 13:59:00 CST
Received: from maize.engin.umich.edu by cli.com (4.1/SMI-4.1)
	id AA16936; Mon, 23 Jan 95 12:53:44 CST
Received: (donhan@localhost) by maize.engin.umich.edu (8.6.8/8.6.4) id NAA08290; Mon, 23 Jan 1995 13:53:36 -0500
Date: Mon, 23 Jan 1995 13:53:36 -0500
From: Dongsuk Han <donhan@engin.umich.edu>
Message-Id: <199501231853.NAA08290@maize.engin.umich.edu>
To: anders.vinjar@notam.uio.no
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?
Cc: gcl@cli.com

Hi,

I stopped building GCL-1.1 on IRIX 5.3 exactly at the same place.
Please let me know if you hear from anyone on the net.

ps) Are we getting enough attentions yet?

==================================================================
Dongsuk "Don" Han                        Phone:  (313) 764-2410
Transportation Research Institute        Fax:    (313) 936-1068
University of Michigan                   E-mail: donhan@umich.edu
2901 Baxter Road
Ann Arbor, MI 48109-2150

From pw@snoopy.mv.com  Mon Jan 23 15:58:50 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11728; Mon, 23 Jan 95 15:58:50 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA17319; Mon, 23 Jan 95 14:40:02 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id PAA12941; Mon, 23 Jan 1995 15:39:20 -0500
Date: Mon, 23 Jan 1995 15:39:20 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199501232039.PAA12941@snoopy.mv.com>
To: donhan@engin.umich.edu
Cc: anders.vinjar@notam.uio.no, gcl@cli.com
In-Reply-To: <199501231853.NAA08290@maize.engin.umich.edu> (message from Dongsuk Han on Mon, 23 Jan 1995 13:53:36 -0500)
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?

>>>>> "Dongsuk" == Dongsuk Han <donhan@engin.umich.edu> writes:

    Dongsuk> Hi, I stopped building GCL-1.1 on IRIX 5.3 exactly at the
    Dongsuk> same place.  Please let me know if you hear from anyone
    Dongsuk> on the net.

    Dongsuk> ps) Are we getting enough attentions yet?

	Some of us learned a lot more that we wanted to about the
	innards of unix and how they vary with different vendors
	implementations by wanting to run AKCL/GCL on some new box.
	At one time I also was faced with total ignorance of "FASD"
	and had to do a lot of debugging in totally foreign territory
	at a time when I just wanted to deal in Lisp. If I had an
	INDY box and wanted to run GCL I would have several options,

	a) Appeal to Internet readers to see if someone had already
	blazed that trail. (You've sort of done that already)

	b) Try and debug the problem myself - and send any changes to
	the maintainer for inclusion in the next version.

	c) Wait for the next release and hope someone did one of the above.

	d) Buy a commercial Lisp implementation.

	e) Buy hardware and an OS that is known to be compatible with GCL.

	"Anything for free has no guarantee"

	Paul


From donhan@engin.umich.edu  Mon Jan 23 17:33:56 1995
Return-Path: <donhan@engin.umich.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11774; Mon, 23 Jan 95 17:33:56 CST
Received: from maize.engin.umich.edu by cli.com (4.1/SMI-4.1)
	id AA17641; Mon, 23 Jan 95 16:19:53 CST
Received: (donhan@localhost) by maize.engin.umich.edu (8.6.8/8.6.4) id RAA12223; Mon, 23 Jan 1995 17:19:32 -0500
Date: Mon, 23 Jan 1995 17:19:32 -0500
From: Dongsuk Han <donhan@engin.umich.edu>
Message-Id: <199501232219.RAA12223@maize.engin.umich.edu>
To: pw@snoopy.mv.com
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?
Cc: anders.vinjar@notam.uio.no, gcl@cli.com

>>	Some of us learned a lot more that we wanted to about the
>>	innards of unix and how they vary with different vendors
>>	implementations by wanting to run AKCL/GCL on some new box.
>>	At one time I also was faced with total ignorance of "FASD"
>>	and had to do a lot of debugging in totally foreign territory
>>	at a time when I just wanted to deal in Lisp. If I had an
>>	INDY box and wanted to run GCL I would have several options,
>> 
>>	a) Appeal to Internet readers to see if someone had already
>>	   blazed that trail. (You've sort of done that already)

I sent a message to gcl mailing group 
 - to see if anyone had gone through this and solved the problem and
 - to let the maintainer know that not only one or two are interested
   in porting GCL on SGI machines.
I was succesful last time when I posted similar message about GCL 1.0 on IRIX
4.0.5. A few of kind netters helped me by sending me E-mails.

>>	b) Try and debug the problem myself - and send any changes to
>>	   the maintainer for inclusion in the next version.

I spent several hours until I hit the error shown on anders.vinjar's
message. I admit that I have not gone into a real "debugging" yet
but I am pretty sure that I've reached the limit of my (LISP + C) knowledge.
I spent more than a week debugging version 1.0 on IRIX 4.0.5 without
any clue on how things are working.

I haven't checked if version 1.1 include the fixes for IRIX 4.0.5 yet.
If not, I will send the patches to the maintainer.

>>	c) Wait for the next release and hope someone did one of the above.

To make the hope bigger, I am telling the people who know more than I do 
about GCL (and who love GCL more than I do) that GCL is not easy to
port on SGI machines. I've seen many messages like mine from the archive of 
this mailing list but porting AKCL/KCL/GCL on SGI has not been very successful 
for a long time.

>>	d) Buy a commercial Lisp implementation.

Do you have any suggestion?

>>	e) Buy hardware and an OS that is known to be compatible with GCL.

I compiled AKCL/GCL on Solaris, SUN OS, HP UX and IRIX 4.0.5. Now I have a
reason to make GCL working on SGI. If I remember correctly, SGI is in the 
machine list that GCL is "supposed" to run on. I am not asking a question of 
porting GCL on Apollo DN3XX.

>>	"Anything for free has no guarantee"

Thank you for your tips, and I am sorry if I bothered you with message that
you did not want to read. 


>>		Paul

-- Don --

PS) I am truely sorry for sending rather personal message to this group.
    I just wish Paul did not CC to the whole group :(

From pw@snoopy.mv.com  Mon Jan 23 17:54:12 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11779; Mon, 23 Jan 95 17:54:12 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA17705; Mon, 23 Jan 95 16:44:39 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id RAA16274; Mon, 23 Jan 1995 17:44:16 -0500
Date: Mon, 23 Jan 1995 17:44:16 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199501232244.RAA16274@snoopy.mv.com>
To: gcl@cli.com
In-Reply-To: <199501232219.RAA12223@maize.engin.umich.edu> (message from Dongsuk Han on Mon, 23 Jan 1995 17:19:32 -0500)
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?

>>>>> "Dongsuk" == Dongsuk Han <donhan@engin.umich.edu> writes:


    Dongsuk> I spent several hours until I hit the error shown on
    Dongsuk> anders.vinjar's message. I admit that I have not gone
    Dongsuk> into a real "debugging" yet but I am pretty sure that
    Dongsuk> I've reached the limit of my (LISP + C) knowledge.  I
    Dongsuk> spent more than a week debugging version 1.0 on IRIX
    Dongsuk> 4.0.5 without any clue on how things are working.

	A week or two, or maybe a month of Sundays is about right
	for this one.

    >>> d) Buy a commercial Lisp implementation.

    Dongsuk> Do you have any suggestion?

	Nope, since my personal budget prohibits it and my employer
	can't afford it, I find GCL to be superb! I just have to be
	prepared for new debugging challenges when OS things change.
	I use FreeBSD (freebieSD). The price is right and the value
	per buck is infinitely high.

    >>> e) Buy hardware and an OS that is known to be compatible with
    >>> GCL.

    >>> "Anything for free has no guarantee"

    Dongsuk> Thank you for your tips, and I am sorry if I bothered you
    Dongsuk> with message that you did not want to read.

	Not bothered at all, and I apologize if I offended. I was
	responding to the apparent complaint of not enough attention.

    Dongsuk> PS) I am truely sorry for sending rather personal message
    Dongsuk> to this group.  I just wish Paul did not CC to the whole
    Dongsuk> group :(

	Again, sorry to offend.

	Paul

From attardi@DI.UniPi.IT  Tue Jan 24 05:34:05 1995
Return-Path: <attardi@DI.UniPi.IT>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11854; Tue, 24 Jan 95 05:34:05 CST
Received: from apollo.di.unipi.it by cli.com (4.1/SMI-4.1)
	id AA18762; Tue, 24 Jan 95 04:15:10 CST
Received: from omega.di.unipi.it by apollo.di.unipi.it with SMTP
	(1.37.109.4/16.2) id AA07563; Tue, 24 Jan 95 11:09:23 +0100
Organization: Dipartimento di Informatica - Universita' di Pisa - Italy
Received: by omega (5.0/SMI-4.1)
	id AA00620; Tue, 24 Jan 1995 11:09:06 --100
Date: Tue, 24 Jan 1995 11:09:06 --100
From: attardi@DI.UniPi.IT
Message-Id: <9501241009.AA00620@omega>
To: donhan@engin.umich.edu
Cc: pw@snoopy.mv.com, anders.vinjar@notam.uio.no, gcl@cli.com
In-Reply-To: <199501232219.RAA12223@maize.engin.umich.edu> (message from Dongsuk Han on Mon, 23 Jan 1995 17:19:32 -0500)
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?
Content-Length: 487


I am making available ECoLisp version 0.17, which runs on SGI with IRIX 4.0.5H,
for anonymous ftp from:

 - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl
 - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp

ECoLisp is a derivative of KCL which incorporates many of the changes
in AKCL.

To install it, after unpacking it, just run:

	configure

This will create a directory sgi, then

	cd sgi
	make

To see configuration options, issue configure --help.

-- Beppe

From anders.vinjar@notam.uio.no  Tue Jan 24 11:17:32 1995
Return-Path: <anders.vinjar@notam.uio.no>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11893; Tue, 24 Jan 95 11:17:32 CST
Received: from pat.uio.no ([129.240.2.50]) by cli.com (4.1/SMI-4.1)
	id AA19095; Tue, 24 Jan 95 08:51:28 CST
Received: from ulrik.uio.no by pat.uio.no with local-SMTP (PP) 
          id <03078-0@pat.uio.no>; Tue, 24 Jan 1995 15:42:59 +0100
Received: by alban.notam.uio.no ; Tue, 24 Jan 95 15:41:26 +0100
Date: Tue, 24 Jan 95 15:41:26 +0100
From: anders.vinjar@notam.uio.no
Message-Id: <9501241441.AA15734@alban.notam.uio.no>
To: cheimets@blynken.harvard.edu
Cc: anders.vinjar@notam.uio.no, gcl@cli.com
In-Reply-To: <9501221440.AA02035@blynken.harvard.edu> (cheimets@blynken.harvard.edu)
Subject: Re: SGI-Indy (IRIX 5.2) and GCL-1.1: What is "FASD"?

   I had to make the exact same changes, and got the exact same results.  If you
   get any further please let me know.

I will.  Thanks for a decent reply.

-anders


From eblood@winky.reno.nv.us  Wed Jan 25 00:44:05 1995
Return-Path: <eblood@winky.reno.nv.us>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11993; Wed, 25 Jan 95 00:44:05 CST
Received: from heather.greatbasin.com by cli.com (4.1/SMI-4.1)
	id AA21767; Tue, 24 Jan 95 23:48:28 CST
Received: from winky.reno.nv.us (winky.reno.nv.us [140.174.194.250]) by heather.greatbasin.com (8.6.9/8.6.5) with SMTP id VAA09583; Tue, 24 Jan 1995 21:32:05 -0800
Message-Id: <199501250532.VAA09583@heather.greatbasin.com>
X-Authentication-Warning: heather.greatbasin.com: Host winky.reno.nv.us didn't use HELO protocol
To: gcl@cli.com
Cc: eblood@winky.reno.nv.us
Subject: Porting to FreeBSD 2.0
Date: Mon, 23 Jan 1995 14:07:41 -0800
From: Eric Blood <eblood@winky.reno.nv.us>


I'm getting an unreferenced symbol when compiling for 386-bsd target.
It's looking for _sigstack.  I tracked down the module to main.o, and
then checked main.c.  I'm not quite sure what the sigstack code is
supposed to be doing.  The documentation on my side says that sigstack
has been changed to sigaltstack.  So, I tried to hack (hack being the
keyword) sigstack into a sigaltstack.  It compiles a little bit farther
but fails with:

Script started on Mon Jan 23 14:04:52 1995
$ make
(cd bin; make all)
(cd mp ; make all)
make all1 "MPFILES=./mpi-386.o   ./libmport.a"
rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
(cd o; make all)
(cd lsp; make all)
(cd cmpnew; make all)
(cd unixport; make saved_gcl)
`saved_gcl' is up to date.
make command
rm -f xbin/gcl ; echo "#!/bin/sh" > xbin/gcl;  echo "/usr/users/eblood/gcl-1.1/unixport/saved_gcl -dir /usr/users/eblood/gcl-1.1/unixport/ \$@ "  >> xbin/gcl
chmod 755 xbin/gcl
(cd  cmpnew ; make collectfn.o)
../unixport/saved_gcl ../unixport/ -compile collectfn
Ì†€P: not found
../unixport/saved_gcl: 10: Syntax error: ")" unexpected
*** Error code 2

Stop.
*** Error code 1

Stop.

Tell me what I should do next to help port.  Thanks.

EVB

From eblood@cs.unr.edu  Wed Jan 25 02:45:21 1995
Return-Path: <eblood@cs.unr.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12001; Wed, 25 Jan 95 02:45:21 CST
Received: from echo.cs.unr.edu by cli.com (4.1/SMI-4.1)
	id AA21954; Wed, 25 Jan 95 01:45:41 CST
Received: from localhost (localhost [127.0.0.1]) by echo.cs.unr.edu (8.6.9/8.6.9) with SMTP id WAA29270 for gcl@cli.com; Tue, 24 Jan 1995 22:54:52 -0800
From: Eric V Blood <eblood@cs.unr.edu>
Message-Id: <199501250654.WAA29270@echo.cs.unr.edu>
X-Authentication-Warning: echo.cs.unr.edu: Host localhost didn't use HELO protocol
To: gcl@cli.com
Subject: Porting to FreeBSD 2.0
Date: Tue, 24 Jan 95 22:54:46 -0800
X-Mts: smtp



I'm getting an unreferenced symbol when compiling for 386-bsd target.
It's looking for _sigstack.  I tracked down the module to main.o, and
then checked main.c.  I'm not quite sure what the sigstack code is
supposed to be doing.  The documentation on my side says that sigstack
has been changed to sigaltstack.  So, I tried to hack (hack being the
keyword) sigstack into a sigaltstack.  It compiles a little bit farther
but fails with:

Script started on Mon Jan 23 14:04:52 1995
$ make
(cd bin; make all)
(cd mp ; make all)
make all1 "MPFILES=./mpi-386.o   ./libmport.a"
rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
(cd o; make all)
(cd lsp; make all)
(cd cmpnew; make all)
(cd unixport; make saved_gcl)
`saved_gcl' is up to date.
make command
rm -f xbin/gcl ; echo "#!/bin/sh" > xbin/gcl;  echo "/usr/users/eblood/gcl-1.1/unixport/saved_gcl -dir /usr/users/eblood/gcl-1.1/unixport/ \$@ "  >> xbin/gcl
chmod 755 xbin/gcl
(cd  cmpnew ; make collectfn.o)
../unixport/saved_gcl ../unixport/ -compile collectfn
Ì†€P: not found
../unixport/saved_gcl: 10: Syntax error: ")" unexpected
*** Error code 2

Stop.
*** Error code 1

Stop.

Tell me what I should do next to help port.  Thanks.

EVB

Eric V. Blood
eblood@cs.unr.edu

From nils@guru.ims.uni-stuttgart.de  Wed Jan 25 09:12:13 1995
Return-Path: <nils@guru.ims.uni-stuttgart.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12047; Wed, 25 Jan 95 09:12:13 CST
Received: from guru.ims.uni-stuttgart.de by cli.com (4.1/SMI-4.1)
	id AA22424; Wed, 25 Jan 95 08:06:34 CST
Received: by guru.ims.uni-stuttgart.de (Smail3.1.28.1 #16)
	id m0rX8Q9-0003UwC; Wed, 25 Jan 95 15:10 MET
Message-Id: <m0rX8Q9-0003UwC@guru.ims.uni-stuttgart.de>
Date: Wed, 25 Jan 95 15:10 MET
From: nils@guru.ims.uni-stuttgart.de (Cornelis van der Laan)
To: eblood@cs.unr.edu, gcl@cli.com
Subject: Re: Porting to FreeBSD 2.0

You have successfully built a saved_kcl which isn't executable
(wrong header or so...).

Here is how to dump it correctly as a static demand paged image:

Use the appended h/386-bsd.h, get the unexec.c code from the latest
emacs distribution (I think since 19.24 the code works), install
it as c/unexfreebsd.c and recompile the whole stuff.

Note though, that under FreeBSD 1.1.5 the gcl-1.x dists don't work
for me, they crash with bus errors when using pcl and/or clx. 
akcl-1.624 works without problems, including the sgc code 
(ca. 25% faster garbage collection).

Feel free to contact me for more info and, if you succeed in building
on FreeBSD 2.0, would you please tell me how you did it? I'm still to 
upgrade but I'm waiting for the 2.1 cd...

Nils

h/386-bsd.h:
= = = = = = = = = = = = = = = = = = = = = = = =

#include "bsd.h"

#define ADDITIONAL_FEATURES \
		     ADD_FEATURE("386BSD");\
                     ADD_FEATURE("CLX-LITTLE-ENDIAN");

#define	I386			/* ?? this is apparently not used anywhere */
#define	IEEEFLOAT

#define HAVE_YP_UNBIND
#define HAVE_XDR		/* put xdr_float into libc first... */

#define USE_ATT_TIME

/* begin listen for input */
#undef LISTEN_FOR_INPUT		/* default in bsd.h is loser in 386bsd */
#if 1				/* Required for CLX to work correctly  */
#if defined IN_FILE
#include <unistd.h>
#include <sys/types.h>
#include <sys/time.h>
#include <stdio.h>
#endif
#define LISTEN_FOR_INPUT(fp) \
{\
  int fd = (fp)->_file;\
  static struct timeval tv = {0,0};\
  static fd_set rmask; FD_ZERO(&rmask); FD_SET(fd,&rmask);\
  select(fd+1,&rmask,NULL,NULL,&tv);\
  return (FD_ISSET(fd,&rmask));\
}
#endif
/* end listen for input */

/* we dont need to worry about zeroing fp->_base , to prevent  */
#define FCLOSE_SETBUF_OK 

#undef  LD_COMMAND
#define LD_COMMAND(command,main,start,input,ldarg,output) \
  sprintf(command, "ld -N -x -A %s -T %x %s %s -o %s", \
            main,start,input,ldarg,output)

#define DATA_BEGIN (char *)N_DATADDR(header)
#define A_TEXT_OFFSET(x) (sizeof (struct exec))
#define A_TEXT_SEEK(hdr) (N_TXTOFF(hdr) + A_TEXT_OFFSET(hdr))
#define TEXT_START 0
#define DATA_START 0
#define UNIXSAVE "unexfreebsd.c"	/* from emacs distribution */

#define RELOC_FILE "rel_sun3.c"	/* for SFASL - enabled in bsd.h */

#define LITTLE_ENDIAN		/* also in <machine/endian.h> */

#define HZ		100	/* in FreeBSD 1.1.5 - check for 2.0 */

/* this for GC */
/* #define PAGEWIDTH 12		/* i386 sees 4096 byte pages */
/* try out the gnu malloc */
#define GNU_MALLOC		/* works if PAGEWIDTH==11 */
#define GNUMALLOC

#define INSTALL_SEGMENTATION_CATCHER \
  	 (void) signal(SIGSEGV,segmentation_catcher); \
  	 (void) signal(SIGBUS,segmentation_catcher)

/* Begin for cmpinclude */
/* yes we have alloca */
#define HAVE_ALLOCA

#define WANT_SGC

#ifdef WANT_SGC			/* begin defines for SGC */
/*
  SGC is a performance winner for large applications as it doesn't
  run the entire image through the pager during collection. SGC requires
  the 'mprotect' function.

  Need Jeffrey Hsu's kernel patch for signal handlers.  Should be in
FreeBSD versions later than 1.0.2.

  Also need to add
#include <sys/types.h> before
#include <sys/mman.h> in c/sgc.c

  Also - the above handler conflicts with use of '(un)catch-bad-signals'
  You may want to modify unixint.c to account for SGC use.

*/
#define SGC
#define SIGPROTV SIGBUS
#endif				/* end of SGC mods */

/* _setjmp and _longjmp exist on bsd and are more efficient
   and handle the C stack which is all we need. [I think!]
*/
#define setjmp _setjmp
#define longjmp _longjmp

= = = = = = = = = = = = = = = = = = = = = = = =

From pw@snoopy.mv.com  Wed Jan 25 15:52:26 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12131; Wed, 25 Jan 95 15:52:26 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA23863; Wed, 25 Jan 95 14:45:21 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id PAA00499; Wed, 25 Jan 1995 15:44:58 -0500
Date: Wed, 25 Jan 1995 15:44:58 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199501252044.PAA00499@snoopy.mv.com>
To: gcl@cli.com
In-Reply-To: <199501250654.WAA29270@echo.cs.unr.edu> (message from Eric V Blood on Tue, 24 Jan 95 22:54:46 -0800)
Subject: Re: Porting to FreeBSD 2.0

Here is the FreeBSD.h/ that work for me. You also need unexfreebsd.c
from the emacs kit.
----------- FreeBSD.h -----------
/*
 * FreeBSD.h for akcl-1-624 akcl-1-625 ...
 *
 * Hacked Jan/94 by Werkowski (pw@snoopy.mv.com)for FreeBSD 2.0R
 *
 */

#include "bsd.h"

#undef LD_COMMAND
#define LD_COMMAND(command,main,start,input,ldarg,output) \
  sprintf(command, "ld -dc -Bstatic -N -x -A %s -T %x %s %s -o %s", \
            main,start,input,ldarg,output)

#define ADDITIONAL_FEATURES \
		     ADD_FEATURE("386BSD");\
                     ADD_FEATURE("FreeBSD");\
                     ADD_FEATURE("CLX-LITTLE-ENDIAN");
#define	IEEEFLOAT
#undef HAVE_XDR
#define USE_ATT_TIME

/* begin listen for input */
#undef LISTEN_FOR_INPUT		/* default in bsd.h is loser in 386bsd */
#if 1				/* Required for CLX to work correctly  */
#if defined IN_FILE
#include <unistd.h>
#include <sys/types.h>
#include <sys/time.h>
#include <stdio.h>
#endif
#define LISTEN_FOR_INPUT(fp) \
{\
  int fd = (fp)->_file;\
  static struct timeval tv = {0,0};\
  static fd_set rmask; FD_ZERO(&rmask); FD_SET(fd,&rmask);\
  select(fd+1,&rmask,NULL,NULL,&tv);\
  return (FD_ISSET(fd,&rmask));\
}
#endif
/* end listen for input */

#ifdef IN_GBC
#include <sys/types.h>
#endif

/* we dont need to worry about zeroing fp->_base , to prevent  */
#define FCLOSE_SETBUF_OK 

#define DATA_BEGIN (char *)N_DATADDR(header);
/*
 * need to ensure following is appended to any imported unex? file
 *#ifdef UNIXSAVE
 *#include "save.c"
 *#endif
*/
/* /pfw: this from freebsd 1.1 */
#define UNIXSAVE "unexfreebsd.c"

#define RELOC_FILE "rel_sun3.c"	/* for SFASL - enabled in bsd.h */


/* this for GC */

#define PAGEWIDTH 12		/* i386 sees 4096 byte pages */

#undef  HAVE_SIGVEC
#undef HAVE_SIGACTION

#define SETUP_SIG_STACK \
{ static struct sigaltstack estack ; \
  estack.ss_size = SIGSTKSZ ; \
  estack.ss_flags = 0; \
  if (sigaltstack(&estack, 0) < 0) \
               perror("sigaltstack");} \

#define INSTALL_SEGMENTATION_CATCHER \
  	 (void) signal(SIGSEGV,segmentation_catcher); \
  	 (void) signal(SIGBUS,segmentation_catcher)

#define WANT_SGC
#ifdef  WANT_SGC			/* begin defines for SGC */

#define SGC
#define SIGPROTV SIGBUS
#endif				/* end of SGC mods */


/* Begin for cmpinclude */
#ifndef __GNUC__
#define HAVE_ALLOCA
#include <alloca.h>
#endif
 /* If can mprotect pages and so selective gc will work */
#define SGC  

/* End for cmpinclude */

From pw@snoopy.mv.com  Wed Jan 25 17:34:59 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12155; Wed, 25 Jan 95 17:34:59 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA24329; Wed, 25 Jan 95 16:36:49 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id RAA00379; Wed, 25 Jan 1995 17:36:26 -0500
Date: Wed, 25 Jan 1995 17:36:26 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199501252236.RAA00379@snoopy.mv.com>
To: gcl@cli.com
Subject: Re: GCL on FreeBSD 2.0


There is one critical thing for the subject combo. The 'libc/vprintf.c'
code found in the 2.0 kit is broken such that GCL will not properly
compile certain files such as found in PCL. Vprintf.c has  been fixed
in the FreeBSD-current distribution and you should pull the new version
from FreeBSD.cdrom.com:/pub/FreeBSD/src/lib/libc/stdio/vfprintf.c.

If you need this file and can't get it, please contact me directly and I
will send you a patch.

Paul

From starnet!bass!lakin@apple.com  Wed Jan 25 18:03:55 1995
Return-Path: <starnet!bass!lakin@apple.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12160; Wed, 25 Jan 95 18:03:55 CST
Received: from apple.com by cli.com (4.1/SMI-4.1)
	id AA24471; Wed, 25 Jan 95 17:14:07 CST
Received: by apple.com (5.61/8-Oct-1993-eef)
	id AA16265; Wed, 25 Jan 95 14:50:04 -0800
Received: from bass by StarConn.com with uucp
	(Smail3.1.28.1 #1) id m0rXF1O-00024QC; Wed, 25 Jan 95 13:12 PST
Received: by pgc.com (4.1/SMI-4.1)
	id AA03227; Wed, 25 Jan 95 13:21:00 PST
Date: Wed, 25 Jan 95 13:21:00 PST
From: starnet!bass!lakin@apple.com (Fred Lakin)
Message-Id: <9501252121.AA03227@pgc.com>
To: gcl@cli.com
Subject: speed of CLX under GCL
Reply-To: lakin@pgc.com

About 4 years ago I was using AKCL and CLX for a large graphics
program. The time required to draw stuff on the screen [text and
lines, not pixmaps] was quite slow. A friend convinced me to do a
test with one of the commerical lisps, and without change to the
code I saw a speedup of 10X to 20X.

Now I would like to try GCL/AKCL again. Has CLX speed been
improved?  [I believe some of the slowdown was attributed to
ACKL's boxing of small integers, but I could be wrong].

I also note in the GNU mailing of June 94 that "There is an Xlib
interface via C." Is this different than just using the foreign
function interface to C code which uses the Xlib? I do like the
convenience of CLX but not the peformance penalties.

Thanks in advance to anyone with experience or opinions.

regards,
-f

Fred Lakin  ::  lakin@pgc.com  ::  (415) 424-1086
The Performing Graphics Company  ::  512 Military Way, Palo Alto, CA 94306  USA
http://www.internex.net/pgc/webdog.html


From attardi@DI.UniPi.IT  Thu Jan 26 03:37:33 1995
Return-Path: <attardi@DI.UniPi.IT>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12199; Thu, 26 Jan 95 03:37:33 CST
Received: from apollo.di.unipi.it by cli.com (4.1/SMI-4.1)
	id AA25576; Thu, 26 Jan 95 02:25:50 CST
Received: from omega.di.unipi.it by apollo.di.unipi.it with SMTP
	(1.37.109.4/16.2) id AA02062; Thu, 26 Jan 95 09:23:24 +0100
Organization: Dipartimento di Informatica - Universita' di Pisa - Italy
Received: by omega (5.0/SMI-4.1)
	id AA03208; Thu, 26 Jan 1995 09:23:20 --100
Date: Thu, 26 Jan 1995 09:23:20 --100
From: attardi@DI.UniPi.IT
Message-Id: <9501260823.AA03208@omega>
To: lakin@pgc.com
Cc: gcl@cli.com
In-Reply-To: <9501252121.AA03227@pgc.com> (starnet!bass!lakin@apple.com)
Subject: Re: speed of CLX under GCL
Content-Length: 415


I have built a version of CLX which runs over 20X faster than in AKCL.
To do this I had to create a new C interface mechanism (definline), and
to make several changes to the original CLX code.

All of this is part of my own variant of KCL, called ECoLisp, which you can
ftp from:

 - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl
 - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp

-- Beppe

From siochil@csgrad.cs.vt.edu  Thu Jan 26 11:29:56 1995
Return-Path: <siochil@csgrad.cs.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12249; Thu, 26 Jan 95 11:29:56 CST
Received: from csgrad.cs.vt.edu by cli.com (4.1/SMI-4.1)
	id AA26423; Thu, 26 Jan 95 10:21:07 CST
Received: by csgrad.cs.vt.edu; (5.65/1.1.8.2/19Sep94-1023AM)
	id AA12989; Thu, 26 Jan 1995 11:21:01 -0500
Message-Id: <9501261621.AA12989@csgrad.cs.vt.edu>
Subject: UNSUBSCRIBE
To: gcl@cli.com
Date: Thu, 26 Jan 1995 11:21:00 -0500 (EST)
From: "Lucia Siochi" <siochil@csgrad.cs.vt.edu>
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 16        

UNSUBSCRIBE GCL

From rpeters2@d.umn.edu  Thu Jan 26 11:35:06 1995
Return-Path: <rpeters2@d.umn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12255; Thu, 26 Jan 95 11:35:06 CST
Received: from ub.d.umn.edu by cli.com (4.1/SMI-4.1)
	id AA26278; Thu, 26 Jan 95 09:50:12 CST
Received: (from rpeters2@localhost) by ub.d.umn.edu (8.6.9/8.6.9) id JAA15321 for gcl@cli.com; Thu, 26 Jan 1995 09:50:04 -0600
From: "Randy J. Peterson" <rpeters2@d.umn.edu>
Message-Id: <199501261550.JAA15321@ub.d.umn.edu>
Subject: UNSUBSCRIBE
To: gcl@cli.com
Date: Thu, 26 Jan 1995 09:50:03 -0600 (CST)
X-Mailer: ELM [version 2.4 PL22]
Content-Type: text
Content-Length: 16        

UNSUBSCRIBE GCL

From harmon@xn.ll.mit.edu  Thu Jan 26 14:13:12 1995
Return-Path: <harmon@xn.ll.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12270; Thu, 26 Jan 95 14:13:12 CST
Received: from xn.ll.mit.edu by cli.com (4.1/SMI-4.1)
	id AA26907; Thu, 26 Jan 95 12:59:20 CST
Received: from saturn.mi.ll.mit.edu by xn.ll.mit.edu id AA01803g; Thu, 26 Jan 95 14:00:40 EST
Received: by saturn.mi.ll.mit.edu; Thu, 26 Jan 95 13:57:34 EST
Date: Thu, 26 Jan 95 13:57:34 EST
From: harmon@xn.ll.mit.edu
Message-Id: <9501261857.AA06133@saturn.mi.ll.mit.edu>
To: gcl@cli.com
Subject: please unsubscribe me


UNSUBSCRIBE GCL

From @festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk  Fri Jan 27 19:59:28 1995
Return-Path: <@festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12653; Fri, 27 Jan 95 19:59:28 CST
Received: from sun2.nsfnet-relay.ac.uk by cli.com (4.1/SMI-4.1)
	id AA01577; Fri, 27 Jan 95 19:04:55 CST
Via: uk.ac.edinburgh.festival; Sat, 28 Jan 1995 01:04:51 +0000
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa03958;
          28 Jan 95 1:04 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk;
          Sat, 28 Jan 95 01:04:16 GMT
Date: Sat, 28 Jan 95 01:04:14 GMT
Message-Id: <6578.9501280104@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Subject: compiler bug w/ catch & throw
To: gcl@cli.com

There seems to be a bug, and it looks like it's been around for
a long time.  The simplest example I've come up with so far is

(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))

(f) should return 10.

Below are two transcripts, one using AKCL 1.615 and the other using
GCL 1.1.  In each case, I show that F works fine interpreted.  But
when a compiled F is called, there's an error: The tag A is undefined.

Similar problems occur when using block and return-from instead
of catch and throw, although this particular F works in GCL 1.1
if rewritten to use block and return-from.

----------------------------------------------------------------------
spottisvax$ akcl
AKCL (Austin Kyoto Common Lisp)  Version(1.615) Sun Oct 10 18:04:32
BST 1993
Contains Enhancements by W. Schelter

>(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
F

>(f)
10

>(compile 'f)
Compiling gazonk0.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 1d8e18 Finished loading gazonk0.o
#<compiled-function F>

>(f)

Error: The tag A is undefined.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by F.
Broken at F.  Type :H for Help.
>>Bye.                          
----------------------------------------------------------------------
spottisvax$ gcl
GCL (GNU Common Lisp)  Version(1.1) Mon Nov 14 00:41:18 GMT 1994
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
F

>(f)
10

>(compile 'f)
Compiling gazonk0.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 21e234 Finished loading gazonk0.o
#<compiled-function F>

>(f)

Error: The tag A is undefined.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by F.
Broken at F.  Type :H for Help.
>>Bye.
spottisvax$ 
----------------------------------------------------------------------

-- jeff

From yuasa@katura.tutics.tut.ac.jp  Sat Jan 28 22:25:31 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12765; Sat, 28 Jan 95 22:25:31 CST
Received: from higw.tut.ac.jp by cli.com (4.1/SMI-4.1)
	id AA02863; Sat, 28 Jan 95 21:17:21 CST
Received: from tutuser.tut.ac.jp by higw.tut.ac.jp (5.65+1.6W/6.4J.6)
	id AA03467; Sun, 29 Jan 95 12:20:26 JST
Received: from katura.tutics.tut.ac.jp by tutuser.tut.ac.jp (5.65+1.6W/6.4J.6)
	id AA10869; Sun, 29 Jan 95 12:10:43 +0900
Received: by katura.tutics.tut.ac.jp (5.65+1.6W/6.4JAIN-1.0)
	id AA03278; Sun, 29 Jan 95 12:14:04 JST
Date: Sun, 29 Jan 95 12:14:04 JST
From: yuasa@katura.tutics.tut.ac.jp (Taiichi Yuasa)
Return-Path: <yuasa@katura.tutics.tut.ac.jp>
Message-Id: <9501290314.AA03278@katura.tutics.tut.ac.jp>
To: jeff@aiai.edinburgh.ac.uk
Subject: RE: compiler bug w/ catch & throw
Cc: gcl@cli.com

>> There seems to be a bug, and it looks like it's been around for
>> a long time.  The simplest example I've come up with so far is
>> 
>> (defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
>> 
>> (f) should return 10.

In the original KCL, both interpreted and compiled f return 10.

-- Taiichi

From @festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk  Sun Jan 29 12:21:37 1995
Return-Path: <@festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12828; Sun, 29 Jan 95 12:21:37 CST
Received: from sun2.nsfnet-relay.ac.uk by cli.com (4.1/SMI-4.1)
	id AA03486; Sun, 29 Jan 95 11:32:32 CST
Via: uk.ac.edinburgh.festival; Sun, 29 Jan 1995 17:31:13 +0000
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa16733;
          29 Jan 95 17:31 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk;
          Sun, 29 Jan 95 17:30:48 GMT
Date: Sun, 29 Jan 95 17:30:48 GMT
Message-Id: <7152.9501291730@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Subject: RE: compiler bug w/ catch & throw
To: Taiichi Yuasa <yuasa@katura.tutics.tut.ac.jp>
In-Reply-To: Taiichi Yuasa's message of Sun, 29 Jan 95 12:14:04 JST
Cc: gcl@cli.com

> >> There seems to be a bug, and it looks like it's been around for
> >> a long time.  The simplest example I've come up with so far is
> >> 
> >> (defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
> >> 
> >> (f) should return 10.
> 
> In the original KCL, both interpreted and compiled f return 10.

I've just checked in AKCL 1.505, and it it works there too.

-- jeff

From nils@guru.ims.uni-stuttgart.de  Sun Jan 29 13:06:22 1995
Return-Path: <nils@guru.ims.uni-stuttgart.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12833; Sun, 29 Jan 95 13:06:22 CST
Received: from guru.ims.uni-stuttgart.de by cli.com (4.1/SMI-4.1)
	id AA03510; Sun, 29 Jan 95 12:21:50 CST
Received: by guru.ims.uni-stuttgart.de (Smail3.1.28.1 #16)
	id m0rYCwT-0003UwC; Sat, 28 Jan 95 14:11 MET
Message-Id: <m0rYCwT-0003UwC@guru.ims.uni-stuttgart.de>
Date: Sat, 28 Jan 95 14:11 MET
From: nils@guru.ims.uni-stuttgart.de (Cornelis van der Laan)
To: gcl@cli.com, jeff@aiai.edinburgh.ac.uk
Subject: Re: compiler bug w/ catch & throw

I can't verify this here, running a (slightly patched) AKCL 1.624
as well as GCL 1.0 on FreeBSD 1.1.5:

Starting /usr/local/bin/akcl ...
AKCL (Austin Kyoto Common Lisp)  Version(1.624) Sat Jan 21 20:29:04 MET 1995
Contains Enhancements by W. Schelter
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=1, Speed=3
Using conditions package CLCS 2/1/90
Loading /home/nils/.akclrc.lisp
Using MK defsystem version v2.5 08-JAN-92
Finished loading /home/nils/.akclrc.lisp
>

>(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))

F

>(f)
10

>(compile 'f)
;; Compiling gazonk0.lisp.
;; End of Pass 1.  
;; End of Pass 2.  
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=1, Speed=3
;; Finished compiling gazonk0.lisp.
Loading gazonk0.o
Finished loading gazonk0.o
#<compiled-function F>

>(f)
10

Compiling with optimization levels of (safety 0) (space 0) (speed 3)
results in the very same behaviour. Ditto GCL 1.0.

Something must be wrong with your vax port...

Nils

> GCL (GNU Common Lisp)  Version(1.1) Mon Nov 14 00:41:18 GMT 1994
> Licensed under GNU Public Library License
> Contains Enhancements by W. Schelter

> >(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
> F

> >(f)
> 10

> >(compile 'f)
> Compiling gazonk0.lsp.
> End of Pass 1.  
> End of Pass 2.  
> OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
> Speed=3
> Finished compiling gazonk0.lsp.
> Loading gazonk0.o
> start address -T 21e234 Finished loading gazonk0.o
> #<compiled-function F>

> >(f)

> Error: The tag A is undefined.
> Fast links are on: do (use-fast-links nil) for debugging
> Error signalled by F.
> Broken at F.  Type :H for Help.
> >>Bye.


From @festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk  Sun Jan 29 13:27:47 1995
Return-Path: <@festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12837; Sun, 29 Jan 95 13:27:47 CST
Received: from sun2.nsfnet-relay.ac.uk by cli.com (4.1/SMI-4.1)
	id AA03518; Sun, 29 Jan 95 12:39:10 CST
Via: uk.ac.edinburgh.festival; Sun, 29 Jan 1995 18:39:04 +0000
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa22052;
          29 Jan 95 18:38 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk;
          Sun, 29 Jan 95 18:38:39 GMT
Date: Sun, 29 Jan 95 18:38:38 GMT
Message-Id: <7207.9501291838@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Subject: Re: compiler bug w/ catch & throw
To: Cornelis van der Laan <nils@guru.ims.uni-stuttgart.de>, gcl@cli.com

In-Reply-To: Cornelis van der Laan's message of Sat, 28 Jan 95 14:11 MET

> I can't verify this here, running a (slightly patched) AKCL 1.624
> as well as GCL 1.0 on FreeBSD 1.1.5:

Interesting...  The cases that didn't work for me were on a 386
running FreeBSD 2.0-RELEASE #3, but it's possible the AKCL and
the GCl were compiled using some different OS (the AKCl almost
certainly was).

The case that did work for me (AKCL 1.505) was on a Sun (though
it was also a system built before some OS upgrades).

Anyway, this raises several possibilities...

-- jeff

From reggie@miles.phys.washington.edu  Sun Jan 29 15:32:09 1995
Return-Path: <reggie@miles.phys.washington.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12847; Sun, 29 Jan 95 15:32:09 CST
Received: from miles.phys.washington.edu (pacts44.phys.washington.edu) by cli.com (4.1/SMI-4.1)
	id AA03641; Sun, 29 Jan 95 14:43:13 CST
Received: from miles.phys.washington.edu (localhost [127.0.0.1]) by miles.phys.washington.edu (8.6.9/8.6.9) with ESMTP id MAA03633; Sun, 29 Jan 1995 12:43:16 -0800
Message-Id: <199501292043.MAA03633@miles.phys.washington.edu>
To: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Cc: Taiichi Yuasa <yuasa@katura.tutics.tut.ac.jp>, gcl@cli.com
Subject: Re: compiler bug w/ catch & throw 
In-Reply-To: Your message of "Sun, 29 Jan 1995 17:30:48 GMT."
             <7152.9501291730@subnode.aiai.ed.ac.uk> 
Date: Sun, 29 Jan 1995 12:43:12 -0800
From: "Reginald S. Perry" <reggie@phys.washington.edu>

>"Jeff" == Jeff Dalton <jeff@aiai.edinburgh.ac.uk> writes:

> >> There seems to be a bug, and it looks like it's been around for
> >> a long time.  The simplest example I've come up with so far is
> >> 
> >> (defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
> >> 
> >> (f) should return 10.
> 
> In the original KCL, both interpreted and compiled f return 10.

> I've just checked in AKCL 1.505, and it it works there too.

	Here is the result from gcl-1.0 on Linux.

miles$ gcl
GCL (GNU Common Lisp)  Version(1.0) Wed Aug 24 01:38:16 PDT 1994
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(defun f () (catch 'a (funcall #'(lambda () (throw 'a 10)))))
F

>(f)
10

>(compile (defun f () (catch 'a (funcall #'(lambda () (throw 'a 10))))))
Compiling gazonk0.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 1e0000 Finished loading gazonk0.o
#<compiled-function F>

>(f)
10

>Bye.
miles$ gcl
GCL (GNU Common Lisp)  Version(1.0) Wed Aug 24 01:38:16 PDT 1994
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(compile (defun f () (catch 'a (funcall #'(lambda () (throw 'a 10))))))
Compiling gazonk0.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 1e0000 Finished loading gazonk0.o
#<compiled-function F>

>(f)
10

>Bye.



-------------------
Reginald S. Perry -- University of Washington, Department of Physics FM-15
                     Seattle, Washington 98195
reggie@phys.washington.edu


From Chandan.Haldar@blr.sni.de  Sun Jan 29 23:50:47 1995
Return-Path: <Chandan.Haldar@blr.sni.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12891; Sun, 29 Jan 95 23:50:47 CST
Received: from mail.sni.de by cli.com (4.1/SMI-4.1)
	id AA04401; Sun, 29 Jan 95 22:41:36 CST
Received: from blrsn01.blr.sni.de by mail.sni.de with SMTP (PP) id <25439-0@mail.sni.de>; Mon, 30 Jan 1995 05:40:55 +0100
Received: from blrast03.blr.sni.de by blr.sni.de (4.1/SMI-4.1)
	id AA10147; Mon, 30 Jan 95 10:12:29+050
Date: Mon, 30 Jan 95 10:12:29+050
From: Chandan.Haldar@blr.sni.de (Dr. Chandan Haldar)
Message-Id: <9501300512.AA10147@blr.sni.de>
Received: by blrast03.blr.sni.de (5.0/SMI-SVR4)
	id AA00369; Mon, 30 Jan 95 10:24:21 GMT
To: jeff@aiai.edinburgh.ac.uk
Cc: yuasa@katura.tutics.tut.ac.jp, gcl@cli.com
In-Reply-To: <7152.9501291730@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Sun, 29 Jan 95 17:30:48 GMT)
Subject: RE: compiler bug w/ catch & throw
Content-Length: 565

> I've just checked in AKCL 1.505, and it it works there too.

Also in AKCL 1.600 and in GCL 1.1 (on Sparc 10 Solaris 1 with cc).

--------------------------------------------------------------------------
Dr. Chandan Haldar
--------------------------------------------------------------------------
Siemens Information Systems Limited
29 Infantry Road, Bangalore 560 001, India.
Phone:    +91 80 551 1012                       Fax:      +91 80 551 1214
Internet: Chandan.Haldar@blr.sni.de
--------------------------------------------------------------------------

From readingj@cerfnet.com  Mon Jan 30 14:28:26 1995
Return-Path: <readingj@cerfnet.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13186; Mon, 30 Jan 95 14:28:26 CST
Received: from nic.cerf.net by cli.com (4.1/SMI-4.1)
	id AA06203; Mon, 30 Jan 95 13:23:36 CST
Received: (from readingj@localhost) by nic.cerf.net (8.6.9/8.6.9) id LAA02737 for gcl@cli.com; Mon, 30 Jan 1995 11:23:31 -0800
Date: Mon, 30 Jan 1995 11:23:31 -0800
From: "John D. Reading" <readingj@cerfnet.com>
Message-Id: <199501301923.LAA02737@nic.cerf.net>
To: gcl@cli.com
Subject: Help building PCL??


Sorry to bug you, but has anyone out there built PCL under GCL 1.1 on
Solaris 2.3?  I am getting a core dump while building PCL, and I am
not progressing very well on tracking down the source of the error.

Can anyone help me?

Thanks,

John Reading
readingj@cerf.net
reading@io.dsd.litton.com

From wfs@math.utexas.edu  Mon Jan 30 15:09:11 1995
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13206; Mon, 30 Jan 95 15:09:11 CST
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA06353; Mon, 30 Jan 95 13:57:33 CST
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA21073; Mon, 30 Jan 95 13:54:25 -0600
Date: Mon, 30 Jan 95 13:54:20 -0600
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Mon, 30 Jan 95 13:54:20 -0600
Message-Id: <9501301954.AA00894@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA00894; Mon, 30 Jan 95 13:54:20 -0600
To: gcl@cli.com
In-Reply-To: "John D. Reading"'s message of Mon, 30 Jan 1995 11:23:31 -0800 <199501301923.LAA02737@nic.cerf.net>
Subject: Re: Help building PCL??
Reply-To: wfs@math.utexas.edu


PCL:
On math.utexas.edu:pub/gcl/pcl-gcl-1.1.tgz

should contain correct code for pcl and gcl-1.1

This was contributed by Richard Harris who has done a good deal of work
pcl.

--------------------
Xlib:

There are two ways of having Xlib
1) CLX lisp code with X distribution.
  It is desirable to use some speedups for the arithmetic operations
rascal.ics.utexas.edu:7 -rw-r--r--  1 root         6494 Oct 22  1991 /usr2/ftp/pub/clx-5-opts.tar.Z
  contains such speedups.
2) Use something like
-rw-r--r--  1 wfs        106547 Oct  3 19:24 /u/ftp/pub/gcl/xgcl-2.tgz
which contains bindings for Xlib functions in lisp, but does a link with the C xlibrary.

I am also about to release a TCL/TK interface for GCL which will
provide a third (and I think for most purposes) preferable way of
interacting with the window system.

--------------------
Catch:
It appears from various evidence that the 'catch' bug reported by
dalton, was probably due to a changed include file on his system or a
changed C compiler flag, since the base gcl system had been compiled
(eg changing size of jmp_buf).  It was not due to a gcl/kcl/akcl bug.

Bill Schelter


From kbibb@qualcomm.com  Mon Jan 30 15:38:46 1995
Return-Path: <kbibb@qualcomm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13210; Mon, 30 Jan 95 15:38:46 CST
Received: from jafar.qualcomm.com by cli.com (4.1/SMI-4.1)
	id AA06381; Mon, 30 Jan 95 14:10:03 CST
Received: (kbibb@localhost) by jafar.qualcomm.com (8.6.8/QC-BSD-2.4) id MAA27759; Mon, 30 Jan 1995 12:10:09 -0800
Date: Mon, 30 Jan 1995 12:10:09 -0800
From: Ken Bibb <kbibb@qualcomm.com>
Message-Id: <199501302010.MAA27759@jafar.qualcomm.com>
To: gcl@cli.com, readingj@cerfnet.com
Subject: Re:  Help building PCL??

> From: "John D. Reading" <readingj@cerfnet.com>
> 
> Sorry to bug you, but has anyone out there built PCL under GCL 1.1 on
> Solaris 2.3?  I am getting a core dump while building PCL, and I am
> not progressing very well on tracking down the source of the error.
> 
> Can anyone help me?

That's the same error I'm getting :D

I think I saw a post saying that the version of vprintf being used
in Solaris is at fault.  

--
Ken Bibb		"Through the fire backwards
kbibb@qualcomm.com	 Again and Again
jester@crash.cts.com	 Return to base."
				Peter Hammill--"A Headlong Stretch"

From kbibb@qualcomm.com  Mon Jan 30 18:00:02 1995
Return-Path: <kbibb@qualcomm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13247; Mon, 30 Jan 95 18:00:02 CST
Received: from jafar.qualcomm.com by cli.com (4.1/SMI-4.1)
	id AA06820; Mon, 30 Jan 95 16:06:35 CST
Received: (kbibb@localhost) by jafar.qualcomm.com (8.6.8/QC-BSD-2.4) id OAA17020; Mon, 30 Jan 1995 14:06:35 -0800
Date: Mon, 30 Jan 1995 14:06:35 -0800
From: Ken Bibb <kbibb@qualcomm.com>
Message-Id: <199501302206.OAA17020@jafar.qualcomm.com>
To: gcl@cli.com, wfs@fireant.ma.utexas.edu
Subject: Re: Help building PCL??

> From: wfs@fireant.ma.utexas.edu (Bill Schelter)
> 
> PCL:
> On math.utexas.edu:pub/gcl/pcl-gcl-1.1.tgz
> 
> should contain correct code for pcl and gcl-1.1
> 
> This was contributed by Richard Harris who has done a good deal of work
> pcl.

My last attempt to build this was two days ago using the version that
was on fireant at that time.  It had the same prob that all versions of
PCL have had on Solaris 2.3--it core dumps when it reaches a certain
point in the compilation.

PCL appears to compile correctly under SunOS 4.x.

--
Ken Bibb		"Through the fire backwards
kbibb@qualcomm.com	 Again and Again
jester@crash.cts.com	 Return to base."
				Peter Hammill--"A Headlong Stretch"

From readingj@cerfnet.com  Mon Jan 30 19:07:50 1995
Return-Path: <readingj@cerfnet.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13264; Mon, 30 Jan 95 19:07:50 CST
Received: from nic.cerf.net by cli.com (4.1/SMI-4.1)
	id AA07062; Mon, 30 Jan 95 17:30:53 CST
Received: (from readingj@localhost) by nic.cerf.net (8.6.9/8.6.9) id PAA07035 for gcl@cli.com; Mon, 30 Jan 1995 15:30:41 -0800
Date: Mon, 30 Jan 1995 15:30:41 -0800
From: "John D. Reading" <readingj@cerfnet.com>
Message-Id: <199501302330.PAA07035@nic.cerf.net>
To: gcl@cli.com
Subject: Re: Help building PCL??

Sorry, I have been a little unresponsive on this.  wfs has
been helping, as some of the messages to the list have
shown.  The particular problem I am seeing occurs during
the compilation of slots-boot.lisp, and seems to be related
to the function MAKE-METHOD-FUNCTION which is called from this
file.  I am currently using pcl-gcl-1.1, gcc 2.6.3, and gcl
1.1  Anybody who wants to play is welcome to come along ;-)

BTW:  Having commented out the 4 functions that call MAKE-METHOD-FUNCTION
in slots-boot.lisp I have found that the compilation proceeds
then to braid.lisp, at which point it dumps core again.  I
haven't played with this too much, but if I didn't screw up
something really bad then commenting out the function in 
braid.lisp which calls MAKE-METHOD-FUNCTION didn't seem to
stop it from dumping core.  For some reason I feel like I am
swimming upstream here.

John
readingj@cerf.net
reading@io.dsd.litton.com

From raz@superior.powercerv.com  Mon Jan 30 19:12:29 1995
Return-Path: <raz@superior.powercerv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13268; Mon, 30 Jan 95 19:12:29 CST
Received: from riverside.mr.net by cli.com (4.1/SMI-4.1)
	id AA07135; Mon, 30 Jan 95 17:45:07 CST
Received: from powercerv.com by riverside.mr.net (8.6.9/SMI-4.1.R931202)
	id RAA16887; Mon, 30 Jan 1995 17:45:16 -0600
Received: by powercerv.com (5.0/SMI-SVR4)
	id AA11120; Mon, 30 Jan 1995 17:44:13 +0600
Date: Mon, 30 Jan 1995 17:44:13 +0600
From: raz@superior.powercerv.com (Randal V. Zoeller)
Message-Id: <9501302344.AA11120@powercerv.com>
To: gcl@cli.com
Subject: Unsubscribe
Content-Length: 35


Please unsubscribe raz@itasca.com

From @festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk  Mon Jan 30 21:16:26 1995
Return-Path: <@festival.edinburgh.ac.uk:jeff@aiai.edinburgh.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13292; Mon, 30 Jan 95 21:16:26 CST
Received: from sun2.nsfnet-relay.ac.uk by cli.com (4.1/SMI-4.1)
	id AA07374; Mon, 30 Jan 95 20:25:19 CST
Via: uk.ac.edinburgh.festival; Mon, 30 Jan 1995 17:51:03 +0000
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa11495;
          30 Jan 95 17:50 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk;
          Mon, 30 Jan 95 17:50:33 GMT
Date: Mon, 30 Jan 95 17:50:32 GMT
Message-Id: <9784.9501301750@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.edinburgh.ac.uk>
Subject: Re: compiler bug w/ catch & throw
To: Cornelis van der Laan <nils@guru.ims.uni-stuttgart.de>, gcl@cli.com

In-Reply-To: Jeff Dalton's message of Sun, 29 Jan 95 18:38:38 GMT

> In-Reply-To: Cornelis van der Laan's message of Sat, 28 Jan 95 14:11 MET
> 
> > I can't verify this here, running a (slightly patched) AKCL 1.624
> > as well as GCL 1.0 on FreeBSD 1.1.5:
> 
> Interesting...  The cases that didn't work for me were on a 386
> running FreeBSD 2.0-RELEASE #3, but it's possible the AKCL and
> the GCl were compiled using some different OS (the AKCl almost
> certainly was).
> 
> The case that did work for me (AKCL 1.505) was on a Sun (though
> it was also a system built before some OS upgrades).
> 
> Anyway, this raises several possibilities...

Ok, I've figured it out.  Thanks to everyone who responded.
It was all very helpful.

And the answer is ... not a KCL or GCL bug at all.  For some
reason FreeBSD 2 changed the size of the area saved by setjmp.
In the various BSDs used to build the various Lisps it was 10;
in FreeBSD 2.0, it was 8.  Why the change?  Not clear.  Presumably
it's "more right" in some sense; but it does make otherwise
compatible systems incompatible.

-- jeff

From root@guru.ims.uni-stuttgart.de  Tue Jan 31 15:20:33 1995
Return-Path: <root@guru.ims.uni-stuttgart.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13482; Tue, 31 Jan 95 15:20:33 CST
Received: from guru.ims.uni-stuttgart.de by cli.com (4.1/SMI-4.1)
	id AA11085; Tue, 31 Jan 95 13:43:22 CST
Received: by guru.ims.uni-stuttgart.de (Smail3.1.28.1 #16)
	id m0rZOXR-0003UwC; Tue, 31 Jan 95 20:46 MET
Message-Id: <m0rZOXR-0003UwC@guru.ims.uni-stuttgart.de>
Date: Tue, 31 Jan 95 20:46 MET
From: root@guru.ims.uni-stuttgart.de (Cornelis van der Laan)
To: gcl@cli.com, jeff@aiai.edinburgh.ac.uk, nils@guru.ims.uni-stuttgart.de
Subject: Re: compiler bug w/ catch & throw

And as far as I can see (not that far, but...) they only set
the jmp_buf size to it's real size, which is 8. The code
which uses it - setjmp and longjmp - is identical on
FreeBSD 1.1.5 and 2.0. All OSes which use 10 bytes waste 2...

So maybe editing the header file to read 10 and recompiling
world helps?

Nils

From frkorze@srv.PacBell.COM  Wed Feb  1 20:43:36 1995
Return-Path: <frkorze@srv.PacBell.COM>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13729; Wed, 1 Feb 95 20:43:36 CST
Received: from ns.PacBell.COM by cli.com (4.1/SMI-4.1)
	id AA15781; Wed, 1 Feb 95 19:48:14 CST
Received: from srv.PacBell.COM (mother.srv.PacBell.COM) by ns.PacBell.COM (4.1/PacBell-11/15/94)
	id AA10449; Wed, 1 Feb 95 17:48:24 PST
Received: from diablo.srv.PacBell.COM by srv.PacBell.COM (4.1/SMI-4.0)
	id AA02736; Wed, 1 Feb 95 17:48:21 PST
Received: by diablo.srv.PacBell.COM (4.1/SMI-4.1)
	id AA00893; Wed, 1 Feb 95 17:48:21 PST
Date: Wed, 1 Feb 95 17:48:21 PST
From: frkorze@srv.PacBell.COM (Frank Korzeniewski)
Message-Id: <9502020148.AA00893@diablo.srv.PacBell.COM>
To: gcl@cli.com
Subject: subscribe

subscribe

From ias5!c3po.iasi.com!basham@csn.net  Fri Feb  3 13:58:24 1995
Return-Path: <ias5!c3po.iasi.com!basham@csn.net>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA14155; Fri, 3 Feb 95 13:58:24 CST
Received: from csn.net (csn.org) by cli.com (4.1/SMI-4.1)
	id AA21227; Fri, 3 Feb 95 13:02:18 CST
Received: from ias5.UUCP by csn.net with UUCP id AA00830
  (5.65c/IDA-1.4.4 for gcl@cli.com); Fri, 3 Feb 1995 12:02:31 -0700
Received: from c3po.iasi.com by iasi.com (4.1/SMI-4.1)
	id AA27752; Fri, 3 Feb 95 12:02:33 MST
Received: by c3po.iasi.com (4.1/SMI-4.1)
	id AA23706; Fri, 3 Feb 95 12:05:02 MST
Date: Fri, 3 Feb 95 12:05:02 MST
From: basham@c3po.iasi.com (Bryan Basham)
Message-Id: <9502031905.AA23706@c3po.iasi.com>
To: gcl@cli.com
Subject: Status of GCL on IRIX 5.X
Cc: basham@c3po.iasi.com

Hello,

Does any know if GCL will compile on SGI's OS IRIX 5.X?  If so, which is
the best FTP site to get the code?

Thanks,
Bryan

From ajwright@acssun.pstcc.cc.tn.us  Sat Feb 11 14:08:04 1995
Return-Path: <ajwright@acssun.pstcc.cc.tn.us>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA01639; Sat, 11 Feb 95 14:08:04 CST
Received: from PSTCC4.PSTCC.CC.TN.US by cli.com (4.1/SMI-4.1)
	id AA16457; Sat, 11 Feb 95 12:58:03 CST
Received: from ACSSUN.PSTCC.CC.TN.US by pstcc.cc.tn.us (PMDF V4.2-11 #7176) id
 <01HMXBWN0KJ48ZE7U7@pstcc.cc.tn.us>; Sat, 11 Feb 1995 13:56:28 EDT
Received: (from ajwright@localhost) by acssun.pstcc.cc.tn.us (8.6.9/8.6.9) id
 NAA03405; Sat, 11 Feb 1995 13:55:43 -0500
Date: Sat, 11 Feb 1995 13:55:43 -0500 (EST)
From: "A. John Wright" <ajwright@acssun.pstcc.cc.tn.us>
Subject: GCL 1.1 and Solaris 2.3
To: gcl@cli.com
Message-Id: <Pine.SOL.3.91.950211132604.2445A-100000@acssun>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Content-Transfer-Encoding: 7BIT

	After trying everything else I can think of . . . 

	The CS department that works on the Sun SPARCstation 20/50 I admin
has requested that I get a version of LISP (preferably GCL) on this computer. 
So, I attempted to get gcl 1.1 to compile, but to no avail.  I read all the
online documentation for it and the make lives up to the point that the "raw
lisp compiler" has to read in several object files (defmacro.o etc) and 
output the final compiler. It dies on/with:

/-------
../unixport/raw_gcl ../unixport/ < foo
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
~s is not a ~a
Lisp initialization failed.
\-------

	I don't know lisp, so I tried what I *do* know: I experimented with
different C compilers, assemblers and linkers.  I even tried stepping through
the process by hand (That'll work!  NOT!)

	I managed to get it to the state described above (Which is the best
so far) using GCC (2.6.1), the assembler that comes with Solaris 2.3, and the
defaults for "add-defs solaris".  Has anyone else had any experience with
this combination, (suggestions!) or know where I can find pre-compiled
binaries for my system?  Any assistance is appreciated! 

Thanks, (HELP!)
--aj

     ajwright@acssun.pstcc.cc.tn.us	ajwright@acssun.pstcc.cc.tn.us
----------------------------------------------------------------------------
            A. John `AJ' Wright -- UNIX Technician -- Ext: 7068



From ajwright@acssun.pstcc.cc.tn.us  Sat Feb 11 14:21:32 1995
Return-Path: <ajwright@acssun.pstcc.cc.tn.us>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA01647; Sat, 11 Feb 95 14:21:32 CST
Received: from PSTCC4.PSTCC.CC.TN.US by cli.com (4.1/SMI-4.1)
	id AA16485; Sat, 11 Feb 95 13:20:16 CST
Received: from ACSSUN.PSTCC.CC.TN.US by pstcc.cc.tn.us (PMDF V4.2-11 #7176) id
 <01HMXCP2VDVK8ZE8BX@pstcc.cc.tn.us>; Sat, 11 Feb 1995 14:18:37 EDT
Received: (from ajwright@localhost) by acssun.pstcc.cc.tn.us (8.6.9/8.6.9) id
 OAA04248; Sat, 11 Feb 1995 14:17:52 -0500
Date: Sat, 11 Feb 1995 14:17:52 -0500 (EST)
From: "A. John Wright" <ajwright@acssun.pstcc.cc.tn.us>
Subject: GCL 1.1 and Solaris 2.3
To: gcl@cli.com
Message-Id: <Pine.SOL.3.91.950211141613.4199A-100000@acssun>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Content-Transfer-Encoding: 7BIT

	After trying everything else I can think of . . . 

	The CS department that works on the Sun SPARCstation 20/50 I admin
has requested that I get a version of LISP (preferably GCL) on this computer. 
So, I attempted to get gcl 1.1 to compile, but to no avail.  I read all the
online documentation for it and the make lives up to the point that the "raw
lisp compiler" has to read in several object files (defmacro.o etc) and 
output the final compiler. It dies on/with:

/-------
../unixport/raw_gcl ../unixport/ < foo
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
~s is not a ~a
Lisp initialization failed.
\-------

	I don't know lisp, so I tried what I *do* know: I experimented with
different C compilers, assemblers and linkers.  I even tried stepping through
the process by hand (That'll work!  NOT!)

	I managed to get it to the state described above (Which is the best
so far) using GCC (2.6.1), the assembler that comes with Solaris 2.3, and the
defaults for "add-defs solaris".  Has anyone else had any experience with
this combination, (suggestions!) or know where I can find pre-compiled
binaries for my system?  Any assistance is appreciated! 

Thanks, (HELP!)
--aj

     ajwright@acssun.pstcc.cc.tn.us	ajwright@acssun.pstcc.cc.tn.us
----------------------------------------------------------------------------
            A. John `AJ' Wright -- UNIX Technician -- Ext: 7068





From ajwright@acssun.pstcc.cc.tn.us  Sat Feb 11 14:52:26 1995
Return-Path: <ajwright@acssun.pstcc.cc.tn.us>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA01665; Sat, 11 Feb 95 14:52:26 CST
Received: from acssun.pstcc.cc.tn.us by cli.com (4.1/SMI-4.1)
	id AA16496; Sat, 11 Feb 95 14:04:41 CST
Date: Sat, 11 Feb 95 14:01:47 CST
From: ajwright@acssun.pstcc.cc.tn.us
Subject: GCL 1.1 and Solaris 2.3
To: gcl@cli.com
Message-Id: <Pine.SOL.3.91.950211141613.4199A-100000@acssun>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Content-Transfer-Encoding: 7BIT
 
        After trying everything else I can think of . . . 
 
        The CS department that works on the Sun SPARCstation 20/50 I admin

has requested that I get a version of LISP (preferably GCL) on this computer. 
So, I attempted to get gcl 1.1 to compile, but to no avail.  I read all the
online documentation for it and the make lives up to the point that the "raw
lisp compiler" has to read in several object files (defmacro.o etc) and 
output the final compiler. It dies on/with:
 
/-------
./unixport/raw_gcl ../unixport/ < foo
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
~s is not a ~a
Lisp initialization failed.
\-------
 
        I don't know lisp, so I tried what I *do* know: I experimented with
different C compilers, assemblers and linkers.  I even tried stepping through
 
        I managed to get it to the state described above (Which is the best
so far) using GCC (2.6.1), the assembler that comes with Solaris 2.3, and the
defaults for "add-defs solaris".  Has anyone else had any experience with
this combination, (suggestions!) or know where I can find pre-compiled
binaries for my system?  Any assistance is appreciated! 
 
Thanks, (HELP!)
--aj
 
     ajwright@acssun.pstcc.cc.tn.us     ajwright@acssun.pstcc.cc.tn.us
----------------------------------------------------------------------------
            A. John `AJ' Wright -- UNIX Technician -- Ext: 7068
 

From wfs@math.utexas.edu  Sat Feb 11 18:43:26 1995
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA01716; Sat, 11 Feb 95 18:43:26 CST
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA16687; Sat, 11 Feb 95 17:55:34 CST
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA18640; Sat, 11 Feb 95 17:54:07 -0600
Date: Sat, 11 Feb 95 17:54:00 -0600
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Sat, 11 Feb 95 17:54:00 -0600
Message-Id: <9502112354.AA03498@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA03498; Sat, 11 Feb 95 17:54:00 -0600
To: ajwright@acssun.pstcc.cc.tn.us
Cc: gcl@cli.com
In-Reply-To: "A. John Wright"'s message of Sat, 11 Feb 1995 13:55:43 -0500 (EST) <Pine.SOL.3.91.950211132604.2445A-100000@acssun>
Subject: Re: GCL 1.1 and Solaris 2.3
Reply-To: wfs@math.utexas.edu


It does compile correctly with gcc (100's have done so), but I dont
think the sun c compiler is correct.  At least it was not last time i
checked.



From grib@mamba.arlut.utexas.edu  Wed Feb 15 09:28:27 1995
Return-Path: <grib@mamba.arlut.utexas.edu>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02438; Wed, 15 Feb 95 09:28:27 CST
Received: from ns1.arlut.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA25983; Wed, 15 Feb 95 08:22:12 CST
Received: from mamba.arlut.utexas.edu (mamba.arlut.utexas.edu [129.116.176.42]) by ns1.arlut.utexas.edu (8.6.9/8.6.9) with SMTP id IAA10397 for <gcl@cli.com>; Wed, 15 Feb 1995 08:22:34 -0600
Received: by mamba.arlut.utexas.edu (5.0/SMI-SVR4)
	id AA12398; Wed, 15 Feb 1995 08:22:34 +0600
From: grib@mamba.arlut.utexas.edu (William Gribble)
Message-Id: <9502151422.AA12398@mamba.arlut.utexas.edu>
Subject: Building gcl-1.1 under recent Linux?
To: gcl@cli.com
Date: Wed, 15 Feb 1995 08:22:32 -0600 (CST)
X-Mailer: ELM [version 2.4 PL22]
Content-Type: text
Content-Length: 1570      

Has anyone built gcl-1.1 (or 1.0, for that matter) under a recent Linux?
(``recent'' meaning > 1.1.51)?

I obtained a binary package of 1.0 already built which works just
fine, but I wanted to rebuild it myself.  I applied the patches I
found on sunsite (mostly pretty minor) and proceeded to build (using
gcc 2.6.2).  The problem is that unexec() doesn't work right.  The
raw_gcl made with ld works fine, but after the dump to saved_gcl
there's no a.out header on the file.  od shows that the header is
actually there, but there are 0x10000 zeros before it starts.  I tried
to debug it, but unexec() seems a little bit like black magic to me so
I didn't make much progress.  The nearest thing I could determine was
that write_text_and_data() (?) thought the text segment consisted of
0x10000 0s, followed by the a.out header, followed by the text. It was
writing all of this starting at file offset 0x00, so it was
overwriting the header that a previous function had written out.  At
this point I decided to punt.

I grabbed the unexsunos4.c from emacs-19.28 and hacked it up a little
to include save.c and define N_PAGSIZ to PAGE_SIZE (as the emacs
linux.h does).  This fixed the header location problem, but the dumped
image doesn't run properly; it just prints the startup banner and
hangs without giving a prompt, taking an excessive amount of CPU but
making no system calls.

I dug around in the mailings list archives and saw that lots of people had 
similar problems with the IRIX port.  Was there a canonical solution? 

Thanks for any advice--
Bill Gribble




From n2ell!pcolsen@cs.UMD.EDU  Sun Feb 19 11:36:51 1995
Return-Path: <n2ell!pcolsen@cs.UMD.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00436; Sun, 19 Feb 95 11:36:51 CST
Received: from mimsy.cs.UMD.EDU by cli.com (4.1/SMI-4.1)
	id AA07133; Sun, 19 Feb 95 10:40:35 CST
Received: from n2ell.UUCP 
	by mimsy.cs.UMD.EDU (8.6.9/UMIACS-0.9/04-05-88)
	id LAA02632; Sun, 19 Feb 1995 11:40:59 -0500
Received: by n2ell (Smail3.1.29.1 #3)
	id m0rgERV-0003A3C; Sun, 19 Feb 95 11:25 EST
Message-Id: <m0rgERV-0003A3C@n2ell>
Date: Sun, 19 Feb 95 11:25 EST
From: pcolsen@n2ell (Peter C. Olsen P.E.)
To: gcl@cli.com
Subject: Can't compile GCL-1.1 under Linux
Reply-To: pcolsen@acm.org


I can't seem to compile GCL-1.1 under Linux --- and I can't figure out
why.  I'd really appreciate some advice.

Everything seems to run just fine until I get to the part where I have
to execute "../unixport/saved_gcl" --- but that file is not
executable.

Any suggestions?  (I've included the output of my "make" below.)

Peter

P.S.  I'd like to make the package rather than snarf down a compiled
version (which I can't seem to find anyway) so I can make Maxima-5.0
(which needs the gcl *.o files).

-----------------------------------------------------------------

Here's a copy of the make output.  (I've broken some long lines.)

 Here's what I did: 

   bash$ make >~/gcl-hist
   sh: ../unixport/saved_gcl: cannot execute binary file
   make[1]: *** [collectfn.o] Error 126
   make: *** [all] Error 1

 Here's what I got:

   (cd bin; make all)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/bin'
   make[1]: Nothing to be done for `all'.
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/bin'
   (cd mp ; make all)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/mp'
   make all1 "MPFILES=./mpi-386d.o   ./libmport.a"
   make[2]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/mp'
   make[2]: Nothing to be done for `all1'.
   make[2]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/mp'
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/mp'
   rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
   (cd o; make all)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/o'
   make[1]: Nothing to be done for `all'.
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/o'
   (cd lsp; make all)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/lsp'
   make[1]: Nothing to be done for `all'.
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/lsp'
   (cd cmpnew; make all)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/cmpnew'
   make[1]: Nothing to be done for `all'.
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/cmpnew'
   (cd unixport; make saved_gcl)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/unixport'
   make[1]: `saved_gcl' is up to date.
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/unixport'
   make command
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1'
   rm -f xbin/gcl ; echo "#!/bin/sh" > xbin/gcl; \
   echo "/mnt/sdc1/local/src/gcl-1.1/unixport/saved_gcl -dir
         /mnt/sdc1/local/src/gcl-1.1/unixport/ \$@ " \ 
   >> xbin/gcl
   chmod 755 xbin/gcl
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1'
   (cd  cmpnew ; make collectfn.o)
   make[1]: Entering directory `/mnt/sdc1/local/src/gcl-1.1/cmpnew'
   ../unixport/saved_gcl ../unixport/ -compile collectfn
   make[1]: Leaving directory `/mnt/sdc1/local/src/gcl-1.1/cmpnew'


 Here's the listing for saved_gcl and the machine type I was using:

   bash$ ls -l /mnt/sdc1/local/src/gcl-1.1/unixport/saved_gcl
          -rwxr-xr-x   1 pcolsen  bin       2134748 Feb 19 10:00
          /mnt/sdc1/local/src/gcl-1.1/unixport/saved_gcl
   bash$ more machine
   386-linux


For what it's worth, "raw_gcl" does run

   bash$ ./raw_gcl
   GCL (GNU Common Lisp)  April 1994  16384 pages
   loading ../lsp/export.lsp
   Initializing ../lsp/defmacro.o
   Initializing ../lsp/evalmacros.o
   Initializing ../lsp/top.o
   Initializing ../lsp/module.o
   loading ../lsp/autoload.lsp

   >

From grib@mamba.arlut.utexas.edu  Sun Feb 19 12:59:56 1995
Return-Path: <grib@mamba.arlut.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00455; Sun, 19 Feb 95 12:59:56 CST
Received: from ns1.arlut.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA07203; Sun, 19 Feb 95 12:04:03 CST
Received: from mamba.arlut.utexas.edu (mamba.arlut.utexas.edu [129.116.176.42]) by ns1.arlut.utexas.edu (8.6.9/8.6.9) with SMTP id MAA25961; Sun, 19 Feb 1995 12:04:28 -0600
Received: by mamba.arlut.utexas.edu (5.0/SMI-SVR4)
	id AA20928; Sun, 19 Feb 1995 12:04:27 +0600
From: grib@mamba.arlut.utexas.edu (William Gribble)
Message-Id: <9502191804.AA20928@mamba.arlut.utexas.edu>
Subject: Re: Can't compile GCL-1.1 under Linux
To: pcolsen@acm.org
Date: Sun, 19 Feb 1995 12:04:25 -0600 (CST)
Cc: gcl@cli.com
In-Reply-To: <m0rgERV-0003A3C@n2ell> from "Peter C. Olsen P.E." at Feb 19, 95 11:25:00 am
X-Mailer: ELM [version 2.4 PL22]
Content-Type: text
Content-Length: 2721      

I had this same difficulty, and have solved (or at least found a way
around) the problem.  But whoever maintains the Linux port shoud think
about changing the way the current system works.

The problem: recent binutils distributions for Linux build QMAGIC binaries
by default.  The differences between QMAGIC and the older ZMAGIC binaries
are (1) a QMAGIC binary has the struct exec header as a part of the 
text segment (2) the first page of the process address space is unmapped
at run time for a QMAGIC binary, to help trap NULL pointer dereferences
(you get a segmentation violation if you try to use a NULL pointer). 

While the QMAGIC binary is a nifty idea, it completely breaks the 
unexec() that's compiled for Linux with gcl-1.[01].  If you will use 
od(1) to look at your un-executable saved_gcl image, you will see 
a page of 0 bytes at the beginning, and then the 0314 QMAGIC magic number.
This is your problem.  Without the magic number at the start of the file,
Linux thinks it's just a binary data file.  

The workaround: Force a non-QMAGIC binary.  Unfortunately, QMAGIC has 
*replaced* ZMAGIC, which was the original Linux demand-paged executable
format.  Your only option with the current binutils is to use the 
-N option to ld, which makes an NMAGIC binary.  The problem with NMAGIC 
is that it's not a demand-paged format and is certainly archaic.  I'm not
sure exactly what difference it makes to the kernel, but I'm almost 
certain that an NMAGIC lisp image will use memory less efficiently than a
QMAGIC binary, forcing more of lisp to be in physical memory at one time. 

To implement this, edit gcl-1.1/unixport/makefile and change the line 
``LDCC=$(CC)'' to ``LDCC=$(CC) -N''.  What this does is force the original
raw_gcl image to be linked as NMAGIC.  unexec() (which dumps the running
process to a file) copies the header of the running process for the 
new, dumped image.  Therefore, every dump you do, including the one done
by the makefile to generate saved_gcl, will create an NMAGIC binary.

A real solution: patch gcl-1.1/c/unexlin.c to correctly handle QMAGIC binaries.
Since the current unexec() code came from an older version of Emacs, my guess
is that getting the Linux unexec() from the current Emacs distribution
would be the easiest thing to do.  

Good luck with the compile.  By the way, I'm about to mail a small
patch to the gcl list which should fix the socket-stream code for
Linux, if you're trying to use it.  Actually, sockets are not compiled
in by default; if you want it, edit gcl-1.1/h/386-linux.h and comment
out the line which says #undef RUN_PROCESS.  Then you can do nifty
stuff like (setf sock (si:make-socket-stream 'foo.bar.com 23)).

Bill Gribble







From grib@mamba.arlut.utexas.edu  Sun Feb 19 13:02:11 1995
Return-Path: <grib@mamba.arlut.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00460; Sun, 19 Feb 95 13:02:11 CST
Received: from ns1.arlut.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA07208; Sun, 19 Feb 95 12:12:07 CST
Received: from mamba.arlut.utexas.edu (mamba.arlut.utexas.edu [129.116.176.42]) by ns1.arlut.utexas.edu (8.6.9/8.6.9) with SMTP id MAA25987 for <gcl@cli.com>; Sun, 19 Feb 1995 12:12:32 -0600
Received: by mamba.arlut.utexas.edu (5.0/SMI-SVR4)
	id AA21055; Sun, 19 Feb 1995 12:12:30 +0600
From: grib@mamba.arlut.utexas.edu (William Gribble)
Message-Id: <9502191812.AA21055@mamba.arlut.utexas.edu>
Subject: small patch against gcl-1.1 (run_process.c)
To: gcl@cli.com
Date: Sun, 19 Feb 1995 12:12:29 -0600 (CST)
X-Mailer: ELM [version 2.4 PL22]
Content-Type: text
Content-Length: 960       

This patch corrects an error in gcl-1.1/c/run_process.c.  The 
sin_port field in struct sockaddr_in should be in network byte order, 
not host byte order.  On Suns, I believe the two are the same; on
x86 machines, they are not.  The htons() macro does the right thing 
for the platform you're compiling on.

On Linux (and x86 BSD machines, I am pretty sure) this caused calls to
(si:make-socket-stream) to try to connect to the wrong port, usually
generating a ``connection refused'' error.

Bill Gribble

--- gcl-1.1.original/c/run_process.c    Fri Oct 21 11:44:10 1994
+++ gcl-1.1/c/run_process.c     Sun Feb 19 11:37:37 1995
@@ -80,7 +80,7 @@
        bzero((char *)&sock_add, sizeof(sock_add));
        bcopy(hp->h_addr, (char *)&sock_add.sin_addr, hp->h_length);
        sock_add.sin_family = hp->h_addrtype;
-       sock_add.sin_port = server;
+       sock_add.sin_port = htons((short)server);
 
        sock = socket( hp->h_addrtype, SOCK_STREAM , 0);



From blake@edge.ercnet.com  Mon Feb 20 00:48:39 1995
Return-Path: <blake@edge.ercnet.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00546; Mon, 20 Feb 95 00:48:39 CST
Received: from edge.ercnet.com by cli.com (4.1/SMI-4.1)
	id AA07861; Sun, 19 Feb 95 23:58:24 CST
Received: from ip202.ercnet.com (ip202.ercnet.com [199.0.68.202]) by edge.ercnet.com (8.6.9/8.6.9) with SMTP id XAA18619 for <gcl@cli.com>; Sun, 19 Feb 1995 23:58:40 -0600
Message-Id: <199502200558.XAA18619@edge.ercnet.com>
X-Sender: blake@edge.ercnet.com
X-Mailer: Windows Eudora Version 1.4.4
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sun, 19 Feb 1995 23:58:59 -0600
To: gcl@cli.com
From: blake@edge.ercnet.com (Blake McBride)
Subject: Re: Can't compile GCL-1.1 under Linux

>The problem: recent binutils distributions for Linux build QMAGIC binaries
>by default.  The differences between QMAGIC and the older ZMAGIC binaries
>are (1) a QMAGIC binary has the struct exec header as a part of the 
>text segment (2) the first page of the process address space is unmapped
>at run time for a QMAGIC binary, to help trap NULL pointer dereferences
>(you get a segmentation violation if you try to use a NULL pointer). 
>
>........


I sure wish GCL had the ability to create executables via a normal
link instead of loading objects and unexecing!  This would make GCL
useful across a much wider veriety of platforms.

The way it would work is that lisp code would be compiled into objects
as they are now.  However, those objects could then be linked with a
GCL library - producing the executable.  No real need for unexec or
reading in objects.

--blake

-- 
Blake McBride				(615) 790-8521  voice
3020 Liberty Hills Drive		(615) 791-7736  fax
Franklin, TN  37064			blake@edge.ercnet.com
U.S.A.


From kr@shell.portal.com  Wed Feb 22 20:11:59 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01185; Wed, 22 Feb 95 20:11:59 CST
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA17351; Wed, 22 Feb 95 19:10:32 CST
Received: from jobe.shell.portal.com (root@jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.9/8.6.5) with ESMTP id RAA09632 for <gcl@cli.com>; Wed, 22 Feb 1995 17:10:30 -0800
Received: from DialupEudora (kr@jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.9/8.6.5) with SMTP id RAA06238 for <gcl@cli.com>; Wed, 22 Feb 1995 17:10:24 -0800
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110101ab718ce88c55@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: \p\r\r\e%, 22 Feb 1995 17:10:41 -0800
To: gcl@cli.com
From: kr@shell.portal.com (kr)
Subject: what is brk needed for ?

With this question I am presumably displaying my lack of knowledge about
UN!X systems. But I hope that getting a quick answer from the authors of
gcl will save me a lot of painful time, trying to figure this out by trial
and error.

In c/main.c , in the function siLsave_system() , one finds the following:

>#if defined(BSD) || defined(ATT)
>        brk(core_end);
>  /* printf( "(breaking at core_end = %x in main ,)",core_end); */
>#endif

What is the brk needed for ? Is there a way to work around it ? This seems
to be essentially the only place in the gcl source where brk is called. I
would be glad to receive advice on how to eliminate this call too.

I am trying to compile gcl-1.1 on a Mac, using MacMiNT, which is a
UN!X-like emulator that was originally written for Atari computers and then
adapted to Macs. This sounds pretty hairy (and it is :-), but usually most
C code can be ported without too much trouble to this platform. So far,
after fiddling around quite a bit, I have been able to compile everything,
but I am now stuck at the linking stage. I have tried to adhere to a BSD
system, so "BSD" is defined. Unfortunately, the mint libraries seem to be
totally unaware of any brk call, they only have sbrk. I do not understand
the difference between these calls, so I do not know how to work around
this problem.

Thank you for helpful hints.
When I have finally succeeded in getting this to run, I can contribute the
configuration I used for compiling under MacMiNT, if this is desired by the
gcl authors or members of this mailing list.


Greetings
Markus Krummenacker



From kr@shell.portal.com  Thu Feb 23 17:33:45 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01486; Thu, 23 Feb 95 17:33:45 CST
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA19931; Thu, 23 Feb 95 15:58:34 CST
Received: from jobe.shell.portal.com (root@jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.10/8.6.5) with ESMTP id NAA13210 for <gcl@cli.com>; Thu, 23 Feb 1995 13:58:32 -0800
Received: from DialupEudora (kr@jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.10/8.6.5) with SMTP id NAA04253 for <gcl@cli.com>; Thu, 23 Feb 1995 13:58:27 -0800
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110101ab72a666a3d4@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: date\r\e%, 23 Feb 1995 13:58:44 -0800
To: gcl@cli.com
From: kr@shell.portal.com (kr)
Subject: what is _cleanup ?

Thank you for the replies I obtained for my last question. It seems that
brk() can be expressed in terms of sbrk().

However, I have an additional question concerning a problem I have run
into. In the file unixsave.c , in function Lsave() , there is a call to
_cleanup() .

I have not found this function anywhere in the gcl source, nor does MacMiNT
know about it. What does it do ? Is this a UN!X function ? Can one just
leave it away with no adverse consequences ?


Greetings
Markus Krummenacker



From mjs@s4mjs.shannon.com  Sun Feb 26 13:41:47 1995
Return-Path: <mjs@s4mjs.shannon.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01978; Sun, 26 Feb 95 13:41:47 CST
Received: from cnj.digex.net by cli.com (4.1/SMI-4.1)
	id AA26331; Sun, 26 Feb 95 12:41:24 CST
Received: from shannon.com by cnj.digex.net with SMTP id AA00698
  (5.67b8/IDA-1.5 for <gcl@cli.com>); Sun, 26 Feb 1995 13:41:52 -0500
Received: by shannon.com (5.x/SMI-SVR4)
	id AA18818; Sun, 26 Feb 1995 13:41:48 -0500
Date: Sun, 26 Feb 1995 13:41:48 -0500
From: mjs@s4mjs.shannon.com (marty shannon)
Message-Id: <9502261841.AA18818@shannon.com>
To: gcl@cli.com
Subject: gcl on Solaris 2.4 for x86
Reply-To: mjs@s4mjs.shannon.com
X-Sun-Charset: US-ASCII

Hi, I've been trying to get gcl-1.1 to build under Solaris 2.4 (i.e.,
SunOS 5.4) on a 486, and been having a devil of a time even building
raw_gcl.  One of the problems with the current method of configuring
gcl is that a system type of, say, solaris, implies both hardware and
software, even though solaris runs on wildly different hardware (sparc
vs. i386/i486).  It would be better if the vast majority of parameters
were determined by the presense or absense of features rather than by the
current method.  Of course, if/as/when I get a working version, I'll send
my code to Bill Schelter to be folded in to the distribution, but anyone
who's more familiar with the porting issues than I am, and is willing
to look at what I've done so far is more than welcome to contact me
(mjs@shannon.com, in case the mail headers aren't quite right...).

	Marty
--
---------------+ <Delapsus Resurgam: When I fall I shall rise. --(10cc)>
Marty Shannon  | My opinions are just that.  You may share them.  No one
mjs@shannon.com| speaks for me, and I speak only for myself -- no matter
---------------+ where I post from.  Get it?             Post no flames.

From DOUGHILL@BNLCL6.BNL.GOV  Sun Feb 26 14:41:53 1995
Return-Path: <DOUGHILL@BNLCL6.BNL.GOV>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01985; Sun, 26 Feb 95 14:41:53 CST
Received: from BNLCL6.BNL.GOV by cli.com (4.1/SMI-4.1)
	id AA26403; Sun, 26 Feb 95 13:56:01 CST
Date: Sun, 26 Feb 1995 14:56:31 -0500 (EST)
From: DOUGHILL@BNLCL6.BNL.GOV
To: gcl@cli.com
Message-Id: <950226145631.24c41f17@BNLCL6.BNL.GOV>
Subject: A Fix for GCL unexec() problem with Linux

***   OUTLINE OF A FIX FOR THE GCL UNEXEC() PROBLEM ON LINUX    ***

SIMPTOM: GCL bombs during build.


gcl-1.1 (also gcl-1.0) generates a segmentation fault during the dumping
phase of the build on Slackware Linux 1.0.9.  It occurs during the call
to unexec().

I found a remedy by copying stuff from the current GNU emacs-19.28 (which
also dumps).

Take emacs/src/unexec.c, which is a somewhat modified version of unexlin.c
(i. e. same author: Spencer W. Thomas).  Define these macros:

/* These 3 from emacs/s
rc/s/linux.h */

#define A_TEXT_OFFSET(hdr) (N_MAGIC(hdr) == QMAGIC ? sizeof (struct exec) : 0)
#define A_TEXT_SEEK(hdr) (N_TXTOFF(hdr) + A_TEXT_OFFSET(hdr))
#define ADJUST_EXEC_HEADER \
  unexec_text_start = N_TXTADDR(ohdr) + A_TEXT_OFFSET(ohdr)

Using the preprocessor I determined start_of_text () and start_of_data () to
be:

/*
 *      These two functions lifted from emacs/src/sysdep.c
 *
 *	Return the address of the start of the text segment prior to
 *	doing an unexec.  After unexec the return value is
 undefined.
 *	See crt0.c for further explanation and _start.
 *
 */


char *
start_of_text ()
{
  return ((char *) 0 );
}


/*
 *	Return the address of the start of the data segment prior to
 *	doing an unexec.  After unexec the return value is undefined.
 *	See crt0.c for further information and definition of data_start.
 *
 *	Apparently, on BSD systems this is etext at startup.  On
 *	USG systems (swapping) this is highly mmu dependent and
 *	is also dependent on whether or not the program is running
 *	
with shared text.  Generally there is a (possibly large)
 *	gap between end of text and start of data with shared text.
 *
 *	On Uniplus+ systems with shared text, data starts at a
 *	fixed address.  Each port (from a given oem) is generally
 *	different, and the specific value of the start of data can
 *	be obtained via the UniPlus+ specific "uvar" system call,
 *	however the method outlined in crt0.c seems to be more portable.
 *
 *	Probably what will have to happen when a USG unexec is available,
 *	at l
east on UniPlus, is temacs will have to be made unshared so
 *	that text and data are contiguous.  Then once loadup is complete,
 *	unexec will produce a shared executable where the data can be
 *	at the normal shared text boundry and the startofdata variable
 *	will be patched by unexec to the correct value.
 *
 */
 
char *
start_of_data ()
{
  extern int data_start;
  return ((char *) &data_start);
}



In unixport/makefile:

# Put in stuff from emacs:
crt0_stuff = $(ODIR)/pre-crt0.o /usr/lib/crt0.o

raw_
$(SYSTEM):  $(crt0_stuff) $(FOR_RAW)
	$(LDCC) -nostartfiles $(crt0_stuff) -o raw_$(SYSTEM) $(FOR_RAW) $(GCLIB) -lm

It might be more portable to let the compiler pick its own libraries like this.


From simons@cs.tu-berlin.de  Thu Mar  2 02:49:45 1995
Return-Path: <simons@cs.tu-berlin.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02816; Thu, 2 Mar 95 02:49:45 CST
Received: from mail.cs.tu-berlin.de by cli.com (4.1/SMI-4.1)
	id AA07257; Thu, 2 Mar 95 01:48:08 CST
Received: from wintermute.cs.tu-berlin.de (simons@wintermute.cs.tu-berlin.de [130.149.19.141]) by mail.cs.tu-berlin.de (8.6.10/8.6.10) with ESMTP id IAA19813; Thu, 2 Mar 1995 08:48:34 +0100
Received: (simons@localhost) by wintermute.cs.tu-berlin.de (8.6.10/8.6.9) id IAA03894; Thu, 2 Mar 1995 08:48:25 +0100
Date: Thu, 2 Mar 1995 08:48:25 +0100
Message-Id: <199503020748.IAA03894@wintermute.cs.tu-berlin.de>
From: Martin Simons <simons@cs.tu-berlin.de>
To: gcl@cli.com
Subject: GCL 1.1 and NESL
Content-Type: text
Content-Length: 1215

Hi,

I am having troubles with GCL 1.1 while compiling CMU's NESL 3.0 under
SunOS5.4; everything works fine with SunOS4.1.3.

After adding the definitions for Solaris (./add-defs solaris) GCL 1.1
compiles with a few warnings. I am using gcc2.5.8.

Also, compiling NESL works well until I am asked to call the main
function (nesl) form the GCL prompt. GCL then quits with

	calling `dl' function sun did not supply

This error message originates from GCL's c/run_process.c where some
wrappers for `dl' functions are provided. We actually do have the libdl
library but naively commenting out the wrappers and compiling gcl with
-ldl with dynamic loading of libraries enabled produced a saved_gcl that
cored immediately. 

I don't want to dive any deeper into the gcl code and I would appreciate
any help.

Thanks and best regards,

Martin Simons
-------------------------------------------------------------------------
Martin Simons                            Internet: simons@cs.tu-berlin.de
Software Engineering Research Group (Sekr. FR5-6)   Tel: +49 30 314 25213
                                                    Fax: +49 30 314 73488
Technical University Berlin - Franklinstr. 28/29 - 10587 Berlin - Germany



From PBC01764@niftyserve.or.jp  Mon Mar  6 05:19:57 1995
Return-Path: <PBC01764@niftyserve.or.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01002; Mon, 6 Mar 95 05:19:57 CST
Received: from inetnif.niftyserve.or.jp ([192.47.24.129]) by cli.com (4.1/SMI-4.1)
	id AA16804; Mon, 6 Mar 95 04:19:55 CST
Received: by inetnif.niftyserve.or.jp (8.6.9+2.4W/3.3W8-950117-Mail-Gateway)
	id TAA06257; Mon, 6 Mar 1995 19:20:55 +0900
Message-Id: <199503061020.TAA06257@inetnif.niftyserve.or.jp>
Date: Mon, 06 Mar 1995 19:19:00 +0900
From: Mikio Nakajima <PBC01764@niftyserve.or.jp>
Subject: gcl-1.1 on MSDOS (djgpp)
To: gcl@cli.com

  I got the gcl-1.1 from ftp.cli.com, tried to compile it on MSDOS +
djgpp- 1.12, but I cannot finish it even now :-(.


  First of all, I found add-defs.bat did not work on MSDOS ver.5.0.  For
Japanese domestic machines, MSDOS ver.6 has been receltly available, and
I don't have it now.  I'd like to know what version's MSDOS does
add-defs.bat support.


  Secondly, unixport\saved_kc.exe was not included in the archive.  I
am really anxious about the following message created by add-defs.bat.

  WARNING : unixport/saved_kcl.exe file not found
  _         you will not be able to recompile the .lsp files
  _         nor start akcl
  
      I'd like to know where to get saved_kcl.exe.


  Thirdly, I found out neither Smakefile nor tmpxx_.tem in the archive.
I guessed Smakefile was provided as makefile, but I really didn't found
out a relief for tmpxx_.tem.  I'd like to know where to or how to get
them.


  Finally, it seemed that h\dos-go32.h included <aout.h>.  Was this
dos-go32.h for djgpp-1.10 or earlier?  If someone provides dos-go32.h for
djgpp-1.11 or later, please tell me where to get it.

Mikio Nakajima (PBC01764@niftyserve.or.jp / minakaji@mix.or.jp)

From jeff@aiai.ed.ac.uk  Fri Mar 24 17:07:26 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00485; Fri, 24 Mar 95 17:07:26 CST
Received: from haymarket.ed.ac.uk ([129.215.128.53]) by cli.com (4.1/SMI-4.1)
	id AA19847; Fri, 24 Mar 95 15:36:12 CST
Received: from festival.ed.ac.uk (festival.ed.ac.uk [129.215.128.24]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id VAA03612 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 24 Mar 1995 21:36:04 GMT
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa08313;
          24 Mar 95 21:34 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 24 Mar 95 21:34:39 GMT
Date: Fri, 24 Mar 95 21:34:39 GMT
Message-Id: <4021.9503242134@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: possible bug w/ 0d0
To: gcl@cli.com

Compiling a file that contains 0d0 and then loading the ,o file
gets "Dots appeared illegally".

This is running on a 386 using FreeBSD 2.0.  GCL 1.1 doesn't come w/.
such a port -- I just used the NetBSD stuff unchanged -- so it's
possible the bug is there rather than in GCL per se.

$ cat mess.lsp
(defun df-zero () 0d0)

$ gcl
GCL (GNU Common Lisp)  Version(1.1) Fri Mar 24 19:33:57  1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(compile-file "mess.lsp")
Compiling mess.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
Speed=3
Finished compiling mess.lsp.
#"mess.o"

>(load *)
Loading mess.o

Error: Dots appeared illegally.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by LOAD.
Broken at LOAD.  Type :H for Help.
>>

-- jeff

From toy@rtp.ericsson.se  Fri Mar 24 17:23:56 1995
Return-Path: <toy@rtp.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00489; Fri, 24 Mar 95 17:23:56 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA19926; Fri, 24 Mar 95 16:08:16 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.6.10/8.6.10) with ESMTP id QAA19987 for <gcl@cli.com>; Fri, 24 Mar 1995 16:08:15 -0600
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.6.8/NAHUB-MR1.1) with ESMTP id QAA13099 for <gcl@cli.com>; Fri, 24 Mar 1995 16:08:14 -0600
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id RAA10673; Fri, 24 Mar 1995 17:11:20 -0500
Message-Id: <199503242211.RAA10673@screamer.rtp.ericsson.se>
To: gcl@cli.com
Cc: toy@rtp.ericsson.se
Subject: reduce with :key, and map-into
Date: Fri, 24 Mar 1995 17:08:06 -0500
From: Raymond Toy <toy@rtp.ericsson.se>

I'm new to this list, so forgive if this has already been fixed.

In gcl 1.x and gcl 2.0, reduce does not accept the :key keyword
argument, as specified in cltl2.  Also, map-into is not defined at
all.

I've enclosed a modified version of reduce (from seqlib.lsp) that
accepts :key and a new version of map-into.  My lisp knowledge is
limited, so these may not be the best versions.

Ray

======================================================================
-----> Raymond Toy                         Tel:  919-990-7480
       Ericsson Inc.                       Fax:  919-990-7451
       1 Triangle Drive                 E-mail:  toy@rtp.ericsson.se
       RTP, NC 27709

(defun reduce (function sequence
			&key from-end
			start 
			end
			(initial-value nil ivsp)
			(key #'identity))
  (with-start-end  start end sequence
		   (cond ((not from-end)
			    (when (null ivsp)
			      (when (>= start end)
				(return-from reduce (funcall function)))
			      (setq initial-value (elt sequence start))
			      (setf start (f+ 1 start))
			      )
			    (do ((x initial-value
				    (funcall function x (funcall key (prog1 (elt sequence start)
							  (setf start (f+ 1 start))
							  )))))
				((>= start end) x)))
			 (t
			    (when (null ivsp)
			      (when (>= start end)
				(return-from reduce (funcall function)))
			      (setf end (f+ end -1))
			      (setq initial-value (elt sequence end)))
			    (do ((x initial-value (funcall function
							   (funcall key (elt sequence end)) x)))
				((>= start end) x)
			      (setf end (f+ -1 end)))))))

(defun map-into (result-sequence function &rest sequences)
  "map-into:  (result-sequence function &rest sequences)
Destructively modify RESULT-SEQUENCE to contain the results of
applying FUNCTION to corresponding elements of the argument
SEQUENCES in turn.  RESULT-SEQUENCE is returned.

The arguments RESULT-SEQUENCE and each element of SEQUENCES can each
be either a list or a vector.  The FUNCTION must accept at least as
many arguments as the number of arguement SEQUENCES supplied to
MAP-INTO.  If RESULT-SEQUENCE and the other argument SEQUENCES are not
all the same length, the iteration terminates when the shortest
sequence is exhausted.  If RESULT-SEQUENCE is a vector with a fill
pointer, the fill pointer is ignored when deciding how many iterations
to perform, and afterwards the fill pointer is set to the number of
times the FUNCTION was applied.

If the FUNCTION has side effects, it can count on being called first
on all the elements numbered 0, then on all those numbered 1, and so
on.

If RESULT-SEQUENCE is longer than the shortest element of SEQUENCES,
extra elements at the end of RESULT-SEQUENCE are unchanged.

The function MAP-INTO differs from MAP in that it modifies an existing
sequence rather than creating a new one.  In addition, MAP-INTO can be
called with only two arguments (RESULT-SEQUENCE and FUNCTION), while
MAP requires at least three arguments.

If RESULT-SEQUENCE is NIL, MAP-INTO immediately returns NIL, becaause
NIL is a sequence of length zero."
  (let ((nel (apply #'min (if (eq 'vector (type-of result-sequence))
			      (array-dimension result-sequence 0)
			    (length result-sequence))
		    (mapcar #'length sequences))))
    ;; Set the fill pointer to the number of iterations
    (when (and (eq 'vector (type-of result-sequence))
		(array-has-fill-pointer-p result-sequence))
      (setf (fill-pointer result-sequence) nel))
    ;; Perform mapping
    (dotimes (k nel result-sequence)
      (setf (elt result-sequence k)
	    (apply function (mapcar #'(lambda (v) (elt v k)) sequences))))))

From pw@snoopy.mv.com  Fri Mar 24 17:27:05 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00493; Fri, 24 Mar 95 17:27:05 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA19923; Fri, 24 Mar 95 16:06:51 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id RAA01276; Fri, 24 Mar 1995 17:03:07 -0500
Date: Fri, 24 Mar 1995 17:03:07 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199503242203.RAA01276@snoopy.mv.com>
To: jeff@aiai.ed.ac.uk
Cc: gcl@cli.com
In-Reply-To: <4021.9503242134@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Fri, 24 Mar 95 21:34:39 GMT)
Subject: Re: possible bug w/ 0d0

>>>>> "Jeff" == Jeff Dalton <jeff@aiai.ed.ac.uk> writes:

    Jeff> Compiling a file that contains 0d0 and then loading the ,o
    Jeff> file gets "Dots appeared illegally".

    Jeff> Error: Dots appeared illegally.  Fast links are on: do
    Jeff> (use-fast-links nil) for debugging Error signalled by LOAD.
    Jeff> Broken at LOAD.  Type :H for Help.
    >>>

	This is a known problem with the 2.0 vfprintf.c function
	in libc. It's been fixed in -current since mid January.

Paul





     

From leverich@rand.org  Fri Mar 24 19:39:49 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00535; Fri, 24 Mar 95 19:39:49 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA20202; Fri, 24 Mar 95 18:46:30 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id QAA15341; Fri, 24 Mar 1995 16:44:49 -0800
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id QAA21382; Fri, 24 Mar 1995 16:44:54 -0800
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.9) with SMTP id QAA14580; Fri, 24 Mar 1995 16:44:52 -0800
Message-Id: <199503250044.QAA14580@atlantis.rand.org>
To: "Paul F. Werkowski" <pw@snoopy.mv.com>
Cc: jeff@aiai.ed.ac.uk, gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: possible bug w/ 0d0 
In-Reply-To: Your message of Fri, 24 Mar 95 17:03:07 EST.
             <199503242203.RAA01276@snoopy.mv.com> 
Date: Fri, 24 Mar 95 16:44:49 PST
From: Brian Leverich <leverich@rand.org>



-- Your message was:   (from ""Paul F. Werkowski"")

          This is a known problem with the 2.0 vfprintf.c function
          in libc. It's been fixed in -current since mid January.

  Paul
       
  ------------------


Oops.  I've just had one of those self-revelatory experiences where
I've become aware of my own extreme cluelessness.

Where are 2.0 and -current?  And is there another list where gcl is
being discussed besides here?

BTW, if anyone else is interested in such self-abuse, there are
versions of CLX and Garnet 2.2 hacked for GCL compatibility available
from ftp://rand.org/pub/leverich/.  (We're running GCL/CLX/Garnet on
Linux boxes and HP 735s here at RAND.)  We're supporting these sources
in rude mode, which means we don't support them at all but we will
incorporate contributed fixes into future versions.  Cheers, B.


From kr@shell.portal.com  Sat Mar 25 06:39:58 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00617; Sat, 25 Mar 95 06:39:58 CST
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA20989; Sat, 25 Mar 95 05:12:19 CST
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.11/8.6.5) with ESMTP id DAA19500; Sat, 25 Mar 1995 03:11:43 -0800
Received: from DialupEudora (jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.11/8.6.5) with SMTP id DAA25555; Sat, 25 Mar 1995 03:11:39 -0800
X-Sender: kr@pop.shell.portal.com
Message-Id: <v0211010aab992d208f52@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: srialpop\r\e%, 25 Mar 1995 03:12:05 -0800
To: Raymond Toy <toy@rtp.ericsson.se>, gcl@cli.com
From: kr@shell.portal.com (kr)
Subject: Re: reduce with :key, and map-into
Cc: toy@rtp.ericsson.se

At 17:08 95-03-24, Raymond Toy wrote:
>I'm new to this list, so forgive if this has already been fixed.
>
>In gcl 1.x and gcl 2.0, reduce does not accept the :key keyword

What exactly is gcl 2.0 ?
Having been on this list for a couple of weeks, I have not noticed an
announcement float by. Have I missed something ?


Greetings
Markus Krummenacker



From pw@snoopy.mv.com  Sat Mar 25 08:51:24 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00627; Sat, 25 Mar 95 08:51:24 CST
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA21086; Sat, 25 Mar 95 07:25:00 CST
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id IAA02697; Sat, 25 Mar 1995 08:18:19 -0500
Date: Sat, 25 Mar 1995 08:18:19 -0500
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199503251318.IAA02697@snoopy.mv.com>
To: Brian_Leverich@rand.org
Cc: gcl@cli.com
In-Reply-To: <199503250044.QAA14580@atlantis.rand.org> (message from Brian Leverich on Fri, 24 Mar 95 16:44:49 PST)
Subject: Re: possible bug w/ 0d0

>>>>> "Brian" == Brian Leverich <leverich@rand.org> writes:

    Brian> -- Your message was: (from ""Paul F. Werkowski"")

    Brian>           This is a known problem with the 2.0 vfprintf.c
    Brian> function in libc. It's been fixed in -current since mid
    Brian> January.

    Brian> Oops.  I've just had one of those self-revelatory
    Brian> experiences where I've become aware of my own extreme
    Brian> cluelessness.

    Brian> Where are 2.0 and -current?  And is there another list
    Brian> where gcl is being discussed besides here?


	Sorry, I had been reading zillions of messages from
	the "freebsd-hackers" list where those terms are part of
	the lingo.

	2.0 refers to FreeBSD 2.0, part of the subject in the message
	I was replying to. -current refers to the current state of the
	FreeBSD development tree which will at some point become
	FreeBSD 2.1(RELEASE). There is no specific gcl discussion
	in any of  the FreeBSD mailing lists that I know of but there
	is a "port" of gcl-1.1 in the tree that will appear on the
	2.1 CDROM. A "port" in this context is a node in the distribution
	where one can simply say "make" and have all the right things
	happen to cause the underlying application to be fetched,
	patched, compiled and installed. The FreeBSD gcl port adds
	files FreeBSD.defs and FreeBSD.h that have been tuned to 
	the -current state of things and also arranges for the correct
	"unexec" variant of the system saver to be present.

	Having written all that I now notice that you asked "where",
	not "what".

	freebsd.cdrom.com:/pub/FreeBSD/FreeBSD-current	
	http://www.freebsd.org

-- 
(let ((forty++ "Sonetech Corporation")
      (product "Real-Time Multi-Media Recognition Systems")
      (IP-access :self)
      (OS-of-choice '|FreeBSD|)
  ...)



     

From jeff@aiai.ed.ac.uk  Sat Mar 25 11:00:01 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00662; Sat, 25 Mar 95 11:00:01 CST
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA21227; Sat, 25 Mar 95 09:58:43 CST
Received: from festival.ed.ac.uk (festival.ed.ac.uk [129.215.128.24]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id PAA08315; Sat, 25 Mar 1995 15:57:16 GMT
Received: from skye-alter.aiai.ed.ac.uk by festival.ed.ac.uk id aa07751;
          25 Mar 95 15:55 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Sat, 25 Mar 95 15:55:25 GMT
Date: Sat, 25 Mar 95 15:55:25 GMT
Message-Id: <4643.9503251555@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: possible bug w/ 0d0 
To: Brian_Leverich@rand.org, "Paul F. Werkowski" <pw@snoopy.mv.com>
Cc: gcl@cli.com

In-Reply-To: Brian Leverich's message of Fri, 24 Mar 95 16:44:49 PST

> -- Your message was:   (from ""Paul F. Werkowski"")
> 
>           This is a known problem with the 2.0 vfprintf.c function
>           in libc. It's been fixed in -current since mid January.
>
> Oops.  I've just had one of those self-revelatory experiences where
> I've become aware of my own extreme cluelessness.
> 
> Where are 2.0 and -current?  And is there another list where gcl is
> being discussed besides here?

Fear not!  2.0 and -current are versions of FreeBSD, and the "bug"
turns out to be in FreeBSD rather than GCL.  Indeed, I should have
remembered this problem, because I've had to deal with it before.

When GCL prints a floating-point number, it uses the C routine
sprintf to convert it to a string and then edits the string.
And this editing sassumes the string has a format that it turns
out not to have for numbers such as 1.0 and 100.0.  Other
numbers, e.g. PI, are fine.

Anyway, thanks to all who replied!

-- jeff

From lnm@stsn.dga.fr  Mon Mar 27 06:18:08 1995
Return-Path: <lnm@stsn.dga.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00931; Mon, 27 Mar 95 06:18:08 CST
Received: from asterix.stsn.dga.fr (mailhost.stsn.dga.fr) by cli.com (4.1/SMI-4.1)
	id AA24003; Mon, 27 Mar 95 04:57:00 CST
Received: (from lnm@localhost) by asterix.stsn.dga.fr (8.6.9/8.6.9) id LAA00383; Mon, 27 Mar 1995 11:40:56 +0100
Date: Mon, 27 Mar 1995 11:40:56 +0100
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199503271040.LAA00383@asterix.stsn.dga.fr>
To: gcl@cli.com
Subject: Pb with Xgcl on solaris


I want to use Xgcl-2 on both sun4 and solaris. I built it properly for
sun4 but I'm having some pbs with solaris:
(gcl already works OK on solaris) 

Building it straight ahead I get this:

Undefined			first referenced
 symbol  			    in file
authdes_create                      /usr/lib/libX11.a(XConnDis.o)
ld: fatal: Symbol referencing errors. No output written to raw_xgcl

The symbol "authdes_create" is defined at libnsl.a which is present in
one of the make variables "*LIBS*" of GCLDIR/unixport, and is present
on the gcc line to build "raw_xgcl". The pb is that it figures before
-lX11. If we put -lnsl after -lX11 the following appears:

ld: fatal: symbol `shifts' is multiply defined:
	(file ../mp/libmport.a(mp2.o) and file /usr/lib/libnsl.a(des_soft.o));
ld: fatal: File processing errors.  No output written to raw_xgcl

Does anybody already had this problem, and knows how to overpass ?

Thaks for your attention,
Best regards and

A bientot,

Marc LIGNON
________________________________________________________________________
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 45.79.20.40


From novak@cs.utexas.edu  Mon Mar 27 14:53:10 1995
Return-Path: <novak@cs.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01138; Mon, 27 Mar 95 14:53:10 CST
Received: from mail.cs.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA25450; Mon, 27 Mar 95 13:44:18 CST
Received: from ai.cs.utexas.edu (novak@ai.cs.utexas.edu [128.83.120.3]) by mail.cs.utexas.edu (8.6.10/8.6.9) with ESMTP id NAA09179; Mon, 27 Mar 1995 13:44:17 -0600
Received: by ai.cs.utexas.edu (8.6.10/Client-v1.4)
	id NAA11217; Mon, 27 Mar 1995 13:44:15 -0600
Message-Id: <199503271944.NAA11217@ai.cs.utexas.edu>
From: novak@cs.utexas.edu (Gordon Shaw Novak  Jr.)
Date: Mon, 27 Mar 1995 13:44:15 -0600
X-Mailer: Mail User's Shell (7.2.5 10/14/92)
To: gcl@cli.com
Subject: XGCL available
Cc: novak@cs.utexas.edu, boyer@cli.com

Xgcl software is now available; it provides an interface to
X  windows from GCL (Gnu Common Lisp, formerly Austin Kyoto
Common Lisp or AKCL).

There is a low-level interface to the Xlib routines, and there is
an easy-to-use interface that provides graphics, menus, and mouse
interaction via functions that are called from Lisp.

Xgcl is built on top of GCL, and it is somewhat larger
(e.g. 6.7 MB for Xgcl vs. 4.9 MB for GCL) because it incorporates
Xlib.  To make Xgcl, you must first obtain and make GCL.  The code
was written by Gordon Novak, Hiep Nguyen, and William Schelter.

The file is called xgcl-2.tgz .  Xgcl and GCL can be FTP'd from:
    math.utexas.edu    pub/gcl
    ftp.cli.com        pub/gcl
    ftp.cs.utexas.edu  pub/novak/xgcl       (Xgcl file only)

    http://www.cs.utexas.edu/users/novak    (Xgcl file only)

Put the xgcl-2.tgz file in the same directory as gcl-1.1.tgz .
Uncompress it with:      gzip -dc xgcl-2.tgz | tar xvf -
Then see the README in the directory xgcl-2.

Note: the date of the xgcl-2.tgz should be 3/15/95 or later.

From boyer@cli.com  Mon Mar 27 16:17:19 1995
Return-Path: <boyer@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01168; Mon, 27 Mar 95 16:17:19 CST
Received: from rita.cli.com by cli.com (4.1/SMI-4.1)
	id AA25658; Mon, 27 Mar 95 14:50:32 CST
From: boyer@cli.com (Robert S. Boyer)
Received: by rita.cli.com (4.1) id AA08369; Mon, 27 Mar 95 14:50:31 CST
Date: Mon, 27 Mar 95 14:50:31 CST
Message-Id: <9503272050.AA08369@rita.cli.com>
To: gcl@cli.com
Cc: novak@cs.utexas.edu
Subject: Re: XGCL available

I didn't have anything to do with Xgcl, but I have seen it operate and
I think I should mention that Xgcl is an extremely fast and efficient
way to communicate with X from GCL.  I believe some folks have found
GCL or (A)KCL, when used with other interfaces to Xlib, to be rather
sluggish.  I suspect this was due to the absence of sufficient
attention to the declaration of arithmetic and array operations and
function proclamations, something that can make a two orders of
magnitude difference in the execution of KCL/GCL programs.

For others who are as ignorant as me about X windows, let me make the
obvious remark that Xgcl is relatively "low level" because it connects
the programmer to the Xlib level of X, a level at which you can draw
your own lines and place your characters at absolute locations of your
choice, and so forth.  This is in marked contrast to the TK interface
that Bill Schelter is providing, where a plethora of higher level
graphical objects are supported.  The point is that both relatively
high and low level X graphics facilities are becoming available to the
GCL programmer.

Bob

From leverich@rand.org  Mon Mar 27 18:14:49 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01183; Mon, 27 Mar 95 18:14:49 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA26064; Mon, 27 Mar 95 16:57:20 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id OAA15969; Mon, 27 Mar 1995 14:57:18 -0800
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id OAA02633; Mon, 27 Mar 1995 14:57:17 -0800
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.9) with SMTP id OAA18554; Mon, 27 Mar 1995 14:57:16 -0800
Message-Id: <199503272257.OAA18554@atlantis.rand.org>
To: boyer@cli.com (Robert S. Boyer)
Cc: gcl@cli.com, novak@cs.utexas.edu, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: XGCL available 
In-Reply-To: Your message of Mon, 27 Mar 95 14:50:31 CST.
             <9503272050.AA08369@rita.cli.com> 
Date: Mon, 27 Mar 95 14:57:14 PST
From: Brian Leverich <leverich@rand.org>



Anyone know off the top of their head how much is XGCL like CLX at the
Lisp funtional interface level?  Cheers, B




From novak@cs.utexas.edu  Mon Mar 27 18:51:30 1995
Return-Path: <novak@cs.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01190; Mon, 27 Mar 95 18:51:30 CST
Received: from mail.cs.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA26100; Mon, 27 Mar 95 17:01:59 CST
Received: from ai.cs.utexas.edu (novak@ai.cs.utexas.edu [128.83.120.3]) by mail.cs.utexas.edu (8.6.10/8.6.9) with ESMTP id RAA23926; Mon, 27 Mar 1995 17:01:57 -0600
Received: by ai.cs.utexas.edu (8.6.10/Client-v1.4)
	id RAA11686; Mon, 27 Mar 1995 17:01:55 -0600
Message-Id: <199503272301.RAA11686@ai.cs.utexas.edu>
From: novak@cs.utexas.edu (Gordon Shaw Novak  Jr.)
Date: Mon, 27 Mar 1995 17:01:55 -0600
X-Mailer: Mail User's Shell (7.2.5 10/14/92)
To: Brian_Leverich@rand.org, boyer@cli.com (Robert S. Boyer)
Subject: Re: XGCL available
Cc: gcl@cli.com, novak@cs.utexas.edu

CLX and Xlib have very similar interfaces.  My guess is that CLX is a
"copy" of Xlib except that it is written in Lisp rather than C.
(This does not mean that the actual calling sequences are identical,
but conceptually they are the same.)  CLX is a lot bigger and a lot
slower than Xlib in my experience.  And XGCL provides a higher-level
interface than either CLX or Xlib.
Regards, Gordon

From leverich@rand.org  Mon Mar 27 19:15:25 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01195; Mon, 27 Mar 95 19:15:25 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA26201; Mon, 27 Mar 95 17:47:14 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id PAA18285; Mon, 27 Mar 1995 15:47:09 -0800
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id PAA07937; Mon, 27 Mar 1995 15:47:08 -0800
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.9) with SMTP id PAA18645; Mon, 27 Mar 1995 15:47:07 -0800
Message-Id: <199503272347.PAA18645@atlantis.rand.org>
To: novak@cs.utexas.edu (Gordon Shaw Novak Jr.)
Cc: boyer@cli.com (Robert S. Boyer), gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: XGCL available 
In-Reply-To: Your message of Mon, 27 Mar 95 17:01:55 CST.
             <199503272301.RAA11686@ai.cs.utexas.edu> 
Date: Mon, 27 Mar 95 15:47:05 PST
From: Brian Leverich <leverich@rand.org>



-- Your message was:   (from "novak@cs.utexas.edu")
  CLX and Xlib have very similar interfaces.  My guess is that CLX is a
  "copy" of Xlib except that it is written in Lisp rather than C.
  (This does not mean that the actual calling sequences are identical,
  but conceptually they are the same.)  CLX is a lot bigger and a lot
  slower than Xlib in my experience.  And XGCL provides a higher-level
  interface than either CLX or Xlib.
  Regards, Gordon
  ------------------


Bummer.  I was hoping you were going to say that you'd taken advantage
of GCL's C-friendliness to reimplement CLX as a set of direct calls to
Xlib rather than emulating Xlib's functionality in Lisp.  I could have
used that immediately, because I have a family of apps that are
CLX-dependent.

I'll look at XGCL the next time I start a project from scratch.

Cheers, B.


From lnm@stsn.dga.fr  Tue Mar 28 10:32:13 1995
Return-Path: <lnm@stsn.dga.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01332; Tue, 28 Mar 95 10:32:13 CST
Received: from asterix.stsn.dga.fr (mailhost.stsn.dga.fr) by cli.com (4.1/SMI-4.1)
	id AA27476; Tue, 28 Mar 95 09:11:03 CST
Received: (from lnm@localhost) by asterix.stsn.dga.fr (8.6.9/8.6.9) id RAA02287; Tue, 28 Mar 1995 17:10:31 +0100
Date: Tue, 28 Mar 1995 17:10:31 +0100
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199503281610.RAA02287@asterix.stsn.dga.fr>
To: gcl@cli.com
Subject: Re: Pb with Xgcl on solaris


> My guess is that you could remake putting in h/solaris.h
> #define shifts shifts_p
> to avoid the name conflict, with the definition in libnsl.a

Less elegant, but I tried renaming all "shifts" in GCL and it
overpassed THAT step all right... But trying it out I got:

client13:/commun/bdt/src/Trajecto 501 > Xgcl
GCL (GNU Common Lisp)  Version(1.1) Mon Mar 27 14:46:37 MET DST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter
Loading init.lsp
Finished loading init.lsp

>(in-package "XLIB")
#<"XLIB" package>

XLIB>(Xinit)
calling 'dl' function sun did not supply..exitting
client13:/commun/bdt/src/Trajecto 502 > 

In file run_process.c at line 300, we find :

#ifdef __svr4__
getpagesize()
{ return PAGESIZE;
}

dlclose()
{fprintf(stderr,"calling 'dl' function sun did not supply..exitting") ;exit(1);}
dgettext()
{dlclose();}
dlopen()
{dlclose();}
dlerror()
{dlclose();}

dlsym()
{dlclose();}

It concerns dynamic linking... but the image was compiled with "gcc -static" 
(=> static linking), so I don't understand what's happening...

Moreover, I found problems interfacing C and lisp at GCL level which
is the subject of a new mail : Pb interfacing C and Lisp on solaris

A bientot,

Marc LIGNON
________________________________________________________________________
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 45.79.20.40


From lnm@stsn.dga.fr  Tue Mar 28 10:36:42 1995
Return-Path: <lnm@stsn.dga.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01336; Tue, 28 Mar 95 10:36:42 CST
Received: from asterix.stsn.dga.fr (mailhost.stsn.dga.fr) by cli.com (4.1/SMI-4.1)
	id AA27497; Tue, 28 Mar 95 09:19:39 CST
Received: (from lnm@localhost) by asterix.stsn.dga.fr (8.6.9/8.6.9) id RAA02302; Tue, 28 Mar 1995 17:19:17 +0100
Date: Tue, 28 Mar 1995 17:19:17 +0100
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199503281619.RAA02302@asterix.stsn.dga.fr>
To: gcl@cli.com
In-Reply-To: <9503272209.AA11119@nicolas.ma.utexas.edu> (wfs@fireant.ma.utexas.edu)
Subject: Pb interfacing C and Lisp on solaris


Again solaris...
The basic "silly" exemple from the manual which works perfectly on a
sun4 (Sparc2) doesn't on a solaris (Sparc10):

$cat silly.lsp

(defCfun "silly(x) int x;" 0
%        int y;
         ((+ (int x) (int "100")) (int y))
%        printf("\n%d", y);
%        y = y+100;
	 (print (int y))
	 (print (int "x+100"))
%	 return(y);
	 )

(defentry foo (int) (int silly))

$gcl
GCL (GNU Common Lisp)  Version(1.1) Tue Mar 28 15:45:26 MET DST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter
Loading init.lsp
Finished loading init.lsp

>(compile-file "silly.lsp")
Compiling silly.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
Finished compiling silly.lsp.
#"silly.o"

>(load "silly.o")
Loading silly.o
[unknown global sym silly]start address -T 2a7c28 Finished loading silly.o
608

>(foo 3)
Segmentation Fault - core dumped


What we see when we load it is : [unknown global sym silly]
So it seams to be a linking problem on solaris. 
Does anyone (perhaps Bill is better placed) have an idea where to
surch to repair this pb?

Thanx and
A bientot,

Marc LIGNON
________________________________________________________________________
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 45.79.20.40


From wfs@math.utexas.edu  Tue Mar 28 11:00:27 1995
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01341; Tue, 28 Mar 95 11:00:27 CST
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA27606; Tue, 28 Mar 95 09:54:37 CST
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA25554; Tue, 28 Mar 95 09:53:47 -0600
Date: Tue, 28 Mar 95 09:53:38 -0600
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Tue, 28 Mar 95 09:53:38 -0600
Message-Id: <9503281553.AA11918@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA11918; Tue, 28 Mar 95 09:53:38 -0600
To: gcl@cli.com
Cc: lnm@stsn.dga.fr
In-Reply-To: LIGNON Marc's message of Tue, 28 Mar 1995 17:10:31 +0100 <199503281610.RAA02287@asterix.stsn.dga.fr>
Subject: Re: Pb with Xgcl on solaris
Reply-To: wfs@math.utexas.edu


    (defCfun "silly(x) int x;" 0
    %        int y;
	     ((+ (int x) (int "100")) (int y))
    %        printf("\n%d", y);
    %        y = y+100;
	     (print (int y))
	     (print (int "x+100"))

you might try

    (defCfun "static int silly(x) int x;" 0
    ...)

The loader is really designed for the output from the compiler.  That
has all functions being static (ie definitions not visible outside)
the file.  In fact you cant reference them outside the file, even if
you make them global, since they wont be in the main symbol table, and
I dont add them to my local entries.  On ordinary BSD .o files, the
load is ok whether they are static or not.

hmmm

    XLIB>(Xinit)
    calling 'dl' function sun did not supply..exitting
    client13:/commun/bdt/src/Trajecto 502 > 

this means you are somehow invoking something that is invoking something
that is trying to load a shared library.

This is not supported,
since then saving an image and knowing where they mapped the library etc
is too system specific.   Try to make sure you have -static on the link
line (in the make in the unixport directory).

I know for example that the yp stuff causes a problem, and in the new
release I will have to work around this on solaris.  For some reason
sun does not give non shared versions of some yp referenced stuff.   One
sees this in reference to "~joe/.." paths in solaris.   I dont know
how to make the password lookup stuff work:  it seems to invoke loading
of shared libraries when invoked.    It would seem you are hitting
against a similar thing [perhaps the SAME thing].

Bill







From lnm@stsn.dga.fr  Wed Mar 29 10:15:23 1995
Return-Path: <lnm@stsn.dga.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01625; Wed, 29 Mar 95 10:15:23 CST
Received: from asterix.stsn.dga.fr (mailhost.stsn.dga.fr) by cli.com (4.1/SMI-4.1)
	id AA01924; Wed, 29 Mar 95 08:51:18 CST
Received: (from lnm@localhost) by asterix.stsn.dga.fr (8.6.9/8.6.9) id QAA05780; Wed, 29 Mar 1995 16:50:53 +0100
Date: Wed, 29 Mar 1995 16:50:53 +0100
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199503291550.QAA05780@asterix.stsn.dga.fr>
To: gcl@cli.com
Subject: Re: Pb interfacing C and Lisp on solaris


>     (defCfun "silly(x) int x;" 0
>     %        int y;
> 	     ((+ (int x) (int "100")) (int y))
>     %        printf("\n%d", y);
>     %        y = y+100;
> 	     (print (int y))
> 	     (print (int "x+100"))

> you might try

>     (defCfun "static int silly(x) int x;" 0
>     ...)

> The loader is really designed for the output from the compiler.  That
> has all functions being static (ie definitions not visible outside)
> the file.  In fact you cant reference them outside the file, even if
> you make them global, since they wont be in the main symbol table, and
> I dont add them to my local entries.  On ordinary BSD .o files, the
> load is ok whether they are static or not.

It works fine with the "static" declaration.
Thank's a lot.

Marc LIGNON
________________________________________________________________________
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 45.79.20.40


From reading@io.litton.com  Wed Mar 29 18:33:02 1995
Return-Path: <reading@io.litton.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01671; Wed, 29 Mar 95 18:33:02 CST
Received: from lcsdns1.litton.com by cli.com (4.1/SMI-4.1)
	id AA04691; Wed, 29 Mar 95 17:01:50 CST
Received: from io.dsd.litton.com by lcsdns1.litton.com (4.1/SMI-4.1)
	id AA02943; Wed, 29 Mar 95 14:57:48 PST
Received: by io.dsd.litton.com (Concentrix-2800 3.0/SMI-4.1)
	id AA07304; Wed, 29 Mar 95 15:00:20 PST
Date: Wed, 29 Mar 95 15:00:20 PST
From: John D. Reading <reading@io.dsd.litton.com>
Message-Id: <9503292300.AA07304@io.dsd.litton.com>
To: gcl@cli.com
Subject: pcl and Solaris 2

A couple of months ago I was running into troubles trying to build PCL
on Solaris 2.3.  Since then I have had some questions about what
success I had, but no other particular progress.  I find we are
shortly upgrading to Solaris 2.4 (I guess within days).  Has anyone
had any success with PCL and Solaris 2.3?  Will Solaris 2.4 make a
difference (for the better, preferably)?

Appreciate any help,

John

--
John D. Reading           | Why be difficult when with just a little more
reading@io.dsd.litton.com | effort you could be impossible?
(818) 597-5152            | 

From toy@rtp.ericsson.se  Sat Apr  1 18:58:57 1995
Return-Path: <toy@rtp.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02996; Sat, 1 Apr 95 18:58:57 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA15100; Sat, 1 Apr 95 17:45:57 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.6.10/8.6.10) with ESMTP id RAA27261 for <gcl@cli.com>; Sat, 1 Apr 1995 17:45:56 -0600
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.6.8/NAHUB-MR1.1) with ESMTP id RAA08762 for <gcl@cli.com>; Sat, 1 Apr 1995 17:45:56 -0600
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id SAA21605 for <gcl@cli.com>; Sat, 1 Apr 1995 18:49:06 -0500
Message-Id: <199504012349.SAA21605@screamer.rtp.ericsson.se>
To: gcl@cli.com
Subject: Fix for reduce with :key
Date: Sat, 01 Apr 1995 18:45:48 -0500
From: Raymond Toy <toy@rtp.ericsson.se>

About a week ago, I posted a modified version of reduce that accepted
the keyword :key as specified in CLTL2.  Unfortunately, there is a bug
in that if no initial value (:initial-value) is given, the key is not
applied to the first element of the sequence.

The following is a fix for this so that the key function is applied.

Sorry if this caused problems.

Ray

(defun reduce (function sequence
			&key from-end
			start 
			end
			(initial-value nil ivsp)
			(key #'identity))
  (with-start-end  start end sequence
		   (cond ((not from-end)
			    (when (null ivsp)
			      (when (>= start end)
				(return-from reduce (funcall function)))
			      (setq initial-value (funcall key (elt sequence start)))
			      (setf start (f+ 1 start))
			      )
			    (do ((x initial-value
				    (funcall function x (funcall key (prog1 (elt sequence start)
							  (setf start (f+ 1 start))
							  )))))
				((>= start end) x)))
			 (t
			    (when (null ivsp)
			      (when (>= start end)
				(return-from reduce (funcall function)))
			      (setf end (f+ end -1))
			      (setq initial-value (funcall key (elt sequence end)))
			      )
			    (do ((x initial-value (funcall function
							   (funcall key (elt sequence end)) x)))
				((>= start end) x)
			      (setf end (f+ -1 end)))))))


From lien@tam.cs.monash.edu.au  Mon Apr 10 03:19:58 1995
Return-Path: <lien@tam.cs.monash.edu.au>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04947; Mon, 10 Apr 95 03:19:58 CDT
Received: from tam.cs.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA08750; Mon, 10 Apr 95 01:56:39 CDT
Received: by tam.cs.monash.edu.au (5.67/1.37)
	id AA04758; Mon, 10 Apr 95 16:56:03 +1000
From: lien@tam.cs.monash.edu.au (Tam T. Lien)
Message-Id: <9504100656.AA04758@tam.cs.monash.edu.au>
To: gcl@cli.com
Cc: lien@tam.cs.monash.edu.au
Subject: GCL-1.1 on DOS
X-Mailer: exmh version 1.4.1 7/21/94
Date: Mon, 10 Apr 95 16:56:03 EST


Hello,

Has anyone got GCL-1.1 to compile with DJGCC under DOS?

Thanks,

Tam.


From back0003@gold.tc.umn.edu  Mon Apr 10 20:01:49 1995
Return-Path: <back0003@gold.tc.umn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05343; Mon, 10 Apr 95 20:01:49 CDT
Received: from gold.tc.umn.edu by cli.com (4.1/SMI-4.1)
	id AA11570; Mon, 10 Apr 95 18:58:09 CDT
Received: by gold.tc.umn.edu; Mon, 10 Apr 95 15:34:46 -0500
Date: Mon, 10 Apr 1995 15:34:46 -0500 (CDT)
From: Jan E Backlund <back0003@gold.tc.umn.edu>
Subject: ngcl-2.0beta on Slackware Linux
To: gcl@cli.com
Message-Id: <Pine.3.89.9504101506.A9532-0100000@gold.tc.umn.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII


Has anyone built gcl-2.0 on Slackware Linux? I had one minor problem with 
u_int32_t not being defined in inet.h and then got as far as building the 
raw_gcl. Now I'm stuck with deciphering why saved_gcl is not executable 
(I've appended the tail end of the make log). Can anyone give me a clue?

Jan Erik
back0003@gold.tc.umn.edu


-------------      Tail end of "make &> error.log"       -----------------

make install-command "INSTALL_LIB_DIR=/usr/local/src/gcl-2.0" "PREFIX_DIR=/usr/local/src/gcl-2.0"
make[2]: Entering directory `/usr/local/src/gcl-2.0'
(echo "#!/bin/sh" ; \
echo exec /usr/local/src/gcl-2.0/unixport/saved_gcl \\ ; \
echo '   -dir' /usr/local/src/gcl-2.0/unixport/ \\ ; \
echo '   -libdir' /usr/local/src/gcl-2.0/ \\ ; \
echo '   -eval '\''(setq si::*allow-gzipped-file* t)'\' \\ ;\
echo '   -eval '\''(setq si::*tk-library* '\"unknown\"')'\' \\;\
echo '     '\"\$@\" ) > /usr/local/src/gcl-2.0/bin/gcl;
echo '#' other options: -load "/tmp/foo.o" -load "jo.lsp" -eval '"(joe 3)"' >> /usr/local/src/gcl-2.0/bin/gcl
chmod a+x /usr/local/src/gcl-2.0/bin/gcl
make[2]: Leaving directory `/usr/local/src/gcl-2.0'
(cd xbin ; ln -s ../bin/gcl .)
make[1]: Leaving directory `/usr/local/src/gcl-2.0'
(cd  cmpnew ; make collectfn.o)
make[1]: Entering directory `/usr/local/src/gcl-2.0/cmpnew'
../unixport/saved_gcl ../unixport/ -compile collectfn.lsp
../unixport/saved_gcl: ../unixport/saved_gcl: cannot execute binary file
make[1]: *** [collectfn.o] Error 126
make[1]: Leaving directory `/usr/local/src/gcl-2.0/cmpnew'
make: *** [all] Error 2


From wfs@math.utexas.edu  Mon Apr 10 22:52:47 1995
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05408; Mon, 10 Apr 95 22:52:47 CDT
Received: from fireant.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA11799; Mon, 10 Apr 95 21:32:30 CDT
Received: from nicolas.ma.utexas.edu by fireant.ma.utexas.edu (5.64/5.51)
	id AA09320; Mon, 10 Apr 95 21:32:14 -0500
Date: Mon, 10 Apr 95 21:32:06 -0500
From: wfs@math.utexas.edu (Bill Schelter)
Posted-Date: Mon, 10 Apr 95 21:32:06 -0500
Message-Id: <9504110232.AA07461@nicolas.ma.utexas.edu>
Received: by nicolas.ma.utexas.edu (5.61/5.51)
	id AA07461; Mon, 10 Apr 95 21:32:06 -0500
To: back0003@gold.tc.umn.edu
Cc: gcl@cli.com
In-Reply-To: Jan E Backlund's message of Mon, 10 Apr 1995 15:34:46 -0500 (CDT) <Pine.3.89.9504101506.A9532-0100000@gold.tc.umn.edu>
Subject: ngcl-2.0-beta.tgz vs gcl-2.0.tgz
Reply-To: wfs@math.utexas.edu


I certainly have been doing development of gcl-2.0 on slackware linux,
so it should work!

You probably need to take the latest released version which is
ftp.cli.com:pub/gcl/gcl-2.0.tgz or ftp.ma.utexas.edu:...

I am using linux 1.2.1 gcc 2.6.3, and it should work.

The ngcl-2.0-beta.tgz worked in an older version of linux, but the
executable format changed slightly.

In any event there are other benefits to gcl-2.0, over the beta
version.  Among other things the socket connection stuff for the
windowing has been substantially improved to avoid broken pipes.

Bill




From mjs@s4mjs.shannon.com  Tue Apr 11 03:50:39 1995
Return-Path: <mjs@s4mjs.shannon.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05490; Tue, 11 Apr 95 03:50:39 CDT
Received: from cnj.digex.net by cli.com (4.1/SMI-4.1)
	id AA12510; Tue, 11 Apr 95 02:36:37 CDT
Received: from s4mjs (shannon.com) by cnj.digex.net with SMTP id AA14474
  (5.67b8/IDA-1.5 for <gcl@cli.com>); Tue, 11 Apr 1995 03:36:32 -0400
Received: by s4mjs (5.x/SMI-SVR4-mjs-950410)
	id AA02325; Mon, 10 Apr 1995 23:25:07 -0400
Date: Mon, 10 Apr 1995 23:25:07 -0400
From: mjs@s4mjs.shannon.com (marty shannon)
Message-Id: <9504110325.AA02325@s4mjs>
To: gcl@cli.com
Subject: Solaris 2.4 X86 vs. gcl 1
Reply-To: mjs@s4mjs.shannon.com
X-Sun-Charset: US-ASCII

In a nutshell, it doesn't build.  I can't figure out the right things
to set in the defs and h file (and Solaris 2.4 does *not* want to
build anything static -- as far as I can tell; clues on that would be
appreciated, too).  Has anyone done this?  BTW, "Solaris" is an operating
system, not a "platform".  Solaris (currently) is available for both
Sparc and X86 processors....

	Marty Shannon

From leverich@rand.org  Tue Apr 11 17:28:51 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05726; Tue, 11 Apr 95 17:28:51 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA14652; Tue, 11 Apr 95 15:47:56 CDT
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id NAA22295 for <gcl@cli.com>; Tue, 11 Apr 1995 13:47:45 -0700
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id NAA17525 for <gcl@cli.com>; Tue, 11 Apr 1995 13:47:44 -0700
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.10) with SMTP id NAA11641 for <gcl@cli.com>; Tue, 11 Apr 1995 13:47:43 -0700
Message-Id: <199504112047.NAA11641@atlantis.rand.org>
To: gcl@cli.com
Reply-To: Brian_Leverich@rand.org
Subject: GCL-2.0 Breaks CLX
Date: Tue, 11 Apr 95 13:47:40 PDT
From: Brian Leverich <leverich@rand.org>


The new socket code (and the TK interface) is way cool, but it breaks
CLX in a couple of ways.  Also, it looks like the new socket code
might allow some improvements in CLX performance.

Any chance that one of the folks familiar with the socket code could
be persuaded to hack CLX to fix the breakage and best exploit the new
code?

It would improve compatibility with existing apps ...

Thanks, B.

---------
Dr. Brian Leverich
Informations Systems Scientist
The RAND Corporation

From jsc@esther.mit.edu  Wed Apr 12 23:21:48 1995
Return-Path: <jsc@esther.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06134; Wed, 12 Apr 95 23:21:48 CDT
Received: from esther.mit.edu by cli.com (4.1/SMI-4.1)
	id AA19409; Wed, 12 Apr 95 22:17:20 CDT
Received: by esther.mit.edu id AA06628
  (5.67b/IDA-1.5 for gcl@cli.com); Wed, 12 Apr 1995 23:17:50 -0400
Date: Wed, 12 Apr 1995 23:17:50 -0400
From: jsc@esther.mit.edu
Message-Id: <199504130317.AA06628@esther.mit.edu>
To: gcl@cli.com
Subject: bugs in gcl-1.1
Reply-To: jsc@mit.edu

I recently tried recompiling gcl 1.1 under Linux 1.2.3 using the latest
ELF gcc compiler for that platform. This uncovered a few bugs.

386-linux.h should define DONT_NEED_MALLOC.

Here is a backtrace from a segfault:
#0  0x800357c in alloc_object (t=t_string) at ../c/alloc.c:201
#1  0x80443fd in alloc_simple_string (l=0) at ../c/string.d:41
#2  0x801eb9a in init_symbol () at ../c/symbol.d:616
#3  0x8001c22 in initlisp () at ../c/main.c:409
#4  0x80019d9 in main (argc=1, argv=0xbffffbd0, envp=0xbffffbd8)
    at ../c/main.c:275

The problem is Vignore_maximum_pages gets referenced at this point, but
isn't ever set except in init_alloc_function(), which gets called in
initlisp() *after* init_symbol() gets called.

I tried to work around this, but it turns out that Vignore_maximum_pages
gets set using make_special(), which depends on string_register, which
gets set using alloc_simple_string(), which depends on
Vignore_maximum_pages. 

This compiled fine under gcc 2.6.3, so I can only assume that some
default initialization behavior or something changed. Anyways, at a
quick glance this looks wrong. Please let me know if it is indeed
incorrect, or if I've just overlooked something.


On an entirely different subject, does anyone know if CLX and garnet
work under gcl?

-Jin

PS Please Cc any replies to the mailing list directly to me as well, as
I've only recently joined.

From leverich@rand.org  Thu Apr 13 02:19:42 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06163; Thu, 13 Apr 95 02:19:42 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA19953; Thu, 13 Apr 95 01:01:34 CDT
Received: (from Uclarita@localhost) by rand.org (8.6.10/8.6.10) with UUCP id XAA08971; Wed, 12 Apr 1995 23:01:25 -0700
Received: (from leverich@localhost) by saugus.rand.org (8.6.9/8.6.9) id WAA02174; Wed, 12 Apr 1995 22:58:11 -0700
From: Brian Leverich <leverich@rand.org>
Message-Id: <199504130558.WAA02174@saugus.rand.org>
Subject: Re: bugs in gcl-1.1
To: jsc@mit.edu
Date: Wed, 12 Apr 1995 22:58:11 -0700 (PDT)
Cc: gcl@cli.com, leverich@rand.org
In-Reply-To: <199504130317.AA06628@esther.mit.edu> from "jsc@esther.mit.edu" at Apr 12, 95 11:17:50 pm
Organization: RAND, Santa Monica, CA
Reply-To: Brian_Leverich@rand.org
X-Mailer: ELM [version 2.4 PL23]
Content-Type: text
Content-Length: 1215      



> On an entirely different subject, does anyone know if CLX and garnet
> work under gcl?
> 
> -Jin

They did.  )-8

If you use GCL-1.0 or 1.1, anonymous ftp to 
	ftp://rand.org/pub/leverich
and check out the clx and garnet you'll find there.  Mike Harm
(USC/RAND) and my port of garnet is a little crufty, but it mostly
works.

Preallocate some extra memory, or you'll be living in GC hell.
General performance of GCL/CLX/garnet is satisfactory on a Linux
486DX2-66, satisfactory on a SPARC 2, and primo on a HP 735.

We've also integrated RAND's ROSS simulation language with garnet's
KR object system, and we're currently working on a GUI for general
use with ROSS.

Anyway, the new socket code in GCL-2.0 sort of gratuitously breaks
CLX.  I'm hoping somebody who knows what they're doing (this is a
thinly veiled canonical beg and grovel) will release a CLX that's
compatible with the new socket code.  If no kind soul will do that,
I'll eventually do it myself (but don't hold your breath waiting, and
it won't be as nicely done as it could have been by somebody who has
expertise in the area).  Cheers, B.


----------
Dr. Brian Leverich
Information Systems Scientist, The RAND Corporation
leverich@rand.org

From jsc@gwar.mit.edu  Thu Apr 13 21:47:25 1995
Return-Path: <jsc@gwar.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06528; Thu, 13 Apr 95 21:47:25 CDT
Received: from gwar.mit.edu by cli.com (4.1/SMI-4.1)
	id AA22740; Thu, 13 Apr 95 20:34:53 CDT
Received: by gwar.mit.edu id AA00555
  (5.67b/IDA-1.5 for gcl@cli.com); Thu, 13 Apr 1995 21:34:52 -0400
Date: Thu, 13 Apr 1995 21:34:52 -0400
From: "Jin S. Choi" <jsc@gwar.mit.edu>
Message-Id: <199504140134.AA00555@gwar.mit.edu>
To: gcl@cli.com
Subject: gcl 2.0 and Linux w/ ELF


I pulled over gcl 2.0 and tried to get it running under Linux w/ ELF.

1) Again, DONT_NEED_MALLOC has to be defined.
2) Compiling mpi-386d.o fails with undefined symbols, must use mpi.o.

3) raw_gcl dies on startup in alloc_object(), again because
   sSAignore_maximum_pagesA is referenced before being used in line
   223 of alloc.c. It's declared to be an object in a DEFVAR macro at
   the top of this file, but the macro that gets used is the one in
   notcomp.h, which just declares it as an `object' (a pointer).

Has anyone else run into this problem? It would appear to be a general
one...

From bslawson@phobos.astro.uwo.ca  Mon Apr 17 18:15:59 1995
Return-Path: <bslawson@phobos.astro.uwo.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00204; Mon, 17 Apr 95 18:15:59 CDT
Received: from phobos.astro.uwo.ca by cli.com (4.1/SMI-4.1)
	id AA01993; Mon, 17 Apr 95 16:52:10 CDT
Message-Id: <9504172149.AA03593@phobos.astro.uwo.ca>
Date: Mon, 17 Apr 1995 17:49:18 +0500
From: bslawson@phobos.astro.uwo.ca (Bob Slawson)
To: gcl@cli.com
Subject: bug in gcl-2.0 : aref
Reply-To: bslawson@phobos.astro.uwo.ca
Content-Length: 962


There is a bug in aref when accessing arrays with rank > 1.

Transcript:

GCL (GNU Common Lisp)  Version(2.0) Mon Apr 17 14:07:56 EDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>*features*
(:COMPILER :NUMLIB :SDEBUG TRUNCATE_USE_C BSD SPARC SUN SGC
    IEEE-FLOATING-POINT UNIX GCL AKCL COMMON KCL)

>(defvar test-array (make-array '(2 3) :initial-element 0))
TEST-ARRAY

>test-array
#2A((0 0 0) (0 0 0))

>(setf (aref test-array 1 1) 4)
4

>test-array
#2A((0 0 0) (0 4 0))

--- This looks OK

>(aref test-array 1 1)
0

--- Ooops!

>(setf (aref test-array 0 0) 9)
9

>test-array
#2A((9 0 0) (0 4 0))

--- This is OK too.

>(aref test-array 0 1)
9

--- Oops should be 0

>(aref test-array 2 0)
0

--- Should be an errror!

>(setf (aref test-array 2 0) 20)

Error: Index 0 to array is too large
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at SETF.  Type :H for Help.
>>

BobS

From wfs@math.utexas.edu  Tue Apr 18 01:45:24 1995
Return-Path: <wfs@math.utexas.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00480; Tue, 18 Apr 95 01:45:24 CDT
Received: from parthenon.ma.utexas.edu (parthenon.pi.ma.utexas.edu) by cli.com (4.1/SMI-4.1)
	id AA02784; Tue, 18 Apr 95 00:33:05 CDT
Received: (from wfs@localhost) by parthenon.ma.utexas.edu (8.6.10/8.6.10) id AAA10754; Tue, 18 Apr 1995 00:31:56 -0500
Date: Tue, 18 Apr 1995 00:31:56 -0500
From: Bill Schelter <wfs@math.utexas.edu>
Message-Id: <199504180531.AAA10754@parthenon.ma.utexas.edu>
To: gcl@cli.com
Subject: patch for 2.0
Reply-To: wfs@fireant.ma.utexas.edu


Here is a patch for the multidimensional array aref bug, for
./saved_gcl -compile, and for the gcl-2.0/makefile in case you do not
have tcl/tk or X.

There will be a new release shortly but in the meantime:

To apply the patch do
% cd gcl-2.0/..
% patch -p < patch-1
% (cd gcl-2.0 ; make)

==================begin patch-1===============================
*** /tmp/gcl-2.0/makefile	Sun Apr  9 22:14:48 1995
--- gcl-2.0/makefile	Thu Apr 13 12:42:22 1995
***************
*** 106,112 ****
  	then echo "Make of GCL `cat majvers`.`cat minvers` completed." ; \
  	xbin/notify "CC=${CC}" ; \
  	else echo "The new image failed to compile collectfn.lsp" ;fi
! 	if [ "${X11_LIBS}" != unknown ] ; then if [ "${TK_LIBS}" != unknown ]; \
  	then (cd gcl-tk ; make) ; fi ; fi
  	(cd info ; make)
  
--- 109,115 ----
  	then echo "Make of GCL `cat majvers`.`cat minvers` completed." ; \
  	xbin/notify "CC=${CC}" ; \
  	else echo "The new image failed to compile collectfn.lsp" ;fi
! 	if [ "${X11_LIBS}" != "-Lunknown -lX11" ] ; then if [ "${TK_LIBS}" != "-Lunknown -ltk" ]; \
  	then (cd gcl-tk ; make) ; fi ; fi
  	(cd info ; make)
  
*** /tmp/gcl-2.0/o/array.c	Sat Mar  4 07:50:37 1995
--- gcl-2.0/o/array.c	Tue Apr 18 00:13:12 1995
***************
*** 70,76 ****
         FEerror(" ~a has wrong rank",x);
       if (rank == 1) return fSaref1(x,i);
       va_start(ap);
!      m = 0;
       k = i;
       /* index into 1 dimensional array */
       i1 = 0;
--- 70,76 ----
         FEerror(" ~a has wrong rank",x);
       if (rank == 1) return fSaref1(x,i);
       va_start(ap);
!      m = 1;
       k = i;
       /* index into 1 dimensional array */
       i1 = 0;
***************
*** 80,86 ****
  	 if (k > x->a.a_dims[m])
  	   FEerror("Index ~a to array is too large",1,make_fixnum (m));
  	 i1 += k;
! 	 if (m < rank)
  	   { i1 = i1 * x->a.a_dims[m];
  	     if (m < N_FIXNUM_ARGS)
  	       { k = va_arg(ap,int);}
--- 80,86 ----
  	 if (k > x->a.a_dims[m])
  	   FEerror("Index ~a to array is too large",1,make_fixnum (m));
  	 i1 += k;
! 	 if (m <= rank)
  	   { i1 = i1 * x->a.a_dims[m];
  	     if (m < N_FIXNUM_ARGS)
  	       { k = va_arg(ap,int);}
***************
*** 87,96 ****
  	     else {object x = va_arg(ap,object);
  		   check_type(x,t_fixnum);
  		   k = Mfix(x);}
! 	     m++;}
  	 else break;}
       va_end(ap);
!      return fSaref1(x,i);
     }
    if (n > 2)
      { FEerror("Too many args (~a) to aref",1,make_fixnum(n));}
--- 87,97 ----
  	     else {object x = va_arg(ap,object);
  		   check_type(x,t_fixnum);
  		   k = Mfix(x);}
! 	     m++;
! 	   }
  	 else break;}
       va_end(ap);
!      return fSaref1(x,i1);
     }
    if (n > 2)
      { FEerror("Too many args (~a) to aref",1,make_fixnum(n));}
*** /tmp/gcl-2.0/unixport/init_gcl.lsp	Sat Apr  1 19:47:23 1995
--- gcl-2.0/unixport/init_gcl.lsp	Wed Apr 12 15:50:20 1995
***************
*** 54,66 ****
  			       :output-file 
  			       (or (si::get-command-arg "-o")
  				   (si::get-command-arg "-compile"))
! 			       :o-file (not
! 					(or (equalp
  					     (si::get-command-arg "-o-file")
! 					       "nil")
! 					    (not (si::get-command-arg "-no-o"
! 								      t)))
! 					)
  			       :c-file (si::get-command-arg "-c-file" t)
  			       :h-file (si::get-command-arg "-h-file" t)
  			       :data-file (si::get-command-arg "-data-file" t)
--- 54,65 ----
  			       :output-file 
  			       (or (si::get-command-arg "-o")
  				   (si::get-command-arg "-compile"))
! 			       :o-file
! 			       (cond ((equalp
  					     (si::get-command-arg "-o-file")
! 					       "nil") nil)
! 				     ((si::get-command-arg "-o-file" t))
! 				     (t t))
  			       :c-file (si::get-command-arg "-c-file" t)
  			       :h-file (si::get-command-arg "-h-file" t)
  			       :data-file (si::get-command-arg "-data-file" t)

------------------------------end patch-1 ----------------

From gene@ccs.neu.edu  Tue Apr 18 14:38:34 1995
Return-Path: <gene@ccs.neu.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00627; Tue, 18 Apr 95 14:38:34 CDT
Received: from amber.ccs.neu.edu by cli.com (4.1/SMI-4.1)
	id AA04006; Tue, 18 Apr 95 13:00:33 CDT
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.80])
	by amber.ccs.neu.edu (8.6.10/8.6.4) with ESMTP id OAA15258; Tue, 18 Apr 1995 14:00:28 -0400
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.10/8.6.4) id OAA16854; Tue, 18 Apr 1995 14:00:27 -0400
Date: Tue, 18 Apr 1995 14:00:27 -0400
Message-Id: <199504181800.OAA16854@highpoint.ccs.neu.edu>
To: gcl@cli.com, wfs@fireant.ma.utexas.edu
Subject: Re:  another make-array bug ?

I encountered another make-array bug for arrays of rank 1.  I don't know
if this is covered by the previous patch, but I would guess it's different.
When I type:

(make-array 256 :element-type 'fixnum ":fill-pointer t)

I get an error:

Correctable error: Expected a FIXNUM 
Signalled by EVAL.
If continued: Supply right type
Broken at MAKE-ARRAY.  Type :H for Help.


When I type:

(make-array 256 :element-type 'fixnum ":fill-pointer 5)

it results in an infinite loop.
						- Gene Cooperman

From bslawson@phobos.astro.uwo.ca  Tue Apr 18 23:09:47 1995
Return-Path: <bslawson@phobos.astro.uwo.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00724; Tue, 18 Apr 95 23:09:47 CDT
Received: from phobos.astro.uwo.ca by cli.com (4.1/SMI-4.1)
	id AA05291; Tue, 18 Apr 95 22:01:42 CDT
Message-Id: <9504190258.AA25164@phobos.astro.uwo.ca>
Date: Tue, 18 Apr 1995 22:58:37 +0500
From: bslawson@phobos.astro.uwo.ca (Bob Slawson)
To: wfs@fireant.ma.utexas.edu
Cc: gcl@cli.com
In-Reply-To: <199504180531.AAA10754@parthenon.ma.utexas.edu> (message from Bill Schelter on Tue, 18 Apr 1995 00:31:56 -0500)
Subject: Re: patch for 2.0
Reply-To: bslawson@phobos.astro.uwo.ca
Content-Length: 2603

Patch-1 didn't seem to fix the aref problem so I worked on it myself.
It's been tested with interpreted forms and compiled code at all
possible safety levels.

A context diff follows (it applies on top of patch-1).

I don't understand the necessity of changing the flag in the DEFUN
("AREF1" ... from ONE_VAL to NONE, but this is what was necessary for
aref to work in compiled code.  I merely paralleled the DEFUN with
DEFUN ("ASET1".  (All compiled code I tried calls `fSaref1'
irrespective of safety level because of a macro in `cmpinclude.h').

BobS
-------------------------------------------------
*** o/array.c-patchd-1	Tue Apr 18 21:49:05 1995
--- o/array.c	Tue Apr 18 22:08:38 1995
***************
*** 59,65 ****
  (x, i, va_alist)
    object x;
    int i;
! 
  { int n = VFUN_NARGS;
    int i1;
    va_list ap;
--- 59,65 ----
  (x, i, va_alist)
    object x;
    int i;
!   va_dcl
  { int n = VFUN_NARGS;
    int i1;
    va_list ap;
***************
*** 70,76 ****
         FEerror(" ~a has wrong rank",x);
       if (rank == 1) return fSaref1(x,i);
       va_start(ap);
!      m = 1;
       k = i;
       /* index into 1 dimensional array */
       i1 = 0;
--- 70,76 ----
         FEerror(" ~a has wrong rank",x);
       if (rank == 1) return fSaref1(x,i);
       va_start(ap);
!      m = 0;
       k = i;
       /* index into 1 dimensional array */
       i1 = 0;
***************
*** 77,85 ****
       rank-- ;
       while(1) 
         {
! 	 if (k > x->a.a_dims[m])
  	   FEerror("Index ~a to array is too large",1,make_fixnum (m));
  	 i1 += k;
  	 if (m <= rank)
  	   { i1 = i1 * x->a.a_dims[m];
  	     if (m < N_FIXNUM_ARGS)
--- 77,86 ----
       rank-- ;
       while(1) 
         {
! 	 if (k >= x->a.a_dims[m])
  	   FEerror("Index ~a to array is too large",1,make_fixnum (m));
  	 i1 += k;
+ 	 m++;
  	 if (m <= rank)
  	   { i1 = i1 * x->a.a_dims[m];
  	     if (m < N_FIXNUM_ARGS)
***************
*** 87,93 ****
  	     else {object x = va_arg(ap,object);
  		   check_type(x,t_fixnum);
  		   k = Mfix(x);}
- 	     m++;
  	   }
  	 else break;}
       va_end(ap);
--- 88,93 ----
***************
*** 131,137 ****
  }
      
  DEFUN("AREF1", object, fSaref1, SI, 2, 2,
!       ONE_VAL, OO, IO, OO,OO,
        "For array X and index I it returns (aref x i) as if x were \
  1 dimensional, even though its rank may be bigger than 1")
  (x, i)
--- 131,137 ----
  }
      
  DEFUN("AREF1", object, fSaref1, SI, 2, 2,
!       NONE, OO, IO, OO,OO,
        "For array X and index I it returns (aref x i) as if x were \
  1 dimensional, even though its rank may be bigger than 1")
  (x, i)

From bf@next.ipl.fr  Wed Apr 19 04:44:42 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00962; Wed, 19 Apr 95 04:44:42 CDT
Received: from cpe.ipl.fr by cli.com (4.1/SMI-4.1)
	id AA05979; Wed, 19 Apr 95 03:26:20 CDT
Return-Path: bf@next.ipl.fr
Received: from next.ipl.fr (next.ipl.fr [193.48.221.6]) by cpe.ipl.fr (8.6.5/8.6.5) with SMTP id KAA03268 for <gcl@cli.com>; Wed, 19 Apr 1995 10:25:40 +0100
Received-Date: Wed, 19 Apr 1995 10:25:40 +0100
Received: by next.ipl.fr (NX5.67e/NX3.0S)
	id AA00428; Wed, 19 Apr 95 09:22:23 +0100
Date: Wed, 19 Apr 95 09:22:23 +0100
From: Beatrice Fuchs <bf@next.ipl.fr>
Message-Id: <9504190822.AA00428@next.ipl.fr>
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: unsubscribe


Please, remove my address from the mailing list.


Bests regards

Beatrice Fuchs--
Beatrice  Fuchs,          CPE LYON,  Laboratoire LISA,|
31, Place Bellecour,      F-69288 Lyon Cedex 02       |
bf@cpe.ipl.fr             Tel : (33) 72 32 50 63      |
--------------------------------------------------------------------------------

From pw@snoopy.mv.com  Sat Apr 22 20:28:37 1995
Return-Path: <pw@snoopy.mv.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02363; Sat, 22 Apr 95 20:28:37 CDT
Received: from snoopy.mv.com by cli.com (4.1/SMI-4.1)
	id AA16054; Sat, 22 Apr 95 19:23:39 CDT
Received: (from pw@localhost) by snoopy.mv.com (8.6.9/8.6.6) id TAA27534; Sat, 22 Apr 1995 19:54:14 -0400
Date: Sat, 22 Apr 1995 19:54:14 -0400
From: "Paul F. Werkowski" <pw@snoopy.mv.com>
Message-Id: <199504222354.TAA27534@snoopy.mv.com>
To: gcl@cli.com
In-Reply-To: <9504190258.AA25164@phobos.astro.uwo.ca> (bslawson@phobos.astro.uwo.ca)
Subject: Re: patch for 2.0

>>>>> "Bob" == Bob Slawson <bslawson@phobos.astro.uwo.ca> writes:

    Bob> Patch-1 didn't seem to fix the aref problem so I worked on it
    Bob> myself.  It's been tested with interpreted forms and compiled
    Bob> code at all possible safety levels.

	Not wanting to confuse this issue more, but, having just
	grabbed the gcl-2.0 kit from its home along with patch
	and attempted to build it on FreeBSD 2.0. I found that
	while the unpatched installation built and ran OK  (except
	for possibly the array bug) but ANY patch to array.c resulted
	in
>Loading ../gcl-tk/tk-package.lsp
Finished loading ../gcl-tk/tk-package.lsp
T

>Initializing ../lsp/predlib.o
Initializing ../lsp/setf.o
Initializing ../lsp/arraylib.o
Initializing ../lsp/assert.o
Initializing ../lsp/defstruct.o

Error: ARRAY-HAS-FILL-POINTER-P is invalid as a function.
Error signalled by ADJUST-ARRAY.
Broken at BREAK-LEVEL.  Type :H for Help.
.
	To repeat:
	.  I can build a vanilla system no problem.
	.  Patch for no tcl/tk (part of patch-1) works  ok.
	.  Any of the changes to array.c produces the above abort.

	I don't have the time to persue this more right now.
	Please consider it a heads-up.

	Paul

From etokna@etn.ericsson.se  Mon Apr 24 04:10:35 1995
Return-Path: <etokna@etn.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02845; Mon, 24 Apr 95 04:10:35 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA17821; Mon, 24 Apr 95 02:36:43 CDT
Received: from hisoy0 (hisoy0.etn.ericsson.se [193.161.188.2]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id JAA17681 for <gcl@cli.com>; Mon, 24 Apr 1995 09:36:28 +0200
Received: from hisoy1.etn.ericsson.se by hisoy0 (5.0/LME-DOM-2.2.3)
	id AA16226; Mon, 24 Apr 1995 09:36:46 +0200
From: etokna@etn.ericsson.se (Knut-Haavard Aksnes)
Received: by hisoy1.etn.ericsson.se (4.1/client-1.5)
	id AA12903; Mon, 24 Apr 95 09:34:01 +0200
Date: Mon, 24 Apr 95 09:34:01 +0200
Message-Id: <9504240734.AA12903@hisoy1.etn.ericsson.se>
To: gcl@cli.com
Subject: PCL for gcl-2.0
Comments: Hyperbole mail buttons accepted, v3.18.3.
Content-Length: 336

Has anybody had any success in building PCL for GCL-2.0?

-- 

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETO/X/I KNA		Phone: +47 37 05 14 81
Email: etokna@hisoy.etn.ericsson.se (internet)  ETO.ETOKNA (memo)


From thorsten@arch.su.EDU.AU  Fri Apr 28 03:06:07 1995
Return-Path: <thorsten@arch.su.EDU.AU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04515; Fri, 28 Apr 95 03:06:07 CDT
Received: from arch.su.EDU.AU (archsci.arch.su.EDU.AU) by cli.com (4.1/SMI-4.1)
	id AA01283; Fri, 28 Apr 95 01:42:59 CDT
Received: from glass (glass.arch.su.EDU.AU) by arch.su.EDU.AU (4.1/SMI-4.1)
	id AA00544; Fri, 28 Apr 95 16:34:48 EST
From: thorsten@arch.su.EDU.AU (Thorsten Schnier)
Received: by glass (5.x) id AA05146; Fri, 28 Apr 1995 16:39:55 +1000
Date: Fri, 28 Apr 1995 16:39:55 +1000
Message-Id: <9504280639.AA05146@glass>
To: gcl@cli.com
Subject: Problems with defCfun in gcl-2.0 
X-Sun-Charset: US-ASCII


After installing gcl 2.0 (on solaris and linux w/o ELF),
some inline c-functions didn't work anymore. While loading
a file containing a defCfun, the loader complained about
not knowing the symbols Creturn and CMPfuncall.

The new documentation doesn't mention creturn anymore, and
I was able to rewrite the code without it. When comparing
the intermediate C-Code with the output from gcl-1.1, I 
noticed a macro for CMPfuncall: 

#define CMPfuncall funcall

with this line added in the function code, loading works again.

Is this a bug ? And is Creturn obsolete ?
Or do I have to add the macro for creturn from gcl-1.1 code ?

BTW. Someone had problems with linux with ELF. Is this solved ?

thorsten
 

From anders.vinjar@notam.uio.no  Sat Apr 29 15:31:29 1995
Return-Path: <anders.vinjar@notam.uio.no>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05081; Sat, 29 Apr 95 15:31:29 CDT
Received: from mons.uio.no by cli.com (4.1/SMI-4.1)
	id AA05759; Sat, 29 Apr 95 14:17:34 CDT
Received: from ulrik.uio.no by mons.uio.no with local-SMTP (PP) 
          id <13480-0@mons.uio.no>; Sat, 29 Apr 1995 21:17:25 +0200
Received: by alban.notam.uio.no ; Sat, 29 Apr 1995 19:14:52 GMT
Date: Sat, 29 Apr 1995 19:14:52 GMT
From: anders.vinjar@notam.uio.no
Message-Id: <199504291914.TAA15011@alban.notam.uio.no>
To: gcl@cli.com
Subject: gcl-2.0 on irix5 (patch-level 2). PCL stops it!

I've successfully built and saved an executing version of gcl-2.0 on the
SGI (irix-5.2).  The gcl-tcl interface works seemingly allright.

When trying to build pcl-gcl-2.1 (from ftp.ma.utexas.edu) it goes all the
way through the compilation and loading without warnings, but
si::save-system fails to save the image.  The error message is like this:

  Error: Sorry, Cant save an image with dynamically loaded .o files
  Fast links are on: do (use-fast-links nil) for debugging
  Error signalled by EVAL.
  Broken at SYSTEM:SAVE-SYSTEM.  Type :H for Help.
  >>

What can i do to avoid the problem, or to find some bugs to fix?

-- 

   Anders Vinjar                       |        NoTAM -
                                       |
   Addr: Ole Jacob Brochs gt. 1        |        http://www.notam.uio.no
         0454 Oslo, Norway             |        Vox: +47 22857970
   Vox:  + 47 22607968                 |        Fax: +47 22857974


From ahe@cs.unh.edu  Mon May  1 11:28:54 1995
Return-Path: <ahe@cs.unh.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06725; Mon, 1 May 95 11:28:54 CDT
Received: from cs.unh.edu by cli.com (4.1/SMI-4.1)
	id AA10514; Mon, 1 May 95 10:11:46 CDT
Received: from mica.cs.unh.edu by cs.unh.edu (5.x/SMI-SVR4)
	id AA27480; Mon, 1 May 1995 11:11:45 -0400
Received: by mica.cs.unh.edu (5.x/SMI-SVR4)
	id AA02994; Mon, 1 May 1995 11:11:44 -0400
Date: Mon, 1 May 1995 11:11:44 -0400
From: ahe@cs.unh.edu (Andy Evans)
Message-Id: <9505011511.AA02994@mica.cs.unh.edu>
To: gcl@cli.com
Subject: Ultrix 4.4 on a 5000 - any success?


Hello folks -

I've been trying to build gcl-2.0 and gcl-1.1 on a
DECstation 5000 with Ultrix 4.4 - without success.
I'm using either DEC's cc or gcc 2.6.3.  The
process has gotten as far as "loading auto.lsp"
but it has never finished making saved_gcl.  The
raw_gcl has core-dumped or complained of illegal
instruction (last one was "GBC not enabled" on 1.1).

Does anyone have any tips or reccomendations?  I'd
be grateful!  Thanks -

- Andy

====================================================
    Andrew Evans        Computer Science Department
 Computer Specialist    University of New Hampshire
   ahe@cs.unh.edu             Durham, NH 03824
====================================================

From haleysj@HIRAMF.hiram.edu  Mon May  1 17:02:45 1995
Return-Path: <haleysj@HIRAMF.hiram.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00222; Mon, 1 May 95 17:02:45 CDT
Received: from HIRAMF.hiram.edu by cli.com (4.1/SMI-4.1)
	id AA11894; Mon, 1 May 95 15:47:15 CDT
Received: by HIRAMF.hiram.edu (5.65/DEC-Ultrix/4.3)
	id AA15562; Mon, 1 May 1995 16:53:14 -0400
Date: Mon, 1 May 1995 16:53:13 -0400 (EDT)
From: Steve <haleysj@HIRAMF.hiram.edu>
To: gcl@cli.com
Subject: GCL on DecStation 3100 / VAXstation 3100
Message-Id: <Pine.ULT.3.91.950501164737.15505A-100000@hiramf.hiram.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hello!
   I am having a lot of trouble compiling GCL-2.0 on both a DECstation 
3100 and a VAXstation 3100.
   When compiling with the stock cc, I get many compiler warnings and it 
eventually stops.  
   Changing references in the dec3100.defs from cc to gcc (version 2.6.3) 
makes compiling go well until raw_gcl.  When running raw_gcl, it reports 
an illegal instruction and core dumps.
   This happens both on the vaxstation using vax.defs and the decstation 
using dec3100.defs. They are running Ultrix 4.4 and 4.3 respectively.
   Any ideas?  Thanks in advance.  I hope I can get it to work, for gcl 
looks like a nice package.
	
					-- Steve Haley


...................*****************************************....................
haleysj@hiramf.hiram.edu       haleysj@hiram.edu     bm711@cleveland.freenet.edu
                                =) :) 8-) :> =D		

--------------------------------------------------------------------------------


From tkunze@ccrma.Stanford.EDU  Mon May  1 18:22:02 1995
Return-Path: <tkunze@ccrma.Stanford.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00239; Mon, 1 May 95 18:22:02 CDT
Received: from  ccrma.Stanford.EDU  (ccrma.Stanford.EDU) by cli.com (4.1/SMI-4.1)
	id AA12120; Mon, 1 May 95 17:04:46 CDT
Received: from cmn10 by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA06121; Mon, 1 May 95 15:04:44 -0700
From: tkunze@ccrma.Stanford.EDU (Tobias Kunze)
Message-Id: <9505012204.AA06121@ ccrma.Stanford.EDU >
Received: by cmn10.Stanford.EDU (NX5.67e/NX3.0X)
	id AA21169; Mon, 1 May 95 15:04:43 -0700
Date: Mon, 1 May 95 15:04:43 -0700
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: gcl2.0 on irix5


Hi-

has anyone been able to successfully build gcl2 with pcl 2.1?

Also: does anyone happen to know why it is that the irix5 port
can't save an image with dynamically loaded code?

TIA, 


-Tobias

From erik@naggum.no  Tue May  2 18:47:28 1995
Return-Path: <erik@naggum.no>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00836; Tue, 2 May 95 18:47:28 CDT
Received: from naggum.no by cli.com (4.1/SMI-4.1)
	id AA16658; Tue, 2 May 95 17:22:26 CDT
Received: by naggum.no id <AA18953> for gcl@cli.com; Tue, 2 May 1995 22:22:23 UT
Date: 02 May 1995 21:48:49 UT
From: Erik Naggum <erik@naggum.no>
Organization: Naggum Software; +47 2295 0313
Message-Id: <19950502.12274@naggum.no>
To: gcl@cli.com
Subject: compile problems

I retrieved GCL-2.1, and appreciate the developments, but I'm a little
surprised by the difficulties I'm having in changing the prompting and
exiting behavior of top-level and break-level.  I also don't want tcl/tk
and find it hard to build without them.

here's the desired diff to top-level (I redefine it in init_gcl.lsp):

--- top.lsp     Sun Apr  2 01:40:14 1995
+++ ../unixport/init_gcl.lsp    Tue May  2 17:14:47 1995
@@ -100,7 +20,7 @@
     (loop
       (setq +++ ++ ++ + + -)
       (if *no-prompt* (setq *no-prompt* nil)
-       (format t "~%~a>"
+       (format t "~&~a> "
                (if (eq *package* (find-package 'user)) ""
                   (package-name *package*))))
       (reset-stack-limits)
@@ -109,55 +29,19 @@
       (when (catch *quit-tag*
               (setq - (locally (declare (notinline read))
                                (read *standard-input* nil *top-eof*)))
-              (when (eq - *top-eof*) (bye))
+              (when (eq - *top-eof*) (terpri) (bye))
               (let ((values (multiple-value-list
                              (locally (declare (notinline eval)) (eval -)))))
                 (setq /// // // / / values *** ** ** * * (car /))
                 (fresh-line)
                 (dolist (val /)
                   (locally (declare (notinline prin1)) (prin1 val))
-                  (terpri))
+                  (princ " "))
                 nil))
         (setq *evalhook* nil *applyhook* nil)
         (terpri *error-output*)
         (break-current)))))
 
however, when I made these trivial changes, I got a barrage of errors, and
gcl failed to build.  the amazing part is that compiling an _unmodified_
lsp/top.lsp crashes equally spectacularly.  (the copy to top1.lsp is only
to prevent destruction of top.*.)  I also note that there's a stray ) in
this file, but removing it had no effect whatsoever.  I'm not sure that's a
good sign, either.

$ cp top.lsp top1.lsp
$ make top1.o
Compiling top1.lsp.
Loading ./cmpinit.lsp
Finished loading ./cmpinit.lsp
Warning: WARN is being redefined.
Warning: BREAK is being redefined.
End of Pass 1.  
Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by CATCH.
Backtrace: gcl-top-level > if > let > error-set > error-set > progn > compile-file > loop > setq > apply > apply > compiler::compile-file1 > let > unwind-protect > progn > let* > let > unwind-protect > progn > when > compiler::compiler-pass2 > let > unwind-protect > progn > let > let > unwind-protect > progn > catch > compiler::ctop-write > universal-error-handler > break-level > let* > UNLESS
top1.c: In function `init_top1':
top1.c:4: `VV' undeclared (first use this function)
top1.c:4: (Each undeclared identifier is reported only once
top1.c:4: for each function it appears in.)
top1.c: In function `LI1':
top1.c:12: `VV' undeclared (first use this function)
top1.c:38: `Lnk140' undeclared (first use this function)
top1.c:44: `Lnk141' undeclared (first use this function)
top1.c:167: `Lnk145' undeclared (first use this function)
top1.c: In function `L2':
top1.c:176: `VM2' undeclared (first use this function)
top1.c:187: `VV' undeclared (first use this function)
top1.c:191: `Lnk140' undeclared (first use this function)
top1.c:199: `Lnk146' undeclared (first use this function)
top1.c: In function `L3':
top1.c:227: `VM3' undeclared (first use this function)
top1.c:243: `VV' undeclared (first use this function)
top1.c:290: `Lnk147' undeclared (first use this function)
top1.c:295: `Lnk148' undeclared (first use this function)
top1.c: In function `L4':
top1.c:316: `VM4' undeclared (first use this function)
top1.c:333: `VV' undeclared (first use this function)
top1.c:350: `Lnk149' undeclared (first use this function)
top1.c:358: `Lnk150' undeclared (first use this function)
top1.c:366: `Lnk151' undeclared (first use this function)
top1.c:405: `Lnk152' undeclared (first use this function)
top1.c:409: `Lnk153' undeclared (first use this function)
top1.c:414: `Lnk154' undeclared (first use this function)
top1.c:419: `LnkLI155' undeclared (first use this function)
top1.c:427: `Lnk156' undeclared (first use this function)
top1.c:492: `Lnk157' undeclared (first use this function)
top1.c:596: `Lnk145' undeclared (first use this function)
top1.c: At top level:
top1.c:605: parse error at end of input
$ tail top1.c
        vs_base=vs_top;
        (void) (*Lnk145)();
        vs_top=sup;
T210:;
        goto T209;}
        }
}
/*      local entry for function WARN   */

static object LI5(V30

compiling top1.lsp anywhere but in the distribution lsp directory succeeds.

I have made the changes in unixport/init_gcl.lsp and can live with that,
but I find this more than disturbing, so I thought you might be interested
in a report on the behavior.

#<Erik 3008442142>

From johng@jolt.mpx.com.au  Wed May  3 01:36:59 1995
Return-Path: <johng@jolt.mpx.com.au>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01027; Wed, 3 May 95 01:36:59 CDT
Received: from kyoko.mpx.com.au by cli.com (4.1/SMI-4.1)
	id AA17798; Wed, 3 May 95 00:30:57 CDT
Received: from jolt.mpx.com.au by kyoko.mpx.com.au with smtp
	(Smail3.1.29.1 #6) id m0s6X1s-0006NXC; Wed, 3 May 95 15:31 EST
Received: by jolt.mpx.com.au (Smail3.1.28.1 #2)
	id m0s6Wzq-0005tZC; Wed, 3 May 95 15:29 EST
Message-Id: <m0s6Wzq-0005tZC@jolt.mpx.com.au>
From: johng@jolt.mpx.com.au (John Gibbons)
Subject: GCL 2.x and Solaris 2.3/4
To: gcl@cli.com
Date: Wed, 3 May 1995 15:29:14 +1000 (EST)
X-Mailer: ELM [version 2.4 PL21]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 187       

Has anoyone succeeded in building PCL-GCL under Solaris 2.3 or 2.4 with
gcl2.0.

I have built gcl itself but pcl always fails to build in a dramatic way.

Any help would be appreciated.


From anders.vinjar@notam.uio.no  Wed May  3 04:30:24 1995
Return-Path: <anders.vinjar@notam.uio.no>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01068; Wed, 3 May 95 04:30:24 CDT
Received: from mons.uio.no by cli.com (4.1/SMI-4.1)
	id AA18213; Wed, 3 May 95 03:20:36 CDT
Received: from ulrik.uio.no by mons.uio.no with local-SMTP (PP) 
          id <28573-0@mons.uio.no>; Wed, 3 May 1995 10:20:11 +0200
Received: by alban.notam.uio.no ; Wed, 3 May 1995 08:17:34 GMT
Date: Wed, 3 May 1995 08:17:34 GMT
From: anders.vinjar@notam.uio.no
Message-Id: <199505030817.IAA06857@alban.notam.uio.no>
To: johng@jolt.mpx.com.au
Cc: gcl@cli.com
In-Reply-To: <m0s6Wzq-0005tZC@jolt.mpx.com.au> (johng@jolt.mpx.com.au)
Subject: Re: GCL 2.x and Solaris 2.3/4

>>>>> johng@jolt.mpx.com.au (John Gibbons) writes:

    John> Has anoyone succeeded in building PCL-GCL under Solaris 2.3 or
    John> 2.4 with gcl2.0.

    John> I have built gcl itself but pcl always fails to build in a
    John> dramatic way.

    John> Any help would be appreciated.

Could you please describe the situation a bit closer?

From saruman.lb.bawue.de!shendi@delos.s.bawue.de  Sat May  6 11:11:00 1995
Return-Path: <saruman.lb.bawue.de!shendi@delos.s.bawue.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02740; Sat, 6 May 95 11:11:00 CDT
Received: from delos.s.bawue.de by cli.com (4.1/SMI-4.1)
	id AA29016; Sat, 6 May 95 10:01:08 CDT
Received: from saruman.lb.bawue.de by delos.s.bawue.de with uucp
	(Smail3.1.28.1 #3) id m0s7hUW-000BHmC; Sat, 6 May 95 12:53 MET DST
Received: by saruman.lb.bawue.de (Smail3.1.28.1 #1)
	id m0s7gci-0001b9C; Sat, 6 May 95 11:58 MET DST
Message-Id: <m0s7gci-0001b9C@saruman.lb.bawue.de>
From: shendi@saruman.lb.bawue.de (Alexander Shendi)
Subject: Prevent Loading of init.lsp in GCL 1.1
To: gcl@cli.com
Date: Sat, 6 May 1995 11:58:07 +0200 (MET DST)
In-Reply-To: <m0s6Wzq-0005tZC@jolt.mpx.com.au> from "John Gibbons" at May 3, 95 03:29:14 pm
X-Mailer: ELM [version 2.4 PL23]
Content-Type: text
Content-Length: 80        

Is there a way to prevent loading init.lsp in GCl 1.1.

Thanx in advance 

Alex

From kr@shell.portal.com  Sat May  6 17:55:56 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02826; Sat, 6 May 95 17:55:56 CDT
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA29558; Sat, 6 May 95 16:52:26 CDT
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.11/8.6.5) with ESMTP id OAA14876; Sat, 6 May 1995 14:51:43 -0700
Received: from DialupEudora (jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.11/8.6.5) with SMTP id OAA05899; Sat, 6 May 1995 14:51:40 -0700
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110100abd1abfca96a@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: srialpop\r\e%, 6 May 1995 14:52:13 -0800
To: shendi@saruman.lb.bawue.de (Alexander Shendi), gcl@cli.com
From: kr@shell.portal.com (kr)
Subject: Re: Prevent Loading of init.lsp in GCL 1.1

Sender: gcl-request@cli.com



At 11:58 5/6/95, Alexander Shendi wrote:
>Is there a way to prevent loading init.lsp in GCl 1.1.

How about just removing that file or keeping it empty ?  :-)


Greetings
Markus Krummenacker



From yuasa@ylab.tutics.tut.ac.jp  Sun May  7 20:40:48 1995
Return-Path: <yuasa@ylab.tutics.tut.ac.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03206; Sun, 7 May 95 20:40:48 CDT
Received: from katura.ylab.tutics.tut.ac.jp by cli.com (4.1/SMI-4.1)
	id AA01623; Sun, 7 May 95 19:27:50 CDT
Received: (from yuasa@localhost) by katura.ylab.tutics.tut.ac.jp (8.6.9+2.4W/3.3W9) id JAA15531 for gcl@cli.com; Mon, 8 May 1995 09:23:52 +0900
Date: Mon, 8 May 1995 09:23:52 +0900
From: Taiichi Yuasa <yuasa@ylab.tutics.tut.ac.jp>
Message-Id: <199505080023.JAA15531@katura.ylab.tutics.tut.ac.jp>
To: gcl@cli.com
Subject: RE: Prevent Loading of init.lsp in GCL 1.1

>> Is there a way to prevent loading init.lsp in GCl 1.1.

In the original KCL, the instruction to load init.lsp is given in the file
lsp/top.lsp.

    (defun top-level ()
      ...
      (catch *quit-tag* (when (probe-file "init.lsp") (load "init.lsp")))
      ...
    )

Commenting out the entire CATCH form will prevent loading init.lsp.

-- Taiichi

From kr@shell.portal.com  Sun May  7 20:42:39 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03210; Sun, 7 May 95 20:42:39 CDT
Errors-To: sandel@cli.com
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA01624; Sun, 7 May 95 19:30:37 CDT
Errors-To: sandel@cli.com
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.11/8.6.5) with ESMTP id RAA11193 for <gcl@cli.com>; Sun, 7 May 1995 17:29:54 -0700
From: kr@shell.portal.com
Received: (kr@localhost) by jobe.shell.portal.com (8.6.11/8.6.5) id RAA06468; Sun, 7 May 1995 17:29:53 -0700
Date: Sun, 7 May 1995 17:29:53 -0700
Message-Id: <199505080029.RAA06468@jobe.shell.portal.com>
To: gcl@cli.com
Subject: onscure format quirks
Sender: gcl-request@cli.com
Errors-To: gcl-request@cli.com

I have repeatedly used the (format ...) function to print out numbers
in a flexible and variable fashion. I think that the syntax of this
construct is pretty brain-dead and user-unfriendly, and many of the
options are pretty obscure (and so not well tested and debugged, it
seems). So I probably only have myself to blame for having run into
problems with various LISPs by using format. But OTOH there must be
reason why it was included, and there is no reasonable alternative I
know of, so I'll have to use what is available.

I have encountered the following oddities in gcl-1.1 :

* extra comma, but empty field:
------------------------------
(format nil "~v,'0,X" 8 1234) yields this:
==========
>(format nil "~v,'0,X" 8 1234)
(format nil "~v,'0,X" 8 1234)

Error: Format error: illegal ,.
              V
       "~v,'0,X"

Fast links are on: do (use-fast-links nil) for debugging
Error signalled by FORMAT.
Broken at FORMAT.  Type :H for Help.
>>
==========

With my reading of CLtL2, p. 586, it should be legal to have all these
commas in there, even if a field happens to be empty (I even read it
as if though it were required). This works with no problem in MCL2.0
. So I do not know whether this is a bug in GCL or in MCL, or whether
I just should code in a more defensive style.

* no comma, empty field:
-----------------------
(format nil "~v,'0X" 8 1234) works correctly:
==========
>(format nil "~v,'0X" 8 1234)
"000004D2"

>
==========

This also works in the same way in MCL2.0 .


* with comma, and specified field with "commachar":
--------------------------------------------------
(format nil "~v,'0,' X" 8 1234) does not do quite what one would
expect:
==========
>(format nil "~v,'0,' X" 8 1234)
"000004D2"

>
==========

It should have divided the output in blocks with a length of three (as
a default). In MCL2.0 it gives the following as expected:
==========
? (format nil "~v,'0,' X" 8 1234)
" 000 4D2"
? 
==========


I just wanted to toss out these observations. Maybe other people here
have encountered these issues, and maybe know definitive answers as to
what is correct..

Many Greetings
Markus Krummenacker


From marks@earth.sarnoff.com  Mon May  8 13:39:19 1995
Return-Path: <marks@earth.sarnoff.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03578; Mon, 8 May 95 13:39:19 CDT
Received: from groucho.sarnoff.com by cli.com (4.1/SMI-4.1)
	id AA03269; Mon, 8 May 95 11:58:49 CDT
Received: (from marks@localhost) by groucho.sarnoff.com (8.6.9/8.6.9) id NAA26578; Mon, 8 May 1995 13:03:55 -0400
Date: Mon, 8 May 1995 13:03:55 -0400
From: "Aaron J. Marks" <marks@earth.sarnoff.com>
Message-Id: <199505081703.NAA26578@groucho.sarnoff.com>
To: gcl@cli.com
Subject: GCL 2.0 and PCL 2.1 on BSDI 2.0

Has anyone successfully compiled GCL 2.0 and PCL 2.1 on a BSDI 2.0 box?
I've been able to compile gcl (using FreeBSD mach type) but pcl does not
compile.  It looks like it's the infamous sprintf fcn bug that FreeBSD had.
I am under this assumption because I get the "Dots appeared illegally"
error message when trying to load the compiled version of DEPS:

  ...
  Loading binary of DEFCLASS...
  Loading binary of DEFS...

  Error: Dots appeared illegally.
  ...

Comments/suggestions?

Thanks,
-Aaron.

-- 
Aaron J. Marks - marks@sarnoff.com          "If you steal from one author it's
David Sarnoff Research Center               plagiarism; if you steal from many
Voice: (609)734-2704; Fax: (609)734-2049    it's research." --Unknown

From jeff@aiai.ed.ac.uk  Mon May  8 15:15:56 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03647; Mon, 8 May 95 15:15:56 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA03619; Mon, 8 May 95 13:36:42 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id TAA28234; Mon, 8 May 1995 19:36:00 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 8 May 95 19:35:05 BST
Date: Mon, 8 May 95 19:35:04 BST
Message-Id: <27938.9505081835@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: onscure format quirks
To: kr@shell.portal.com, gcl@cli.com
In-Reply-To: kr@shell.portal.com's message of Sun, 7 May 1995 17:29:53 -0700

> I have repeatedly used the (format ...) function to print out numbers
> in a flexible and variable fashion. I think that the syntax of this
> construct is pretty brain-dead and user-unfriendly, and many of the
> options are pretty obscure (and so not well tested and debugged, it
> seems). So I probably only have myself to blame for having run into
> problems with various LISPs by using format. But OTOH there must be
> reason why it was included, and there is no reasonable alternative I
> know of, so I'll have to use what is available.

The short answer is that FORMAT is in Common Lisp because it was
in MacLisp and in the various MacLisp successors that lead to Common
Lisp, and because it didn't generate enough dislike to get it eliminated
or extensively modified.  If I recall correctly, Guy Steele is
the originator of some of the more elaborate aspects.  Anyway,
some people think it's neat, and indeed cool, to be able to write
loops and case statements in format strings.  ^_^

I don't think it's much worse than some of the similar things
used in C (printf(), strftime()), but it's true that it has
some problems.

Anyway, useing the XP pretty-printer's format in AKCL, I get:

-> (format nil "~v,'0,X" 8 1234) 
"000004D2"
-> (format nil "~v,'0X" 8 1234) 
"000004D2"
-> (format nil "~v,'0,' X" 8 1234)
"000004D2"

You say the last one should work like this:

> ? (format nil "~v,'0,' X" 8 1234)
> " 000 4D2"

As you can see, that's not what I get above.  Nor is it what I
get using the native FORMAT (ie, as opposed to the XP one) in
Lucid CL 4.1 or Allegro CL 4.1.

-- jeff

From kr@shell.portal.com  Mon May  8 18:27:04 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03711; Mon, 8 May 95 18:27:04 CDT
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA04458; Mon, 8 May 95 17:11:31 CDT
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.11/8.6.5) with ESMTP id PAA11907; Mon, 8 May 1995 15:10:45 -0700
Received: from DialupEudora (jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.11/8.6.5) with SMTP id PAA15964; Mon, 8 May 1995 15:10:41 -0700
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110100abd45377fcb0@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: shell\r\elogin:, 8 May 1995 15:11:15 -0800
To: Jeff Dalton <jeff@aiai.ed.ac.uk>, gcl@cli.com
From: kr@shell.portal.com (kr)
Subject: Re: obscure format quirks

At 19:35 5/8/95, Jeff Dalton wrote:
>I don't think it's much worse than some of the similar things
>used in C (printf(), strftime()), but it's true that it has
>some problems.

I think those are also pretty brain-dead. :-)  (I did not even mention
Fortran :-)

>Anyway, useing the XP pretty-printer's format in AKCL, I get:

Thanx for sending those datapoints. But what is "XP pretty-printer" and
where would I get it ?


Greetings
Markus Krummenacker



From richards@igor.music.qc.edu  Mon May  8 20:27:14 1995
Return-Path: <richards@igor.music.qc.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03729; Mon, 8 May 95 20:27:14 CDT
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA04714; Mon, 8 May 95 19:05:32 CDT
Received: from igor by aaron.music.qc.edu (NX5.67e/NX3.0M)
	id AA04757; Mon, 8 May 95 20:02:17 -0400
Received: by igor.music.qc.edu (NX5.67e/NX3.0S)
	id AA00326; Mon, 8 May 95 20:03:47 -0400
Date: Mon, 8 May 1995 20:03:44 -0400 (EDT)
From: "David N. Richards" <richards@aaron.music.qc.edu>
X-Sender: richards@igor
To: Gcl Mailing List <gcl@cli.com>
Subject: make breaks
Message-Id: <Pine.NXT.3.91.950508200055.322A-100000@igor>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hi - Trying to build on a NeXTStep 3.2 m68k platform.
got the following error during a make (see below) - 
any help much appreciated!! 

Dave
==========================================
        David Richards               
The Aaron Copland School of Music
       at Queens College   
E-mail: richards@aaron.music.qc.edu               
Voice : 1-(718)-997-3874
==========================================

NeXTunixsave.c:121: `va_alist' undeclared (first use this function)
NeXTunixsave.c:121: (Each undeclared identifier is reported only once
NeXTunixsave.c:121: for each function it appears in.)
NeXTunixsave.c:296: `i' undeclared (first use this function)
NeXTunixsave.c:296: `the_commands_len' undeclared (first use this 
function)
NeXTunixsave.c:297: `the_commands' undeclared (first use this function)
NeXTunixsave.c:299: `segment' undeclared (first use this function)
NeXTunixsave.c:305: `data_size' undeclared (first use this function)
NeXTunixsave.c:305: `data_address' undeclared (first use this function)
NeXTunixsave.c:306: `bss_size' undeclared (first use this function)
NeXTunixsave.c:307: `fdatastart' undeclared (first use this function)
NeXTunixsave.c:308: `fdatasize' undeclared (first use this function)
NeXTunixsave.c:309: `fgrowth' undeclared (first use this function)
NeXTunixsave.c:314: `section' undeclared (first use this function)
NeXTunixsave.c:315: `seg' undeclared (first use this function)
NeXTunixsave.c:352: `outfd' undeclared (first use this function)
NeXTunixsave.c:352: `the_header' undeclared (first use this function)
NeXTunixsave.c:355: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:366: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:373: `infd' undeclared (first use this function)
NeXTunixsave.c:376: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:378: `size' undeclared (first use this function)
NeXTunixsave.c:380: `buf' undeclared (first use this function)
NeXTunixsave.c:388: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:399: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:411: `st' undeclared (first use this function)
NeXTunixsave.c:414: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:422: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:427: warning: `return' with a value, in function returning 
void
NeXTunixsave.c:430: warning: `return' with a value, in function returning 
void
unixsave.c: In function `init_unixsave':
unixsave.c:174: `Lsave' undeclared (first use this function)
*** Exit 1


From etokna@etn.ericsson.se  Tue May  9 10:14:17 1995
Return-Path: <etokna@etn.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00420; Tue, 9 May 95 10:14:17 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA06328; Tue, 9 May 95 08:44:49 CDT
Received: from hisoy0 (hisoy0.etn.ericsson.se [193.161.188.2]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id PAA03844 for <gcl@cli.com>; Tue, 9 May 1995 15:44:39 +0200
Received: from hisoy1.etn.ericsson.se by hisoy0 (5.0/LME-DOM-2.2.3)
	id AA19866; Tue, 9 May 1995 15:45:08 +0200
From: etokna@etn.ericsson.se (Knut-Haavard Aksnes)
Received: by hisoy1.etn.ericsson.se (4.1/client-1.5)
	id AA02791; Tue, 9 May 95 15:43:45 +0200
Date: Tue, 9 May 95 15:43:45 +0200
Message-Id: <9505091343.AA02791@hisoy1.etn.ericsson.se>
To: gcl@cli.com
Subject: Bug in gcl-2.1 installation
Comments: Hyperbole mail buttons accepted, v3.18.3.
Content-Length: 444

The tcl/tk  and X11 include and library  directories from  add-defs is
not propagated properly  to the makefile  in gcl-tk. This makefile has
to be edited manually.

-- 

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETO/X/I KNA		Phone: +47 37 05 14 81
Email: etokna@hisoy.etn.ericsson.se (internet)  ETO.ETOKNA (memo)


From etokna@etn.ericsson.se  Tue May  9 10:25:14 1995
Return-Path: <etokna@etn.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00426; Tue, 9 May 95 10:25:14 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA06409; Tue, 9 May 95 09:01:36 CDT
Received: from hisoy0 (hisoy0.etn.ericsson.se [193.161.188.2]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id QAA06092 for <gcl@cli.com>; Tue, 9 May 1995 16:01:32 +0200
Received: from hisoy1.etn.ericsson.se by hisoy0 (5.0/LME-DOM-2.2.3)
	id AA20254; Tue, 9 May 1995 16:02:00 +0200
From: etokna@etn.ericsson.se (Knut-Haavard Aksnes)
Received: by hisoy1.etn.ericsson.se (4.1/client-1.5)
	id AA02945; Tue, 9 May 95 16:00:36 +0200
Date: Tue, 9 May 95 16:00:36 +0200
Message-Id: <9505091400.AA02945@hisoy1.etn.ericsson.se>
To: gcl@cli.com
Subject: gcl-2.1 fails to compile pcl-gcl-2.1 on solaris.
Comments: Hyperbole mail buttons accepted, v3.18.3.
Content-Length: 367

GCL core dumps during compilation of slots-boot.lisp on a Sparc 1000
running SunOS 5.3.

-- 

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETO/X/I KNA		Phone: +47 37 05 14 81
Email: etokna@hisoy.etn.ericsson.se (internet)  ETO.ETOKNA (memo)


From etokna@etn.ericsson.se  Tue May  9 10:34:58 1995
Return-Path: <etokna@etn.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00433; Tue, 9 May 95 10:34:58 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA06421; Tue, 9 May 95 09:05:12 CDT
Received: from hisoy0 (hisoy0.etn.ericsson.se [193.161.188.2]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id QAA06626 for <gcl@cli.com>; Tue, 9 May 1995 16:05:09 +0200
Received: from hisoy1.etn.ericsson.se by hisoy0 (5.0/LME-DOM-2.2.3)
	id AA20314; Tue, 9 May 1995 16:05:38 +0200
From: etokna@etn.ericsson.se (Knut-Haavard Aksnes)
Received: by hisoy1.etn.ericsson.se (4.1/client-1.5)
	id AA03004; Tue, 9 May 95 16:04:15 +0200
Date: Tue, 9 May 95 16:04:15 +0200
Message-Id: <9505091404.AA03004@hisoy1.etn.ericsson.se>
To: gcl@cli.com
Subject: Path to libX11 should be stored for TCL/TK
Comments: Hyperbole mail buttons accepted, v3.18.3.
Content-Length: 426

(si::tkconnect)

fails for me if libX11.so.6.0 isn't in the LD_LIBRARY_PATH, this path
should ideally be remembered from the settings in add-defs.

-- 

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETO/X/I KNA		Phone: +47 37 05 14 81
Email: etokna@hisoy.etn.ericsson.se (internet)  ETO.ETOKNA (memo)


From jeff@aiai.ed.ac.uk  Tue May  9 11:19:45 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00470; Tue, 9 May 95 11:19:45 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA06649; Tue, 9 May 95 10:06:51 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id QAA19507; Tue, 9 May 1995 16:05:42 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Tue, 9 May 95 16:04:45 BST
Date: Tue, 9 May 95 16:04:45 BST
Message-Id: <4003.9505091504@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: obscure format quirks
To: kr <kr@shell.portal.com>, gcl@cli.com
In-Reply-To: kr's message of shell\r\elogin:, 8 May 1995 15:11:15 -0800

> >Anyway, useing the XP pretty-printer's format in AKCL, I get:
> 
> Thanx for sending those datapoints. But what is "XP pretty-printer" and
> where would I get it ?

XP is a pretty printer written by Dick Waters at MIT.  It's the basis
for the pretty printer specification in Chapter 27 of Common Lisp the
Language 2nd edition.

The easiest way to make GCL conform to that spec (which I think is
also in the ANSI standard) would be to use XP.

It is (or at least was) available on the net.  The version I use
in AKCL is dated November, 26 1991 (rather old) and slightly
modified (by me) for AKCL to avoid calling COMPILE at run-time.

Now, _where_ on the net. ...

The latest info I have is from 8 feb 93:

   Dick Waters' XP Lisp Pretty Printer is available by anonymous ftp
   from merl.com:/pub/xp/ as the files xp-code.lisp, xp-doc.txt, and
   xp-test.lisp. (It is also available from the Lisp Utilities Repository.)
   For further information, contact Dick Waters, <dick@merl.com>
   or <dick@ai.mit.edu>.

For something more recent, check the Comp.lang.lisp FAQ.

For the utilities repository, try

  http://www.cs.cmu.edu/Web/Groups/AI/html/air.html

-- jeff

From wavehh!wavehh.hanse.de!cracauer@mail.hanse.de  Tue May  9 12:02:42 1995
Return-Path: <wavehh!wavehh.hanse.de!cracauer@mail.hanse.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00503; Tue, 9 May 95 12:02:42 CDT
Received: from ki1.chemie.fu-berlin.de by cli.com (4.1/SMI-4.1)
	id AA06844; Tue, 9 May 95 10:51:06 CDT
Received: by ki1.chemie.fu-berlin.de (Smail3.1.28.1)
	  from mail.hanse.de (134.100.239.2) with smtp
	  id <m0s8qVa-00012VC>; Tue, 9 May 95 16:43 MEST
Received: from wavehh.UUCP by mail.hanse.de with UUCP
	  for gcl@cli.com id <m0s8qVP-0004gMC@mail.hanse.de>; Tue, 9 May 95 16:43 MET DST
Received: by wavehh.hanse.de (4.1/SMI-4.1)
	id AA02969; Tue, 9 May 95 16:42:01 +0200
From: cracauer@wavehh.hanse.de (Martin Cracauer)
Message-Id: <9505091442.AA02969@wavehh.hanse.de>
Subject: gcl@cli.com: Please post announcements
To: gcl@cli.com
Date: Tue, 9 May 1995 16:42:00 +0200 (MET DST)
Reply-To: cracauer@wavehh.hanse.de
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Content-Length: 377       

Hello,

I'd suggest that announcements for new releases of gcl are placed on
this list (gcl@cli.com). I see versions passing by in bug reports, but
never see any noification of a new release or beta release.

Thanks.
-- 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Martin Cracauer <cracauer@wavehh.hanse.de>  
(private address)
Tel.: +49 40 / 522 18 29
Fax.: +49 40 / 522 85 36

From richards@igor.music.qc.edu  Tue May  9 12:43:23 1995
Return-Path: <richards@igor.music.qc.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00543; Tue, 9 May 95 12:43:23 CDT
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA07005; Tue, 9 May 95 11:27:29 CDT
Received: from igor by aaron.music.qc.edu (NX5.67e/NX3.0M)
	id AA00751; Tue, 9 May 95 12:24:04 -0400
Received: by igor.music.qc.edu (NX5.67e/NX3.0S)
	id AA02536; Tue, 9 May 95 12:25:44 -0400
Date: Tue, 9 May 1995 12:25:41 -0400 (EDT)
From: "David N. Richards" <richards@aaron.music.qc.edu>
X-Sender: richards@igor
To: Gcl Mailing List <gcl@cli.com>
Subject: make breaks
Message-Id: <Pine.NXT.3.91.950509122416.2532A-100000@igor>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hi - Building gcl2.0 on a NeXT m68k running 3.2 - and get the following:
cc -DVOL=volatile -I/Temp/Gcl/gcl-2.1/o -fwritable-strings -c -O 
-I../gcl-tk -I../h/  main.c  
main.c:554: only 3 args to macro 'RETURN' (4 expected)
*** Exit 1
Stop.
 
What should be the 4th value?? Many thanks in advance -
Dave

==========================================
        David Richards               
The Aaron Copland School of Music
       at Queens College   
E-mail: richards@aaron.music.qc.edu               
Voice : 1-(718)-997-3874
==========================================


From tkunze@ccrma.Stanford.EDU  Tue May  9 16:15:00 1995
Return-Path: <tkunze@ccrma.Stanford.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00576; Tue, 9 May 95 16:15:00 CDT
Received: from  ccrma.Stanford.EDU  (ccrma.Stanford.EDU) by cli.com (4.1/SMI-4.1)
	id AA07668; Tue, 9 May 95 14:43:27 CDT
Received: from cmn18 by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA16996; Tue, 9 May 95 12:43:25 -0700
From: tkunze@ccrma.Stanford.EDU (Tobias Kunze)
Message-Id: <9505091943.AA16996@ ccrma.Stanford.EDU >
Received: by cmn18.Stanford.EDU (NX5.67d/NX3.0X)
	id AA12106; Tue, 9 May 95 12:43:24 -0700
Date: Tue, 9 May 95 12:43:24 -0700
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: "David N. Richards" <richards@aaron.music.qc.edu>
Subject: Re: make breaks
Cc: Gcl Mailing List <gcl@cli.com>


> Hi - Building gcl2.0 on a NeXT m68k running 3.2 - and get the following:
> cc -DVOL=volatile -I/Temp/Gcl/gcl-2.1/o -fwritable-strings -c -O 

> -I../gcl-tk -I../h/  main.c  

> main.c:554: only 3 args to macro 'RETURN' (4 expected)
> *** Exit 1
> Stop.
>  

> What should be the 4th value?? Many thanks in advance -
> Dave
> 


Dave-

it is a typo as far as i remember.  And--bad news--it's only the
first error in a row (about 50 or so) :(
I finally gave up.  I couldn't get it to compile under Next 3.3 (black).
I tweaked the sources here and there, but no way.

However, if somebody managed to get it to compile, I'd be glad to hear about!

-Tobias


From yonezawa@vceew46.lsi.tmg.nec.co.jp  Tue May  9 19:51:17 1995
Return-Path: <yonezawa@vceew46.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00662; Tue, 9 May 95 19:51:17 CDT
Received: from TYO2.gate.nec.co.jp by cli.com (4.1/SMI-4.1)
	id AA08611; Tue, 9 May 95 18:41:17 CDT
Received: from mailsv.nec.co.jp ([133.200.254.203]) by TYO2.gate.nec.co.jp (8.6.11+2.5Wb2/3.3Wb-NEC-TYO2) with ESMTP id IAA28003 for <gcl@cli.com>; Wed, 10 May 1995 08:41:14 +0900
Received: from vceew46.lsi.tmg.nec.co.jp (vceew46.lsi.tmg.nec.co.jp [133.202.13.117]) by mailsv.nec.co.jp (8.6.11+2.5Wb2/3.3W-95040611) with ESMTP id IAA26916 for <gcl@cli.com>; Wed, 10 May 1995 08:42:04 +0900
Received: from vceew46 by vceew46.lsi.tmg.nec.co.jp (8.6.12+2.5W/6.4JAIN-lsi-mx1.1)
	id IAA21043; Wed, 10 May 1995 08:38:38 +0900
Message-Id: <199505092338.IAA21043@vceew46.lsi.tmg.nec.co.jp>
To: gcl@cli.com
Subject: Re: make breaks
From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
In-Reply-To: Your message of "Tue, 9 May 95 12:43:24 -0700"
References: <9505091943.AA16996@ ccrma.Stanford.EDU >
X-Mailer: Mew beta version 0.89 on Emacs 19.28.1, Mule 2.2
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Wed, 10 May 1995 08:38:37 +0900
Sender: yonezawa@vceew46.lsi.tmg.nec.co.jp

tkunze> it is a typo as far as i remember.  And--bad news--it's only the
tkunze> first error in a row (about 50 or so) :(
tkunze> I finally gave up.  I couldn't get it to compile under Next 3.3 (black).
tkunze> I tweaked the sources here and there, but no way.
tkunze> 
tkunze> However, if somebody managed to get it to compile, I'd be glad to hear about!

I updated my NeXT(68k) port of akcl to gcl-2.0. It works fine under 3.0(J).

Dave tried it under 3.2, but he got a link error.
I think the patch still needs to be modified, but I don't have 3.2 or 3.3.

If you are interested in this patch, please let me know. I can send it to you.

--
Noritake Yonezawa <yonezawa@lsi.tmg.nec.co.jp>

From richards@igor.music.qc.edu  Tue May  9 21:03:40 1995
Return-Path: <richards@igor.music.qc.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00677; Tue, 9 May 95 21:03:40 CDT
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA08735; Tue, 9 May 95 19:59:36 CDT
Received: from igor by aaron.music.qc.edu (NX5.67e/NX3.0M)
	id AA01964; Tue, 9 May 95 20:56:04 -0400
Received: by igor.music.qc.edu (NX5.67e/NX3.0S)
	id AA05065; Tue, 9 May 95 20:57:41 -0400
Date: Tue, 9 May 1995 20:57:37 -0400 (EDT)
From: "David N. Richards" <richards@aaron.music.qc.edu>
X-Sender: richards@igor
To: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
Cc: gcl@cli.com
Subject: Re: make breaks
In-Reply-To: <199505092338.IAA21043@vceew46.lsi.tmg.nec.co.jp>
Message-Id: <Pine.NXT.3.91.950509205328.5060A-100000@igor>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

OK - I got it to compile ro the point of making a raw_gcl
I resorted to using gcc 2.6.3 because NeXT's cc just kept 
dying on me. *BUT* when raw_gcl starts up I get this: 

GCL (GNU Common Lisp)  April 1994  32768 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
Initializing ../lsp/evalmacros.o
Initializing ../lsp/top.o
Initializing ../lsp/module.o
loading ../lsp/autoload.lsp
sh: 5058 Bus error
*** Exit 138

So close yet so far!!! 
Dave

==========================================
        David Richards               
The Aaron Copland School of Music
       at Queens College   
E-mail: richards@aaron.music.qc.edu               
Voice : 1-(718)-997-3874
==========================================

On Wed, 10 May 1995, Noritake YONEZAWA wrote:

> Date: Wed, 10 May 1995 08:38:37 +0900
> From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
> To: gcl@cli.com
> Subject: Re: make breaks
> 
> tkunze> it is a typo as far as i remember.  And--bad news--it's only the
> tkunze> first error in a row (about 50 or so) :(
> tkunze> I finally gave up.  I couldn't get it to compile under Next 3.3 (black).
> tkunze> I tweaked the sources here and there, but no way.
> tkunze> 
> tkunze> However, if somebody managed to get it to compile, I'd be glad to hear about!
> 
> I updated my NeXT(68k) port of akcl to gcl-2.0. It works fine under 3.0(J).
> 
> Dave tried it under 3.2, but he got a link error.
> I think the patch still needs to be modified, but I don't have 3.2 or 3.3.
> 
> If you are interested in this patch, please let me know. I can send it to you.
> 
> --
> Noritake Yonezawa <yonezawa@lsi.tmg.nec.co.jp>
> 

From yonezawa@vceew46.lsi.tmg.nec.co.jp  Wed May 10 00:33:15 1995
Return-Path: <yonezawa@vceew46.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00889; Wed, 10 May 95 00:33:15 CDT
Received: from TYO2.gate.nec.co.jp by cli.com (4.1/SMI-4.1)
	id AA08969; Tue, 9 May 95 23:22:53 CDT
Received: from mailsv.nec.co.jp ([133.200.254.203]) by TYO2.gate.nec.co.jp (8.6.11+2.5Wb2/3.3Wb-NEC-TYO2) with ESMTP id NAA06076; Wed, 10 May 1995 13:22:43 +0900
Received: from vceew46.lsi.tmg.nec.co.jp (vceew46.lsi.tmg.nec.co.jp [133.202.13.117]) by mailsv.nec.co.jp (8.6.11+2.5Wb2/3.3W-95040611) with ESMTP id NAA29300; Wed, 10 May 1995 13:23:33 +0900
Received: from vceew46 by vceew46.lsi.tmg.nec.co.jp (8.6.12+2.5W/6.4JAIN-lsi-mx1.1)
	id NAA22156; Wed, 10 May 1995 13:20:07 +0900
Message-Id: <199505100420.NAA22156@vceew46.lsi.tmg.nec.co.jp>
To: richards@aaron.music.qc.edu
Cc: gcl@cli.com
Subject: Re: make breaks
From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
In-Reply-To: Your message of "Tue, 9 May 1995 20:57:37 -0400 (EDT)"
References: <Pine.NXT.3.91.950509205328.5060A-100000@igor>
X-Mailer: Mew beta version 0.89 on Emacs 19.28.1, Mule 2.2
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Wed, 10 May 1995 13:20:07 +0900
Sender: yonezawa@vceew46.lsi.tmg.nec.co.jp

richards> OK - I got it to compile ro the point of making a raw_gcl
richards> I resorted to using gcc 2.6.3 because NeXT's cc just kept 
richards> dying on me. *BUT* when raw_gcl starts up I get this: 
richards> 
richards> GCL (GNU Common Lisp)  April 1994  32768 pages
richards> loading ../lsp/export.lsp
richards> Initializing ../lsp/defmacro.o
richards> Initializing ../lsp/evalmacros.o
richards> Initializing ../lsp/top.o
richards> Initializing ../lsp/module.o
richards> loading ../lsp/autoload.lsp
richards> sh: 5058 Bus error
richards> *** Exit 138

If one of my friends has NeXTStep 3.2(J) and I can borrow it from him,
I will try to fix that problem.  Please wait for a few weeks.

--
Noritake Yonezawa <yonezawa@lsi.tmg.nec.co.jp>

From yonezawa@vceew46.lsi.tmg.nec.co.jp  Thu May 11 03:18:29 1995
Return-Path: <yonezawa@vceew46.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01538; Thu, 11 May 95 03:18:29 CDT
Received: from TYO2.gate.nec.co.jp by cli.com (4.1/SMI-4.1)
	id AA12987; Thu, 11 May 95 01:58:23 CDT
Received: from mailsv.nec.co.jp ([133.200.254.203]) by TYO2.gate.nec.co.jp (8.6.11+2.5Wb2/3.3Wb-NEC-TYO2) with ESMTP id PAA05390 for <gcl@cli.com>; Thu, 11 May 1995 15:57:56 +0900
Received: from vceew46.lsi.tmg.nec.co.jp (vceew46.lsi.tmg.nec.co.jp [133.202.13.117]) by mailsv.nec.co.jp (8.6.11+2.5Wb2/3.3W-95040611) with ESMTP id PAA21995 for <gcl@cli.com>; Thu, 11 May 1995 15:58:46 +0900
Received: from vceew46 by vceew46.lsi.tmg.nec.co.jp (8.6.12+2.5W/6.4JAIN-lsi-mx1.1)
	id PAA27618; Thu, 11 May 1995 15:55:19 +0900
Message-Id: <199505110655.PAA27618@vceew46.lsi.tmg.nec.co.jp>
To: gcl@cli.com
Subject: Re: gcl2.0 on irix5
From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
In-Reply-To: Your message of "Mon, 1 May 95 15:04:43 -0700"
References: <9505012204.AA06121@ ccrma.Stanford.EDU >
X-Mailer: Mew beta version 0.89 on Emacs 19.28.1, Mule 2.2
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Thu, 11 May 1995 15:55:18 +0900
Sender: yonezawa@vceew46.lsi.tmg.nec.co.jp

tkunze> Also: does anyone happen to know why it is that the irix5 port
tkunze> can't save an image with dynamically loaded code?

The irix5 port uses dlopen() for dynamic loading.
dlopen() maps objects to a very high address space that can't be "unexec"ed.

--
Noritake Yonezawa <yonezawa@lsi.tmg.nec.co.jp>

From zejda@IRO.UMontreal.CA  Sat May 13 13:58:54 1995
Return-Path: <zejda@IRO.UMontreal.CA>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02550; Sat, 13 May 95 13:58:54 CDT
Received: from saguenay.IRO.UMontreal.CA by cli.com (4.1/SMI-4.1)
	id AA20592; Sat, 13 May 95 12:48:28 CDT
Received: from rond.IRO.UMontreal.CA (rond.IRO.UMontreal.CA [132.204.20.25]) by saguenay.IRO.UMontreal.CA (8.6.9/8.6.9) with ESMTP id NAA04219 for <gcl@cli.com>; Sat, 13 May 1995 13:48:27 -0400
Received: (from zejda@localhost) by rond.IRO.UMontreal.CA (8.6.9/8.6.9) id NAA11904 for gcl@cli.com; Sat, 13 May 1995 13:48:25 -0400
From: Jindrich Zejda <zejda@IRO.UMontreal.CA>
Message-Id: <199505131748.NAA11904@rond.IRO.UMontreal.CA>
Subject: gcl 2.1 on a Mac under MachTen 2.5
To: gcl@cli.com
Date: Sat, 13 May 1995 13:48:25 -0400 (EDT)
X-Mailer: ELM [version 2.4 PL21]
Content-Type: text
Content-Length: 824       

Hello,

Could anybody help with installation of gcl 2.1 on a Macintosh IIci running
MachTen 2.1.1, please?

jindra

 ________________________________________________________
|                                                        |
|  Jindrich Zejda                   E-mail:              |
|  Room/Bureau 3245           zejda@IRO.UMontreal.CA     |
|  Department IRO                                        |
|  Pavilion Math-Info               Fax:                 |
|  Universite de Montreal     +1 514 3435834             |
|  C.P. 6128                                             |
|  Succursale Centre-Ville        Tel.:                  |
|  Montreal, Quebec           +1 514 343-6111 ext. 3502  |
|  H3C 3J7, Canada                                       |
|________________________________________________________|


From cs942002@ariel.cs.yorku.ca  Sat May 13 15:44:57 1995
Return-Path: <cs942002@ariel.cs.yorku.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02563; Sat, 13 May 95 15:44:57 CDT
Received: from red.ariel.cs.yorku.ca by cli.com (4.1/SMI-4.1)
	id AA20768; Sat, 13 May 95 14:35:57 CDT
Received: by ariel.cs.yorku.ca (8.6.11/YU_CS_869.1.2.Ariel)
	id PAA09889; Sat, 13 May 1995 15:35:57 -0400
Received: from blue by red with SMTPD id <9888>; Sat, 13 May 1995 15:35:56 -0400
Received: by blue (4.1/YUCS_Sun_sub)
	id AA07964; Sat, 13 May 95 15:35:56 EDT
Date: Sat, 13 May 1995 15:35:55 -0400 (EDT)
From: "Daniel C. Stoica" <cs942002@ariel.cs.yorku.ca>
To: gcl@cli.com
Subject: XPCE with GCL ?
Message-Id: <Pine.SUN.3.91.950513143147.4332A-100000@blue>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hi everybody,

  This is my first post, though I am not completely alien here. ;-)
(I used to read regularly the mail-archive)
  Well, I am CS student at York University, Canada, with interests 
spanning from symbolic languages to human-computer interaction. I think 
that will do it, let's get to our problems.
  I am working on a project in (Common) Lisp that also involves graphics, 
on my home Linux box. I played for some time with Garnet 3.0 and CLISP but
I soon realized that it is too slow for what I need. Since I was previously
exposed to XPCE with SWI-Prolog it became obvious that XPCE/Lisp could be a 
good alternative. For those who do not know anything about XPCE: it is an 
OO GUI DevKit with nice OpenLook-ish look-and-feel developed in Amsterdam 
at SWI Institute (only for Linux, they provide a free binary package; who 
said Linux is a bad system; otherwise you have to pay for a license). 
  The gentlemen from SWI have also developed an interface from Lisp to XPCE 
but it only runs out of the box with Lucid and/or LispWorks. I tried a port 
to both CLISP and GCL but since I have no experience with any commercial 
Lisp I have no idea how, for example, the "FFI" package in Lucid works. 
Neither found to much docs on the "FFI" in GCL. Compared to CLISP though, 
where it is a rather experimental feature, it apears to me that GCL would 
be a better candidate for linking to a C based library.
  To make the long story short, I will greatly appeciate any comments on 
the subject, including pointers to other persons that you know/heard being 
involved in such weird :-) things. Based on feedback I could come with
details on specific problems I encountered.

Best regards,

Daniel.

PS: 

The above mentioned package is at:

		ftp://swi.psy.uva.nl/pub/xpce/* 

and the HTML FAQ at:

	       http://swi.psy.uva.nl/projects/xpce/xpcefaq.html

From xyang@ccad.uiowa.edu  Sat May 13 23:15:54 1995
Return-Path: <xyang@ccad.uiowa.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02609; Sat, 13 May 95 23:15:54 CDT
Received: from monet.ccad.uiowa.edu by cli.com (4.1/SMI-4.1)
	id AA21222; Sat, 13 May 95 22:12:02 CDT
Received: (from xyang@localhost) by monet.ccad.uiowa.edu (8.6.10/8.6.10) id WAA04373 for gcl@cli.com; Sat, 13 May 1995 22:12:01 -0500
From: Xiaohong Yang <xyang@ccad.uiowa.edu>
Message-Id: <199505140312.WAA04373@monet.ccad.uiowa.edu>
Subject: Help with problems in running GCL in ILISP buffer
To: gcl@cli.com
Date: Sat, 13 May 1995 22:12:01 -0600 (CDT)
X-Mailer: ELM [version 2.4 PL21]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 2512      



Hi, 

   I am currently using Linux 1.2.3 and Emacs 19.28. The lisp I am using 
is GNU Lisp 2.1. However, when I try to send Lisp expression (list 1 2) from
Lisp buffer to Ilisp buffer (running gcl-2.1) (using key C-z-e), I 
received the following error messages in the output buffer:

   Error: Cannot find the external symbol ILISP-SAVE in #<"ILISP" package>.
   Fast links are on: do (use-fast-links nil) for debugging
   Error signalled by READ.
   Broken at READ.  Type :H for Help.
   >>
   Error: Cannot find the external symbol ILISP-EVAL in #<"ILISP" package>.
   Fast links are on: do (use-fast-links nil) for debugging
   Error signalled by SYSTEM:UNIVERSAL-ERROR-HANDLER.
   Backtrace: system:universal-error-handler

   Broken at READ.
   >>"(list 1 2 3)"
   >>"nil"
   >>"nil"
Can somebody out there please kindly tell what is wrong here? I also tried
CLISP using ilisp, it works fine but the result appeared in  evaluation 
minibuffer is doubled. For example, if I try "(+ 1 2)", the result is
"33" instead of "3". Is there anything I can do to eliminate this problem?

Bye the way, both lisp programs work find when I try to evaluate forms
inside the ilisp buffer.

 
Here is  a copy of my .emacs which load the gcl and clisp into ilisp:

(setq load-path (cons (expand-file-name '"~dog/ilisp/ilisp-5.7") load-path))
(require 'completer)

(defun start-gcl ()
  (setq lisp-mode-hook '(lambda () (require 'ilisp)))
    (autoload 'run-ilisp "ilisp" "Select a new inferior LISP." t)
      (autoload 'gcl       "ilisp" "Inferior GNU Common LISP." t)
	(interactive)
	  (setq load-path
		  (cons "/usr/local/lib/gcl-2.7/lsp"
				load-path))
      (setq gcl-program "gcl")
(gcl)
)

(defun start-clisp ()
  (setq lisp-mode-hook '(lambda () (require 'ilisp)))
    (autoload 'run-ilisp "ilisp" "Select a new inferior LISP." t)
     (autoload 'clisp     "ilisp" "Inferior CLISP Common LISP." t)
(interactive)
(setq clisp-program "/usr/bin/clisp")
(clisp))



Any suggestion will be highly appreciated.

Thanks in advance.

-x. yang
-- 
/==========================================================================\
|  Mark Xiaohong Yang       || "I don't have any solution, but I certainly |
|  xyang@cs.uiowa.edu       ||  admire the problem."                       |
|                           ||                         -- Brilliant        |
|  WWW HomePage: http:\\cs.uiowa.edu\~xyang\                               |
\==========================================================================/










From viola@salk.edu  Thu May 18 04:19:45 1995
Return-Path: <viola@salk.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01372; Thu, 18 May 95 04:19:45 CDT
Received: from salk.edu (helmholtz.salk.edu) by cli.com (4.1/SMI-4.1)
	id AA04786; Thu, 18 May 95 02:45:57 CDT
Received: from bayes.salk.edu by salk.edu (4.1/SMI-4.1)
	id AA00567; Thu, 18 May 95 00:45:58 PDT
From: viola@salk.edu (Paul Viola)
Received: (viola@localhost) by bayes.salk.edu (8.6.9/8.6.9) id AAA11793; Thu, 18 May 1995 00:46:02 -0700
Date: Thu, 18 May 1995 00:46:02 -0700
Message-Id: <199505180746.AAA11793@bayes.salk.edu>
To: gcl@cli.com
Subject: First message


I am running Linux 1.2.1 with gcc version 2.6.3 on an i586.

Many of the bugs with arrays from gcl-2.0 seem to be fixed... but has
anyone else encountered this one??

bayes% xbin/gcl

GCL (GNU Common Lisp)  Version(2.1) Wed May 17 01:04:47 PDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(aref (make-array '(10 10) :element-type 'fixnum) 3)
(aref (make-array '(10 10) :element-type 'fixnum) 3)

Error:  
Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by AREF.
Broken at SYSTEM:UNIVERSAL-ERROR-HANDLER.  Type :H for Help.
>>

Also, I simply can't seem to find a version of GCL and CLX that I can
get to work together.  Some of them build just fine but then seem to
fail at strange points (getting back bad protocols or hanging when a
window is mapped).  I have tried every system described in the arhive
of this mailing list.  Does anyone have a binary they can let me
have??  I would be willing to part with my first born.

Thanks,
Paul



From leverich@rand.org  Thu May 18 17:59:38 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01695; Thu, 18 May 95 17:59:38 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA06982; Thu, 18 May 95 16:51:31 CDT
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id OAA29739; Thu, 18 May 1995 14:51:20 -0700
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id OAA00696; Thu, 18 May 1995 14:51:20 -0700
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.10) with SMTP id OAA06883; Thu, 18 May 1995 14:51:19 -0700
Message-Id: <199505182151.OAA06883@atlantis.rand.org>
To: viola@salk.edu (Paul Viola)
Cc: gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: First message 
In-Reply-To: Your message of Thu, 18 May 95 00:46:02 MST.
             <199505180746.AAA11793@bayes.salk.edu> 
Date: Thu, 18 May 95 14:51:08 PDT
From: Brian Leverich <leverich@rand.org>




-- Your message was:   (from "viola@salk.edu")
  
  Also, I simply can't seem to find a version of GCL and CLX that I can
  get to work together.  Some of them build just fine but then seem to
  fail at strange points (getting back bad protocols or hanging when a
  window is mapped).  I have tried every system described in the arhive
  of this mailing list.  Does anyone have a binary they can let me
  have??  I would be willing to part w  ith my first born.

  ------------------


I'm having the same problems with the GCL-2.1 and the matching CLX
using Sun cc on a SPARC, but my bet is that I'm doing something wrong.
When I straighten it out I'll post.  I'll also try GCL-2.1/CLX on
Linux soon.

If you want a working Linux/GCL/CLX installation, get GCL-1.1 and
fetch the CLX from ftp://rand.org/pub/leverich.  A GCL/CLX-compatible
version of CMU's Garnet GUI builder is also available in the same
directory.  Performance on a 486DX2-66 is tolerable so long as you
don't do obviously crufty things.  Performance on our HP 735 is, of
course, wonderful.  Cheers, B.

From rld@juliet.ll.mit.edu  Fri May 19 15:54:35 1995
Return-Path: <rld@juliet.ll.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02612; Fri, 19 May 95 15:54:35 CDT
Received: from juliet.ll.mit.edu (JULIET.WX.LL.MIT.EDU) by cli.com (4.1/SMI-4.1)
	id AA09924; Fri, 19 May 95 14:42:39 CDT
Received: from escalus (ESCALUS.WX.LL.MIT.EDU) by juliet.ll.mit.edu id AA00732g; Fri, 19 May 95 15:48:34 EDT
From: rld@juliet.ll.mit.edu ( Richard Delanoy (group 21))
Received: by escalus; Fri, 19 May 95 15:54:49 EDT
Date: Fri, 19 May 95 15:54:49 EDT
Message-Id: <9505191954.AA11614@escalus>
To: gcl@cli.com
Subject: Possible name conflict in gcl-2.0


I am a long time user of AKCL and have just recently grabbed gcl-2.0 for
use on a Sun SPARC10, running BSD4.1.3. In my own application software built 
on top of gcl, I have files with clines that use gcc math.h functions for
number crunching.

With gcl-2.0, I get the following compiler error:

/ll/gnu/lib/gcc-lib/sun4/2.4.5/include/math.h:109: conflicting types for 
`remainder'
temp_sat_common.c:1830: previous declaration of `remainder'

where temp_sat_common.c is the c intermediate for my file temp_sat_common.lsp.



gcl/gcl-2.0/h/cmpinclude.h  declares 

object remainder ();

while math.h declares

extern double remainder();


I changed name of the gcl function in files cmpinclude.h and num_co.c in 
my copy of gcl in order to avoid the compiler error.

FYI,

Dick Delanoy
MIT Lincoln Laboratory

From price@wam.umd.edu  Fri May 19 19:29:34 1995
Return-Path: <price@wam.umd.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02675; Fri, 19 May 95 19:29:34 CDT
Received: from pg2-srv.wam.umd.edu by cli.com (4.1/SMI-4.1)
	id AA10457; Fri, 19 May 95 18:25:47 CDT
Received: from next18pg2.wam.umd.edu (next18pg2.wam.umd.edu [128.8.73.28]) by pg2-srv.wam.umd.edu (8.6.10/8.6.9) with ESMTP id TAA26445 for <gcl@cli.com>; Fri, 19 May 1995 19:25:46 -0400
From: Sherwin Hugh Price <price@wam.umd.edu>
Received: (price@localhost) by next18pg2.wam.umd.edu (8.6.9/8.6.9) id TAA04216 for gcl@cli.com; Fri, 19 May 1995 19:25:43 -0400
Date: Fri, 19 May 1995 19:25:43 -0400
Message-Id: <199505192325.TAA04216@next18pg2.wam.umd.edu>
Received: by NeXT.Mailer (1.100.RR)
Received: by NeXT Mailer (1.100.RR)
To: gcl@cli.com
Subject: Compilation Problems with gcl-2.1

Fellow Lispers,

In compiling gcl-2.1 for a 68040 NeXTcube running **NS3.2** I receive  
the following sets of warnings and errors:

1.  cc -DVOL=volatile -I/private/tmp/gcl-2.1/o -fwritable-strings -c
    -O -I../gcl-tk -I../h/  main.c  

    main.c:554: only 3 args to macro 'RETURN' (4 expected)

2. cc -DVOL=volatile -I/private/tmp/gcl-2.1/o -fwritable-strings -c
   -O -I../gcl-tk -I../h/  unixfsys.c  

   unixfsys.c:29: warning: redefinition of macro MAXPATHLEN
   ../h//../h/notcomp.h:29: warning: is the location of the previous
   definition.

3. cc -DVOL=volatile -I/private/tmp/gcl-2.1/o -fwritable-strings -c
   -O -I../gcl-tk -I../h/  unixfasl.c  

   /NextDeveloper/2.0CompatibleHeaders/mach.h:1: warning:
   Compatibility header file included, use <mach/mach.h>
   /NextDeveloper/2.0CompatibleHeaders/sys/loader.h:1: warning:
   Compatibility header file imported, use <mach-o/loader.h>
   /NextDeveloper/2.0CompatibleHeaders/rld.h:1: warning:
   Compatibility header file included, use <mach-o/rld.h>

4. cc -DVOL=volatile -I/private/tmp/gcl-2.1/o -fwritable-strings -c
   -O -I../gcl-tk -I../h/  unixtime.c  

   /NextDeveloper/Headers/bsd/sys/param.h:39: warning: redefinition
   of macro BSD
   ../h//bsd.h:39: warning: is the location of the previous
   definition
   /NextDeveloper/Headers/bsd/sys/param.h:248: warning: redefinition 

   of macro MAXPATHLEN
   ../h//../h/notcomp.h:248: warning: is the location of the previous
   definition

5. cc -DVOL=volatile -I/private/tmp/gcl-2.1/o -fwritable-strings -c
   -O -I../gcl-tk -I../h/  unixsave.c  

   /NextDeveloper/2.0CompatibleHeaders/mach.h:1: warning:
   Compatibility header file included, use <mach/mach.h>
   /NextDeveloper/2.0CompatibleHeaders/sys/loader.h:1: warning:
   Compatibility header file imported, use <mach-o/loader.h>
   NeXTunixsave.c:22: warning: could not use precompiled header
   '/NextDeveloper/Headers/bsd/libc.p', because:
   NeXTunixsave.c:22: warning: #ifdef '__VARARGS__' not defined when
   precompiled, but now defined: 

   NeXTunixsave.c:22: warning: at
   /NextDeveloper/Headers/bsd/m68k/varargs.h:7
   /NextDeveloper/Headers/bsd/sys/param.h:39: warning: redefinition
   of macro BSD
   ../h//bsd.h:39: warning: is the location of the previous
   definition
   /NextDeveloper/Headers/bsd/sys/param.h:248: warning:
   redefinition of macro MAXPATHLEN
   ../h//../h/notcomp.h:248: warning: is the location of the previous 

   definition 

   NeXTunixsave.c:121: too many args (2) to macro 'va_start'
   (1 expected)

For problem #1 the **APPARENT** solution is to edit line #554 in the  
file gcl-2.1/o/main.c,
from:	RETURN(1,int,exit_code,);
to:  	RETURN(1,int,exit_code,NULL);
however I not sure this is the **CORRECT** solution.

For the cases of macro redefinition problems #2, 4, and 5, the  
substitutions:
	MAXPATHLEN from 200 to 1024 in gcl-2.1/h/notcmp.h
	BSD from    to 43 in gcl-2.1/h/bsd.h
appear to remove the warnings, but once again am not sure that this  
is the **PROPER** way to go.

Yes, I see that the defs file for the NeXT is only for OS version  
2.x, so I need to know how I can achieve a successful compile under  
version 3.2.  Has anyone had this "enjoyable" experience.

Any answers, tips, pointers would be greatly appreciated.

Thank You,
price

From back0003@gold.tc.umn.edu  Sun May 21 15:47:05 1995
Return-Path: <back0003@gold.tc.umn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03396; Sun, 21 May 95 15:47:05 CDT
Received: from gold.tc.umn.edu by cli.com (4.1/SMI-4.1)
	id AA13811; Sun, 21 May 95 14:44:54 CDT
Received: by gold.tc.umn.edu; Sun, 21 May 95 14:44:43 -0500
Date: Sun, 21 May 1995 14:44:43 -0500 (CDT)
From: Jan E Backlund <back0003@gold.tc.umn.edu>
Subject: Tail Recursion in GCL 2.1
To: gcl@cli.com
Message-Id: <Pine.3.89.9505211428.A5309-0100000@gold.tc.umn.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII


While GCL 2.1 was building on my machine, I noticed several messages 
stating that a tail recursive call was being replaced by an iterative 
one.  I tried to emulate this by writing a minimal tail recursive 
function and compiling it, but the compiled function remained a recursive 
process.

How does one get the compiler to recognize a tail recursive call as an 
iterative process?

Jan Erik
back0003@gold.tc.umn.edu

From back0003@gold.tc.umn.edu  Sun May 21 19:12:11 1995
Return-Path: <back0003@gold.tc.umn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03410; Sun, 21 May 95 19:12:11 CDT
Received: from gold.tc.umn.edu by cli.com (4.1/SMI-4.1)
	id AA14031; Sun, 21 May 95 18:10:41 CDT
Received: by gold.tc.umn.edu; Sun, 21 May 95 18:10:32 -0500
Date: Sun, 21 May 1995 18:10:32 -0500 (CDT)
From: Jan E Backlund <back0003@gold.tc.umn.edu>
Subject: Re: Tail Recursion in GCL 2.1
To: Matt Kaufmann <kaufmann@cli.com>
Cc: gcl@cli.com
In-Reply-To: <9505212043.AA04191@thunder.cli.com>
Message-Id: <Pine.3.89.9505211721.A2971-0100000@gold.tc.umn.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII



On Sun, 21 May 1995, Matt Kaufmann wrote:

> If you execute the following before compilation
> 
> (proclaim '(optimize (safety 0)))
> 
> then I think (not sure -- sorry) you get tail recursion removal.  In fact, this
> seems to work with any safety other than 3 (i.e., you can use 1 or 2 instead of
> 0 above).
> 
> -- Matt Kaufmann
> 

Thanks for the tip.  I followed your suggestion, but the tail recursive 
call was still not being replaced.

So, I compared a few more functions (straight out of Abelson, Sussman and 
Sussman's "Structure and Interpretation of Computer Programs"):

(defun factorial (n)
  (fact-iter 1 1 n))

(defun fact-iter (product counter max-count)
  (if (> counter max-count)
      product
    (fact-iter (* counter product)
               (+ counter 1)
               max-count)))

--- roll the helper and main together: 

(defun factorial2 (n)
  (defun iter (product counter)
    (if (> counter n)
        product
      (iter (* counter product)
            (+ counter 1))))
  (iter 1 1))

It turns out that fact-iter is recognized as tail recursive but 
factorial2 is not.  It doesn't seem to matter what the saftey level is.


Jan Erik
back0003@gold.tc.umn.edu


From marks@sarnoff.com  Wed May 24 11:52:47 1995
Return-Path: <marks@sarnoff.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05023; Wed, 24 May 95 11:52:47 CDT
Received: from groucho.sarnoff.com by cli.com (4.1/SMI-4.1)
	id AA23366; Wed, 24 May 95 10:19:27 CDT
Received: (from marks@localhost) by groucho.sarnoff.com (8.6.9/8.6.9) id LAA09987; Wed, 24 May 1995 11:26:18 -0400
Date: Wed, 24 May 1995 11:26:18 -0400
From: "Aaron J. Marks" <marks@sarnoff.com>
Message-Id: <199505241526.LAA09987@groucho.sarnoff.com>
To: gcl@cli.com
Subject: Subscribe

subscribe

From richards@igor.music.qc.edu  Wed May 24 12:27:34 1995
Return-Path: <richards@igor.music.qc.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05038; Wed, 24 May 95 12:27:34 CDT
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA23602; Wed, 24 May 95 11:08:04 CDT
Received: from igor by aaron.music.qc.edu (NX5.67e/NX3.0M)
	id AA05077; Wed, 24 May 95 12:03:49 -0400
Received: by igor.music.qc.edu (NX5.67e/NX3.0S)
	id AA05542; Wed, 24 May 95 12:06:00 -0400
Date: Wed, 24 May 1995 12:05:57 -0400 (EDT)
From: "David N. Richards" <richards@aaron.music.qc.edu>
X-Sender: richards@igor
To: Gcl Mailing List <gcl@cli.com>
Message-Id: <Pine.NXT.3.91.950524120025.5527B-100000@igor>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hi - I'm on a NeXT m68k NeXTStep 3.2 - I just
finished building gcl-2.1 (thanks to Noritake YONEZAWA)
and now am trying  to build pcl. 
I did a "make -f makefile.gcl compile"
and everything goes well but then when I try to
make a "saved_pcl" I get the following:

Loading binary of ENV...
Warning: DESCRIBE is being redefined.
Loading binary of COMPAT...
T

>*** Exit 1
Stop.

As you can see after loading COMPAT it dies. Any help
will of course be very much appreciated. Many thanks!!

Dave

==========================================
        David Richards               
The Aaron Copland School of Music
       at Queens College   
E-mail: richards@aaron.music.qc.edu               
Voice : 1-(718)-997-3874
==========================================


From viola@salk.edu  Wed May 24 15:32:36 1995
Return-Path: <viola@salk.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05137; Wed, 24 May 95 15:32:36 CDT
Received: from salk.edu (helmholtz.salk.edu) by cli.com (4.1/SMI-4.1)
	id AA24172; Wed, 24 May 95 13:52:21 CDT
Received: from bayes.salk.edu by salk.edu (4.1/SMI-4.1)
	id AA12946; Wed, 24 May 95 11:52:20 PDT
From: viola@salk.edu (Paul Viola)
Received: (viola@localhost) by bayes.salk.edu (8.6.9/8.6.9) id LAA02269; Wed, 24 May 1995 11:52:21 -0700
Date: Wed, 24 May 1995 11:52:21 -0700
Message-Id: <199505241852.LAA02269@bayes.salk.edu>
To: gcl@cli.com
Subject: Redefining defun


I'm using GCL-1.1.

I want to do a very simple thing: wrap some functions around defun
(and defmacro, etc.) that define SOURCE-FILE and ARGLIST properites.
In AKCL 1-615 I used to be able to redefine defun to add the
properties (with some kludgey tricks).  I can't get that code to run
at all now.  I believe the problem results from the "special form"
status of the functions involved.

Has anyone done this (or the functional equivalent)?

Any advice??

Thanks,
Paul

From price@wam.umd.edu  Wed May 24 19:34:37 1995
Return-Path: <price@wam.umd.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05185; Wed, 24 May 95 19:34:37 CDT
Received: from pg2-srv.wam.umd.edu by cli.com (4.1/SMI-4.1)
	id AA24996; Wed, 24 May 95 18:11:06 CDT
Received: from next18pg2.wam.umd.edu (next18pg2.wam.umd.edu [128.8.73.28]) by pg2-srv.wam.umd.edu (8.6.10/8.6.9) with ESMTP id TAA03016; Wed, 24 May 1995 19:11:05 -0400
From: Sherwin Hugh Price <price@wam.umd.edu>
Received: (price@localhost) by next18pg2.wam.umd.edu (8.6.9/8.6.9) id TAA06185; Wed, 24 May 1995 19:11:03 -0400
Date: Wed, 24 May 1995 19:11:03 -0400
Message-Id: <199505242311.TAA06185@next18pg2.wam.umd.edu>
Received: by NeXT.Mailer (1.100.RR)
Received: by NeXT Mailer (1.100.RR)
To: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
Subject: Compilation Problems with gcl-2.1_part2
Cc: gcl@cli.com

Mr. Yonezawa,

Follow the advice of your letter "Re: Compilation Problems with gcl-2.1" I updated the  
gcl-2.1 source tree and edited the makefiles to allow use of gcc instaed of the NeXT cc.
The gcc used is the most recent version on prep.ai.mit.edu---v2.6.3,  the hardware  
Motorola 68040, the OS NS3.2.  


The results yield a large number of warnings and finally a "bus error".  The are included  
below in a uuencode gzipped text file:

begin 644 compile.lst.z.uue
M'XL(`$VWPR\``]U=6W/;-A9^UZ_`Z"6764F19#NV=I.9M$F[V4F33I-V\K`S
M,D1"$M<D#T-0ONSTQR]P<#ND[73:D,BVF<3&=PCB?+@#YP#,_/B4[9)\LIC.
MGSTO^(48/4Q2MLG*OS.-&,_S1R@J*D9%+C1GXQ]^_.[UFU?OGTUG195--C(]
M.;V8`IO.\FQ35%`W4SX><<G(4\DF0#&,=DG")B]_>??FV27DO,ERH>#Z[:N/
M'];OW_W\T[>OV.3UK*JS2]Z(65-4,TMZ!FRRO:JSAF]R,9%-G94[R=A$I?9.
MO3*=SO;ZEQ8PAY7F=9I='O+E-(FN>+/=;N$KZ"T.^5?)\.(KY#7=Y+7\*K6K
M-9MBUHHQ]JX\J(XP5Z*Z4(FRT"M&O&:?$B(@#1-(8P%2?X!%"C270!6#UP>C
MFI<J1!4:!C!+5-\KD_R0BNE>=>N\9/NV#+#/`^WQ_18E*4D=K[FPI3A3^>99
M.57E&D^CRA\D<57N-I$5;K(&JK@JFYM*R$I$SJBXY'E<C05/:I!Q=>;B.G+[
M22/G<%OS0L156=4BS1*52ERUM=B*6I1)9+5<RFQ7%J)L8H]$91J[LT3.8@)E
MFC49E+&'HHV:R"[BJLP:47.=U]B#;K4]1-99U;"+G,M#WF31)S0U!"9[5*D$
MJKO.TJIB\J;80#Y2P94-3U,V>>["?:^U/T//:61Z/1M??1*]W:FE.3]<=RND
MXLD%WPE3(Q:8*G$@8J%XE5@I7X'`)HO<-<M#L1$UZG3!%7M=,M4Z$CT<LO.L
MS)JU>?9@%2(MED]7[(K7I=*P8JE(LH+G>LJ0#2\;EDDF@>6\W@G6[+D2H.Q0
MZME:I%$SN-8KHNC%NDZ@B+Q5T5JYBK]W]>E0ITI-):Y+L5,:3:7ZF,=/_CSU
M*J./8:9>X^O,8T_96FG-8R]Q16B]9(I(]KSFB5J@F4G"0S--!!AS]@Q*<:J@
M).AJ0WPZZ"V176]89%<<#L5<<WB=9M41*!#2>28;0UB'#%D,121J]"%)JYH0
MW'.Y-P1UR!#$4$2"1A\2C*V:US6_N;6NQ?=L.\.P;64F'+.-68VFA4577XN=
MN*[JN..6BG)(FD,=V?;10)6+2Y%W&\-6J31-08=,0\!0Q'HP^K`16-6$8"UX
M:@CJD"&(H:@-1>M#@K%5;]3&XM.MC9!ZS8Z[&+2;(`S&W`(9A68#%%OY%NJ"
M-[>WB,V^Y(7?(QKD-HD61=TE.IUVFQB?PJ',KK?RQABS`U@MSLCB_?R'%Q]_
M?/'AGV]>O7V@VG@JMIE>HF,2,_Q90H.[E/VJM9MK]FI)K_XV>\%R2-`NQF"+
M6.VE+C,X2(;)H7DP<K:Y-`/>6_'Q0Q!TMCA:"#Q5FQLMUHRL6S!EVQH*DM)J
M<;+JIK5X2LNQTC;F<J<FWAU;ZG(XK_-TC<F;Q%32JA15QE4V6`6JTX@:_4:_
MS3$K+Q[<4K\\7?:C/M["O:XA\IRKRZO)K'/E_DHV45;+H]4(U?WKI]GWY4&?
MZE`I)A/]NS@YO9B4XKJ9+:8GT^7,)C+;R'2FNM6L4FO[0O>15N?ZYOW+V[U*
MO:(BSK^@+T7)R>+HKS].N-$QKE)^^;D&^4?J33U/=)6=_FW$NG\P43=X&-VJ
M;N^+2"(M%W_J[O"7*L>OU!D[V6U/33O1K%/>\+7:3BG!9Z=14A3=(IQ3@L%3
MR]),)KQ.)3M'PZ*=Q_S4I:V+37L"=2DNGY`4<=JK,ZD8;T1S)43IT^!ERG1H
M)^J(R]=#J2?TR"<,>+/V>VXVHK"[WGBO-SIKU2)%7?)<JEIMQ9XO3N^N+GU\
M2KKB;-?55=;LX=`PSA(NF\]I1S]">-Y5OCPY(<KK;+=OF-QGVT;5\D%Q>/Y,
MZ4J;/3;IJ&N;^E"NJQH2(<V$TL*=3$(ERK5JTZ5`@<ID._9\_N2>E=T"5W;V
MU?^?A5WY5=KT0<;V@VF-"[.;TJ$U>BH[E<NWJOS76`OUH6KN'Q1-6FHS=K9J
M);?\TNY%$SOJ,['C/A.[9]#_8XE]\9!$$SOK,['Y2:^I]5IJ\UZ+;?&DU]3F
MO::VZ#6U7KOHHM<^NNBUDRYZ;;V+7EOOHM=^NNRUA2Q[;2'+7EO(LM<Z7?9:
MI\M>1Z2C7D>DHUY'I*->V]M1K[W^J-<6<M1KG1[W6F['O9;;<:_E=MQON?4Z
M6I[T6@LGO8YO)[W6Z4FO=7K2:RT\[75\>_K%XUN\?9A*.[+=5I?"0`?)[E*G
M$CC(VED#\>Z=A.1"-"K;]VPHD_S:1,&5_7UF29\*GN'[4YMW20'-/L[GLX\@
ME:+CL_NRWBJ@>V-U"BC`IW3,\S2=G4P?@LS1.E.(0HKFP>\N6E[*;&8M7?O5
M2<MJ>U,)5F2RT(?5L=<%`EE1Y5F2-4B`F^L)O\GZKI>&(N_25!+I&>0WGH,*
M&A:J8AM0S:<YU&@)5#3BW>S0=D=M)L8.CC=!2W&UUF(E&;]^^WIM;GZ?BV0/
MYMXFV,N4@#<<P=T[A'`9$,P-/?#WY@`OLP'>,`-W[PO(92P@-Z2@=6\)S&4B
MP!L^T+YW`_8R#)`;*N#OC8"YS`'AA@6X>P_@[A2`.>H/_@`^^(/M@.?-P9\"
MAW!:&L(19J`'BR$<O'517(0<F?B#H^!.<P(]+@GD$"+8<WY@CM"!/=D&_@P9
M^--<0(Y803CW!/:<$9@C/&!/UH`[Q@+N1`F$4QI`3D]`.`<`UH<-Q+,,WI$(
MP=,!P<X/K&5^AY:I&(CQ%(Q%$ZQI$.PT!V'R`3\ZZ41#FP4<OGY5A9:RB6`/
MY.K?4UA-5835[@&S(M^>8:6EY^/1>6CB#_!\=J4[8*K;843;<>AF42VY:*2U
M:LU=<15'#7'^KKJ#-#(P=]/<1]:7QW-9#7A]_%WKZCTV?ZTZ&:D^S`+6GCCV
M_'D0]/VEB2X1J8JE\30,\B0,')B"6B/@P.I(>.QH>,'P1,S00YA8`:%B)8-S
MD4F=;42@8G%@8@4#$]%SG[LO;J@0B2-#1`/3R8#T&@,<"8,&UJ]G,<+`0<?!
MX8%9J%4D(6&1XV#AT!0@/>2^>5KD*1@X,`6U_B"E8)&C8.'`%/3RBG!PT)%P
M>&@6:AE'65CH65@\,`NUV',,=-!IU^'A-9/L6T3T1\E\LPT$5#BH5V!@Y?BA
M%*-;!YUJW,<,K%FM]?T@8(#7CFCH8L\AY-T`7_"(!I^F-X==F*,U"!.T1D-/
MA^76KYLP["=##<Q'D=1>4"W/HRUME3KSP0S#RD%'S.&!"T:K,9^6"#004QYF
MNSTXD405.N&!D-!`'(,%?B.!T-"XQ0.-"8,3$>4EH:$1(:%A!`KXA8K`04-*
M`LTK@[/8XF=>/`N$A`7B""RT/3R04(ART/:*P2ED6\(@VU("V>"3)WY&+L]*
M03D8`>5A),-SR?E&T+9I,&%B!#&(%"T:19M$$8-"JW]TND><WH'?V0L4%*(4
MM-UX<`H%KP@%C0@%#2-0T#9G2@(QI8&"X8EH@WS6&KN=A)!QHN'I-'Q'J&A$
M:&@8@0+0UD&7_Q9&H'!3T<$3(26A\?`LM)V=L$!(6"`>GL4EKPD)C0@'#2-0
MD)2!;!$8W#ZGE%S10?NJ-69?-79/HETL^A.O=E>BO2WI6ND9X*NM8:]X([4*
M12Y/V>0CFTBQTRX;D68-@JJ&AJW7'Y0N5E]=XS_TFR9U\P3=,Q-@-;_2J3"5
M),RL!Q'#SHV(P/H2,>P<B@B(5Q&Q<RW:Y*Q_$9%Q,IHDC*<1P\[=B(#Z'%'0
M<CP:7M3[:`FAS\XJ:7S,MC/21+4>200MMZ0E;'V3E@RZ!<T3XJ4TB5M7)0+O
MKS2/K-/2`.>Y-$EZ]Z5EOO,1O2/3(>?-]-BY-+W`.2F]0!+VP</I81[R0WR=
MIMZ\P].PIEY/DT7B^C0E;?R?&+9.4%,_SA-J7G/^15N;SB?J'GK'J&E-Q#MJ
M&H=QD=J7N:?KG:6VHK+0&KS;U!9X\)VB@#A0`S9>5%,0SI7JGUI_JL>=EYUG
MU2@G[E4CH#Y6DXVVH]741GC/I&M<KCZ\\,`Y7VUS=1Y84YS$#6L:./'%&CW>
MVZJQ&FS:'XQ'$?D:-B:3RVH6/%9.0CTD3F:&!8><S=QA;[5U`F-)]/&#A]!+
MK+N.L'#.*L+,N8V<Q+I-'/0>C$#,^A,<=I9U3]09N5E@^HG2_M2*;NV"(;*Q
MTQ&&:#?S]-"0I9&Q8\W(9JPM-3-\6V;6'JPM#.,?D86!+@B-989UA7X@"T(T
M6W1$8?0+0K.G[\A<BR09W-YZTV[[NL+BEL@/Z$3F)J8@PGU#1V36\)UW_6*Z
M4[!\=TODJS'(<,73$<FNY`H9N^E9!2>Y!FKVS@O;,[VC7J%K_;&0;#L1UZJI
M2G."['`VN]K*F4SV(M=G&L<^7IE,+D4MU:PUON-EO_!@8W-\P`O&N(3!$4&S
M4DV1_<K<V8RQ'+]\\>'5^!>3\L-S'5</!_P_6MGYU`NR$@6/V+D^D7&^&]N#
M'%Z/#_@S'GI@DZQYY'X_5!W_$UZ`58-[O5H]3I+';-SK.FG\.Y3<\;*E/I;?
M?_OFY>N?[E)K,SZ6#U,]!&M':37)BLKHE9G2J&/:JGK,N@48HJ@RAOJ.B+;H
M'W44>,4K16XRQY_C[DOCE8YF_SQG6P#\*HU;I<[(HL_+F#Y*EV8UN[.4V3]T
M*B.EC3W\_NW/[%LH"BC9&\7J$6,OU"LYFY^='3&V7#P].6656N7(D?[2A[XE
MZB8-U*3;WNBU/D7)\^R_Y#$Y%W'7XY93_JX(9G=XUQ/OO^T0XH<&M`@IR?V*
M'9\M%NP;?8)2+P-&CQ\_9J^NU7)ZOCP=O=?I$Y$5S(_/PG_@,OH?PU#,I,]E
"```M
`
end
 

From price@wam.umd.edu  Thu May 25 02:36:49 1995
Return-Path: <price@wam.umd.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05455; Thu, 25 May 95 02:36:49 CDT
Received: from pg2-srv.wam.umd.edu by cli.com (4.1/SMI-4.1)
	id AA26067; Thu, 25 May 95 01:07:43 CDT
Received: from next18pg2.wam.umd.edu (next18pg2.wam.umd.edu [128.8.73.28]) by pg2-srv.wam.umd.edu (8.6.10/8.6.9) with ESMTP id CAA20712; Thu, 25 May 1995 02:07:40 -0400
From: Sherwin Hugh Price <price@wam.umd.edu>
Received: (price@localhost) by next18pg2.wam.umd.edu (8.6.9/8.6.9) id CAA08284; Thu, 25 May 1995 02:07:39 -0400
Date: Thu, 25 May 1995 02:07:39 -0400
Message-Id: <199505250607.CAA08284@next18pg2.wam.umd.edu>
Received: by NeXT.Mailer (1.100.RR)
Received: by NeXT Mailer (1.100.RR)
To: richards@aaron.music.qc.edu
Subject: Compilation Problems with gcl-2.1_part3
Cc: gcl@cli.com

Mr. Richards,

Upon the receipt of the lastest patch from Mr. Yonezawa I succeeded in compiling  
gcl-2.1up to this point :
	Make of GCL 2.1 completed.
However the compilation was not "clean"---still a lot of warnings the seriousness of I am  
not sure.   Also the portion of  the compile dealing with the making of the Tcl/Tk interface  
failed in the creation of  gcltkaux.  Please what am doing wrong and why has the NeXT  
become so difficult to build applications on, it was not like this in NS2.1.  


The dialogue is shown here as a uuencode of a gzipped text file.  In it you will note that the  
compile halted and then is continued, well that came about by my inserting:
	typedef int	pid_t;
at  line 30 in the file guis.h (Was that proper or is that failure an indication of deeper  
problems)

begin 644 gcl_compile.lstg.z.uue
M'XL(`!`=Q"\``^T::W,;M_$[?P5RZ0PE=4A&<NH'$WLJ2Y3#E'I4E&-WZ@QU
MO,.1B(Z',X#3(]/^]^[B=3CR1*=QIY,/SB0B=K$O+'87"UP.OGE&%DG>.^CO
MOWRUBF]H9R=)R9P5WQ&$2)SGNQJU*DF(<J-]$IU>G(PGH^G+_F!5LMY<ID^?
MW_0YZ0]R-E^57*A^''7$BO0R4F,ZL2`?DP`!"F8INZWR)\"+P#S+,@YC&*ZJ
MW.!7Y8'!I/-<2(O2@)E?%!5(W._SCH@+&(4*C05\D("519)7*>TO84EY099-
M'-?KY1NK+>C=C!5,]1,2C<_&,[/J:YHLP8J8%:`?B'F"=LSQ+[A1\1(&ZJ&D
MLJ2(H[=QKA<8)X)+&.7T'O[.4QR33,0K"H-2T)0EL<*QH!D5M$AP3&(IV:)8
MT4(A$RM2+0$!DO`B98KQ0BN8@R&X"TQ1$2/6*"VSJM#R^0)]5^6*68-`6[*$
M@7Q8S3EB$D-*P#=QA3:6<7(3+ZA6C-RDJ%9S*F`$@QF:;(<)7Y5V?A8+II86
M+XU$0^((<FT)CF#+4`)U+"19QB).E%9!)/U8.2_D3.*2E[%$NEB(^$&3*,&*
MA7;9@MZ7R`:H*E&50#;8BYS>4KW:C.7&MS&JG,/*/B*Z!`$H.>-B%2N]9K4L
MS)Z0JF#WF7S`C=+#6*(H*@07;EHQ38K#FE#&MYH?5I^S`C<%QK&:U>96!;B/
M)U3J("AJPDIJ3^,/!GZE6"[-1MY0XTP)VTR51A(,SED)[M,0(?\"IZ6D1TE7
M#C_T^;`/!,-%EUB4CV<^1.QUU+FN0[Q+F"15"4XC*<:A31\H%9!2/GT="*N7
M5%AIQ"6?)\9\RF6Y7E(@LD#A.A9=ABEK\>B]=`:B=CLY+.8]Z4FZ0/=`AB@-
M@.L4F<VN1N^OB+B[U_]A[1DD0GVC7=$#'\=W*(3T^P,^L-FJQRYE-6#S5H]=
M\FH@R&`-NS2VXFPN:\@DM!%ALEJ/76IK(,QOC6@DN;$KS'1KD,X/JT1YRF;B
M&U*;_1IHE`!KL*T#UAB=@F8FJ`A&N"T+&O"UP4S9`F$`5R6,2%\JK.4+3^B+
MAH-<Y?"P*Q\>X0J"1\C`^KJ:>#"OUQ/4%;-OOK@8J\,*8Y88E!GC:5-K]-@6
M'+,_KNH8-I?+=C==_7&3O@B9:`HJD0D.4XXL<^S-]87);A2KH\&7*.OPNDYI
M1%"L:MA4+.,(5[;\K*U='EYC=E7,*`]*F4&$]<PLHUG4S&[4?$:N*6]^?.`!
M5^ALN+IJ9]P9E#P3X$'=,WI\94-X5:XU)AH5=!Y:#-2G04HSG<N&"#&8YV%Z
M(\Z4!0>M>%JYS4,8HQFKGD=(JK*`7L=-@P`RG0I5PV"%B9B`*Z4R$6P>Z&&\
M(03#U""\84PV*"`5&C#F:),#8C\T^V.#7$&BT)`XYPT_I'1>+0+SBLRZT51Y
MTV+!YM-U+.[U.@[+K95=(^OZ%^#J0E<C$ZCI&]Q!(:N1M+C=0-75KT9FIMXV
M<2XB@P5F&YQY/*<;R\OCU0;*%_0`YPZF&@65>P.%)7N#%P\K%F\Z-EYLH/PV
MUKC;6*R3W<IUS)VV&,H$'JPX[.4(2/A=N=3T+0!`]["!`Y;UZ#W$JB20\6)0
MO1C<97(@DR7-H0R3R-,52>^6"@G'5M3"[+L"$IG&Q".B#NRT:870+(A%Z(-<
M(Q3)Z/CP:A3]9"3O7",MUH/X%U1VW?<(5FC$+KG&]N=Z$=FNR>OQ`]]08663
M1.VZWQW(_(\$3S.H[F(XW$N2/1(MDH3TCG\ZG[R\Y3D<RSDEO3&6]EO0,U!0
MF>QU;,!A77=P7,7SG/9,<971?R&UA=G:&LDW1Y/C\66;6KO22.ZD6'2QURY[
M;%4:O9*!1J2T>[-'UCU6DX!3N6@AM+[>75/@%0_!N-Z^_ANM,T5#)"/D%;3H
MT&C"C&L7!T&'YW$0BFR>,D%:'4R^1RD=4$1VWIR])4=\M>(%F8!!NX0<`DM.
M]E^\^):0)P?/GCZ'R\""RD[.XQ2\Z4\(K0GCK#.&H(.<8[\&T_61TCH=GB^M
M!#H[6V?<P;-N4%PICBAM4N?5U]]'1^>G%W!7O8S<%>Y5I^-P.#_]Q_1J=!K.
M&LRK/:`Z/3P[[AU>OIGN>32PO)TVQ2%N,IY>A#B$M?C)^7EC0B->/76#-G&3
M>DVX6^IFH&YZKJO$A9U`ALLE9'7^*<HK$-?F/W]0MWK7G-JM4_4)WCYMC_/'
MPL&=[8_,NW.^==H>^JUSO@-HCQ;;#;1.NM:@==+W"8_XZ>/C,X^SV6ZBG=%T
M%AMSFXW$%A+353SB8]VIM#M8MRU;Y)K.9`N!Z5*V$9B690N%Z5^V$NA>9@N%
M;FRVS>LN9PN!Z7BV$6#[LVV/VM)GHR_:2K':/O\)`W7WM&5>MU+;YDU?M87"
M]UC;XB5N"[6U[FO+O.[$MLVW'1S-'JT3%--P^:S0]?%=+`J8'1)[)/3P71-?
M?^84F:!*T@RR+>UO4&XG.AY/#Z?3T>GK1PC;*GB+>9O&YQ!Z,WTM?^P@:"5L
M]0(O/RDEH)ILGK2/<C<(O%/P3.R-3R\FH]/1V=7AU?C\K/?3Z'(*OZU.TD]@
MT.RMXB*U3W#8"&.?<V\'AH854D'9Z%E:?*&>7AU.)K/)^/4,6KV7;1U01**+
MR]')^/WC%)T=_;X=??T5OC\-Y#(BWQ&B<?2>)NV-E>^_ZC;]PP?/U\47.6C*
MNI]@WN`QO=PC;!O46.)(]T.W&W2N^-AWUUO\RLJ2ICU\==F#1AV(#/=V9N@K
MP`(1BX<]F(JT]A\O!V^*2K\VJIL/4=?*"D01I/WPI[]^B,@NM*VMMMN=_*YC
MN+[N$JZ6<!N"N(/660YAZ1!8Q*B$EK7/(X?Z10=8Y"R.=G[AE#S9C;KDU79E
MG60)'22)_WR_G0R?9#'4S*>2GL38=B'8-R^V]B'7?1]*>)[31&5P/NQVK@-H
MXTW9O@L[1G/X`H\9;)"?(A'/"#;L8**^!,$I@'G",O)/$O4F^E*);\^]_/T^
MQ/=7+Q%;%3<%ORL<\F=0"/XMB.=J;B70J9M-7L3]#"&F6=%TTV]:ZW?A-V/Z
M3^?S[GBDE^"_$(5C\/72_/`:TFNTGZL0#(QW6$(6%9/]!$X&_:F#V(F49(*O
M[.3PV=-A1P^7PR<OAM!^"TG-]PPH1!D7E%R7+)VI;DAUYTI9P>%6O6*POW!G
M@EL:A:H#FV/:6P(R()%YX5B_?43!O[LAA1<.&QX3707URS9^ZD&%V'VA:*FX
M@/Z>)#ETV[]YD4__\L@B8T&+>I5(]OL,L0*>';3KV>N&%)^A(AF^>/(;EF+(
M/DL/0=]61:(9KO%0[@[=W/[!\Z&+$-CLE`(G'%UD)V-"*OPB!*D"*>SX=QN,
M.Z,X689L+`7+6<:@[@&3H'@&`)H7^0/\26B#&U9+*`KPQC%%8JCJX!.(@WY3
M5ZNGO)/VGWR+Z_B-:]C;VR.C>]"VWYEB\Q8@>I_ZYV1\.;TB)X?CR=O+D64_
M^.;Y__$#_)?/WU\^?W_Y_/T[/G__CSYA7_OQAH8OK?Z75O]+J_^EU?^]K?X?
MP!)U<UB68UU`_QCFG&)?DIBR">K4#1SE)#HZLFW+9]H8'C"0+@HD)&1(\#0Q
MR-[K``D'S&?JTQO-`R]SMT2._XN37^!Z;I#6L(>D;I^X:7[(;7['S=,A>5O8
M]RG;+<EA9_;^O*3%,9-E'C\`=$S!:/[P#EHT?J=AS-XC7BAZKP`^C4L_=\FY
M\@"09&P!'4N-@2Y%U>`4SIE:SMMB%4@ZY;<UX265[%?:F%M#3:G5^YJ+E(IW
M+%5+5+B,BX6E.E3@^WFEJ&S00\.T$!SN"^W8"W8/9FUJV,1XRF/MT:-*2-X@
M.X+KM3`D)X"H5WY),T'E\F_T8<YCD8)#H8=?(%E>25S&Z!;:9/GWBE8TU:NB
MR<TXTU@`ST"*'_-SE`^DXN&"0PNH+7U;+$0\K^$W&Y#3[8D#Q$6ET!].Q1NW
MG@O!2RK4@UGCE.*!`0??^5VAQ<+Z;F':XWWH!'QF?QJ"D'I<E)724)$ZM5.=
M.1/HEZ_X%:RXJ?W=Z1GTMF8\AOM##5U!,RX9R#CAX@=F1%%U9)LSRWR4(\4I
MW$)AYP!YB+>?([P]!RP!B"I85N?$.^CS4Q'?>83>@"M!49BV`&H$Q#H$"BMB
M$X):QQ2"&&5*OPP,D=RA]$X;H=X/2.7G=4+YR#OBY<-%'NLE'(,YQF<ZWO+\
M$AP+WLZIA2]X_K#0VX)LAR`))\!D+P[=/+I7U.A"R.=5#G>;.CUC)H,DQSDK
M#J(HX2F]XC"``@.8"><W5>D-@V`ZY:E^*@C"'HQP6&,)ANB4BML@FCTXQC`N
M#A77XB$^?N!2&PRR$6M#P2C6.>B<CS.IPUS@PT)CV@%HCA[;31KA/>D'B)Y<
MZ[^$F]=KIL!0\"KUFV)1@J^.8Q5[])LC*U$/P,3Q"FZB-E2GYX(M6&$WZ%`D
M=A_#K4.XGIE`O,I@K!<:ISK\3K@.&%1FAZ`.1T'J-&,+62VIM39_*)>^DH71
@YI':.P;8\I[R"&+K$\MT='1^=NS?6/X#K=&(LM\P```+
`
end

Any assistance in all of this would be greatly appreciated.
Thank You,
price





From Michal.Spalinski@fuw.edu.pl  Thu May 25 12:23:41 1995
Return-Path: <Michal.Spalinski@fuw.edu.pl>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05560; Thu, 25 May 95 12:23:41 CDT
Received: from sunic.sunet.se by cli.com (4.1/SMI-4.1)
	id AA27064; Thu, 25 May 95 10:41:40 CDT
From: Michal.Spalinski@fuw.edu.pl
Received: from cocos.fuw.edu.pl by sunic.sunet.se (8.6.8/2.03)
	id RAA11800; Thu, 25 May 1995 17:41:18 +0200
Received: from albert2 (albert2.fuw.edu.pl) by cocos.fuw.edu.pl (4.1/SMI-4.1)
	id AA03731; Thu, 25 May 95 17:35:18 +0200
Received: by albert2 (4.1/SMI-4.1)
	id AA18530; Thu, 25 May 95 17:35:17 +0200
Date: Thu, 25 May 95 17:35:17 +0200
Message-Id: <9505251535.AA18530@albert2>
To: gcl@cli.com
Subject: problem compiling gcl


Hello,
I was compiling GCL-2.1 on Linux (1.2.8) and while gcl was made ok, I got
the following when it came to the tk stuff:

---------------

make[1]: Entering directory `/usr/src/gcl-2.1/gcl-tk'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   guis.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkAppInit.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkMain.c
make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
-I/usr/src/gcl-2.1/o -fsigned-char | sed -e 's: -static : :g' -e
's:-Bstatic : :g`"
/bin/sh: unexpected EOF while looking for `''
/bin/sh: command substitution: line 2: syntax error
make[2]: Entering directory `/usr/src/gcl-2.1/gcl-tk'
guis.o tkAppInit.o tkMain.o -o gcltkaux -L/usr/X11/lib -lX11 -L/usr/lib
-ltcl  -L/usr/lib -ltk -lm  ../o/gcllib.a
make[2]: guis.o: Command not found
make[2]: *** [gcltkaux] Error 127
make[2]: Leaving directory `/usr/src/gcl-2.1/gcl-tk'
make[1]: *** [gcltkaux1] Error 2
make[1]: Leaving directory `/usr/src/gcl-2.1/gcl-tk'
make: *** [all] Error 2
prospero:/usr/src/gcl-2.1#

-------------------

What can I do?

Best regards,
Michael.

From Michal.Spalinski@fuw.edu.pl  Thu May 25 13:30:40 1995
Return-Path: <Michal.Spalinski@fuw.edu.pl>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05576; Thu, 25 May 95 13:30:40 CDT
Received: from sunic.sunet.se by cli.com (4.1/SMI-4.1)
	id AA27447; Thu, 25 May 95 12:00:22 CDT
From: Michal.Spalinski@fuw.edu.pl
Received: from cocos.fuw.edu.pl by sunic.sunet.se (8.6.8/2.03)
	id TAA23200; Thu, 25 May 1995 19:00:17 +0200
Received: from albert4.fuw.edu.pl by cocos.fuw.edu.pl (4.1/SMI-4.1)
	id AA04674; Thu, 25 May 95 19:00:12 +0200
Received: by albert4.fuw.edu.pl (4.1/SMI-4.1)
	id AA10747; Thu, 25 May 95 19:01:35 +0200
Date: Thu, 25 May 95 19:01:35 +0200
Message-Id: <9505251701.AA10747@albert4.fuw.edu.pl>
To: gcl@cli.com
Subject: compiling gcl



Hello,
I was compiling GCL-2.1 on Linux (kernel 1.2.8, gcc 2.6.3) and while gcl
was made ok, I got the following when it came to the tk stuff:

---------------

make[1]: Entering directory `/usr/src/gcl-2.1/gcl-tk'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   guis.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkAppInit.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
-fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkMain.c
make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
-I/usr/src/gcl-2.1/o -fsigned-char | sed -e 's: -static : :g' -e
's:-Bstatic : :g`"
/bin/sh: unexpected EOF while looking for `''
/bin/sh: command substitution: line 2: syntax error
make[2]: Entering directory `/usr/src/gcl-2.1/gcl-tk'
guis.o tkAppInit.o tkMain.o -o gcltkaux -L/usr/X11/lib -lX11 -L/usr/lib
-ltcl  -L/usr/lib -ltk -lm  ../o/gcllib.a
make[2]: guis.o: Command not found
make[2]: *** [gcltkaux] Error 127
make[2]: Leaving directory `/usr/src/gcl-2.1/gcl-tk'
make[1]: *** [gcltkaux1] Error 2
make[1]: Leaving directory `/usr/src/gcl-2.1/gcl-tk'
make: *** [all] Error 2
prospero:/usr/src/gcl-2.1#

-------------------

What can I do?

Best regards,
Michael.


From bb@research.att.com  Thu May 25 13:34:47 1995
Return-Path: <bb@research.att.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05580; Thu, 25 May 95 13:34:47 CDT
Received: from research.att.com by cli.com (4.1/SMI-4.1)
	id AA27489; Thu, 25 May 95 12:05:08 CDT
Received: by research.att.com; Thu May 25 13:04 EDT 1995
Received: (bb@localhost) by bbsgi.research.att.com (940816.SGI.8.6.9/8.6.4) id RAA03530; Thu, 25 May 1995 17:06:32 GMT
Date: Thu, 25 May 1995 17:06:32 GMT
From: Bruce Buntschuh <bb@research.att.com>
Message-Id: <199505251706.RAA03530@bbsgi.research.att.com>
To: gcl@cli.com
Subject: unsubscribe

thanks	

	Bruce Buntschuh
	Interactive Systems Research Dept.
	AT&T Bell Laboratories
	rm 2D427
	Murray Hill, NJ. 07974
	(908) 582-4325
	bb@research.att.com

From cs942002@ariel.cs.yorku.ca  Thu May 25 18:59:09 1995
Return-Path: <cs942002@ariel.cs.yorku.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05630; Thu, 25 May 95 18:59:09 CDT
Received: from red.ariel.cs.yorku.ca by cli.com (4.1/SMI-4.1)
	id AA28447; Thu, 25 May 95 17:19:59 CDT
Received: by ariel.cs.yorku.ca (8.6.12/YU_CS_869.1.2.Ariel)
	id SAA08395; Thu, 25 May 1995 18:19:52 -0400
Received: from blue by red with SMTPD id <8394>; Thu, 25 May 1995 18:19:52 -0400
Received: by blue (4.1/YUCS_Sun_sub)
	id AA28127; Thu, 25 May 95 18:19:52 EDT
Date: Thu, 25 May 1995 18:19:51 -0400 (EDT)
From: "Daniel C. Stoica" <cs942002@ariel.cs.yorku.ca>
To: gcl@cli.com
Subject: Re: problem compiling gcl
In-Reply-To: <9505251535.AA18530@albert2>
Message-Id: <Pine.SUN.3.91.950525181112.26843C-100000@blue>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII


On Thu, 25 May 1995 Michal.Spalinski@fuw.edu.pl wrote:

> 
> Hello,
> I was compiling GCL-2.1 on Linux (1.2.8) and while gcl was made ok, I got
> the following when it came to the tk stuff:
> 
> ---------------

	[some lines deleted]

> 
> -c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkAppInit.c
> gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/gcl-2.1/o
> -fsigned-char
> -c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkMain.c
> make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
> -I/usr/src/gcl-2.1/o -fsigned-char | sed -e 's: -static : :g' -e
> 's:-Bstatic : :g`"
> /bin/sh: unexpected EOF while looking for `''
> /bin/sh: command substitution: line 2: syntax error

	[some lines deleted]

> 
> -------------------
> 
> What can I do?
> 
> Best regards,
> Michael.
> 

Hi,

You have just to go in `gcl-tk' subdirectory and in `makefile' to change
the lines:

	gcltkaux1: $(GUIOS)
	        make gcltkaux "CC=`echo ${CC} | sed -e 's: -static : :g`"

to read: 

	gcltkaux1: $(GUIOS)
        	make gcltkaux "CC=`echo ${CC} | sed -e 's: -static : :g'`"

In other words you have just to add a single-quote (') after the last `g'
and before the last back-qoute (`). I hope that will do it.

Best regards,

Daniel.

From back0003@gold.tc.umn.edu  Thu May 25 19:33:03 1995
Return-Path: <back0003@gold.tc.umn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05635; Thu, 25 May 95 19:33:03 CDT
Received: from gold.tc.umn.edu by cli.com (4.1/SMI-4.1)
	id AA28630; Thu, 25 May 95 18:24:25 CDT
Received: by gold.tc.umn.edu; Thu, 25 May 95 18:24:14 -0500
Date: Thu, 25 May 1995 18:24:13 -0500 (CDT)
From: Jan E Backlund <back0003@gold.tc.umn.edu>
Subject: Re: problem compiling gcl
To: Michal.Spalinski@fuw.edu.pl
Cc: gcl@cli.com
In-Reply-To: <9505251535.AA18530@albert2>
Message-Id: <Pine.3.89.9505251850.A9937-0100000@gold.tc.umn.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII



On Thu, 25 May 1995 Michal.Spalinski@fuw.edu.pl wrote:

> 
> Hello,
> I was compiling GCL-2.1 on Linux (1.2.8) and while gcl was made ok, I got
> the following when it came to the tk stuff:

[stuff deleted]

> make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
> -I/usr/src/gcl-2.1/o -fsigned-char | sed -e 's: -static : :g' -e
> 's:-Bstatic : :g`"

This line of the tcl-tk/makefile should read:

 make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
 -I/usr/src/gcl-2.1/o -fsigned-char | sed -e 's: -static : :g' -e
's:-Bstatic : :g'`"
               ^^^
                ^
> Best regards,
> Michael.

Jan Erik 
back0003@gold.tc.umn.edu

From Michal.Spalinski@fuw.edu.pl  Fri May 26 05:41:09 1995
Return-Path: <Michal.Spalinski@fuw.edu.pl>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05874; Fri, 26 May 95 05:41:09 CDT
Received: from sunic.sunet.se by cli.com (4.1/SMI-4.1)
	id AA29675; Fri, 26 May 95 04:20:28 CDT
From: Michal.Spalinski@fuw.edu.pl
Received: from cocos.fuw.edu.pl by sunic.sunet.se (8.6.8/2.03)
	id LAA04405; Fri, 26 May 1995 11:20:24 +0200
Received: from leo.fuw.edu.pl by cocos.fuw.edu.pl (4.1/SMI-4.1)
	id AA10493; Fri, 26 May 95 11:20:19 +0200
Received: by leo.fuw.edu.pl (4.1/SMI-4.1)
	id AA02566; Fri, 26 May 95 11:20:41 +0200
Date: Fri, 26 May 95 11:20:41 +0200
Message-Id: <9505260920.AA02566@leo.fuw.edu.pl>
To: gcl@cli.com
Subject: where is gcl.texi


Hello,

in ftp://math.utexas.edu:/pub/gcl I found gcl.info.tgz, which contains info
files on GCL (gcl.info). Is the texi source (or a dvi file) available
somewhere? 

Best regards,
Michael.

From cs942002@ariel.cs.yorku.ca  Fri May 26 18:42:00 1995
Return-Path: <cs942002@ariel.cs.yorku.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06291; Fri, 26 May 95 18:42:00 CDT
Received: from red.ariel.cs.yorku.ca by cli.com (4.1/SMI-4.1)
	id AA01743; Fri, 26 May 95 17:27:46 CDT
Received: by ariel.cs.yorku.ca (8.6.12/YU_CS_869.1.2.Ariel)
	id SAA27801; Fri, 26 May 1995 18:27:45 -0400
Received: from blue by red with SMTPD id <27800>; Fri, 26 May 1995 18:27:44 -0400
Received: by blue (4.1/YUCS_Sun_sub)
	id AA04966; Fri, 26 May 95 18:27:44 EDT
Date: Fri, 26 May 1995 18:27:43 -0400 (EDT)
From: "Daniel C. Stoica" <cs942002@ariel.cs.yorku.ca>
To: gcl@cli.com
Subject: Re: where is gcl.texi
In-Reply-To: <9505260920.AA02566@leo.fuw.edu.pl>
Message-Id: <Pine.SUN.3.91.950526175840.3097B-100000@blue>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII



On Fri, 26 May 1995 Michal.Spalinski@fuw.edu.pl wrote:

> 
> Hello,
> 
> in ftp://math.utexas.edu:/pub/gcl I found gcl.info.tgz, which contains info
> files on GCL (gcl.info). Is the texi source (or a dvi file) available
> somewhere? 
> 
> Best regards,
> Michael.
> 

Hi, 

If I am not mistaken, the file `gcl-info.tgz' contains rather a conversion
to GNU info format of the draft proposal for ANSI Common Lisp. The `.texinfo'
and implicitly the `.info' files for the GCL specific implementation details,
and the GCL<->Tk interface, I guess, are contained in the main distribution
file, `gcl-2.1.tgz', and are expanded in the subdirectory named `info'. (At 
least, I got them there.) 

Now, if you are interested, in the TeX source files and possibly the `.dvi'
documents for the last released ANSI CL draft, these can be found by ftp
at `parcftp.xerox.com (13.1.64.94)' in directory `/pub/cl/dpANS3/'.

As a last idea, if you are an "emacs" user and run X Window, look for a file
called `ansi-doc.el', I guess in the `doc' subdirectory. This will allow you
searching and displaying information on CL topics directly from the `.dvi' 
files using `xdvi' viewer.

Best regards,

Daniel.




From guru.stgt.sub.org!nils@delos.s.bawue.de  Fri May 26 20:11:51 1995
Return-Path: <guru.stgt.sub.org!nils@delos.s.bawue.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06302; Fri, 26 May 95 20:11:51 CDT
Received: from delos.s.bawue.de by cli.com (4.1/SMI-4.1)
	id AA01894; Fri, 26 May 95 18:47:31 CDT
Received: from guru.stgt.sub.org by delos.s.bawue.de with uucp
	(Smail3.1.28.1 #3) id m0sF962-000BHhC; Sat, 27 May 95 01:47 MET DST
Received: by guru.ims.uni-stuttgart.de (Smail3.1.28.1 #21)
	id m0sF8uq-0003VXC; Sat, 27 May 95 01:35 MET DST
Message-Id: <m0sF8uq-0003VXC@guru.ims.uni-stuttgart.de>
Date: Sat, 27 May 95 01:35 MET DST
From: nils@guru.ims.uni-stuttgart.de (Cornelis van der Laan)
To: gcl@cli.com%delos
Subject: bug in the pretty-printer
Reply-To: nils@guru.ims.uni-stuttgart.de

Hi all, 

The pprint function in akcl 1.624 and maybe newer version of gcl seems
to be buggy under some circumstances. It destructively modifies
strings to be printed. The function print does things correctly.

Try this:

(defun tmpnam (&optional (base "tmp") (type "tmp") &aux tem)
  "Generate a string to be used as a filename for temporary files.
Two optional arguments may supply the base name and the extension."
  (declare (type string base tem))
  (dotimes (i 32000)
    (unless (probe-file (setq tem (format nil "~A/~A~A.~A"
					  (or (si:getenv "TMPDIR") "/tmp")
					  base i type)))
      (return-from tmpnam tem)))
  (error "32000 temporary names already used!"))

(tmpnam "bla")
; result is "/tmp/bla0.tmp"
(pprint (tmpnam "bla"))
; result is "/tmp/bla0.tmp
; "
; note that a newline has been inserted
(print (tmpnam "bla"))
; result is "/tmp/bla0.tmp" "/tmp/bla0.tmp"
; (the first is printed, the second string is the result of print)

; also note the destructive behaviour of pprint:
(pprint (setq a (tmpnam "bla")))
; result is "/tmp/bla0.tmp
; "
; including the newline
a
; result is "/tmp/bla0.tmp
; "
; including the newline

Can somebody please investigate this problem?

Thanks, Nils
----------------------------------------------------------------
Cornelis van der Laan -- nils@ims.uni-stuttgart.de
                      -- nils@guru.stgt.sub.org
# echo echo Knusper Knusper Knaeuschen > /etc/nologin


From richards@aaron.music.qc.edu  Sun May 28 00:41:01 1995
Return-Path: <richards@aaron.music.qc.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06803; Sun, 28 May 95 00:41:01 CDT
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA04008; Sat, 27 May 95 23:38:57 CDT
Received: by aaron.music.qc.edu (NX5.67e/NX3.0M)
	id AA03130; Sun, 28 May 95 00:34:40 -0400
Date: Sun, 28 May 1995 00:34:37 -0400 (EDT)
From: "David N. Richards" <richards@aaron.music.qc.edu>
X-Sender: richards@aaron
To: Gcl Mailing List <gcl@cli.com>
Subject: Can't make PCL
Message-Id: <Pine.NXT.3.91.950528003236.3105A-100000@aaron>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Hi - I'm on a NeXT m68k NeXTStep 3.2 - I just
finished building gcl-2.1 (thanks to Noritake YONEZAWA)
and now am trying  to build pcl. 
I did a "make -f makefile.gcl compile"
and everything goes well but then when I try to
make a "saved_pcl" I get the following:

Loading binary of ENV...
Warning: DESCRIBE is being redefined.
Loading binary of COMPAT...
T

>*** Exit 1
Stop.

As you can see after loading COMPAT it dies. Any help
will of course be very much appreciated. Many thanks!!

Dave

==========================================
        David Richards               
The Aaron Copland School of Music
       at Queens College   
E-mail: richards@aaron.music.qc.edu               
Voice : 1-(718)-997-3874
==========================================

From lnm@stsn.dga.fr  Wed May 31 09:40:29 1995
Return-Path: <lnm@stsn.dga.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00654; Wed, 31 May 95 09:40:29 CDT
Received: from asterix.stsn.dga.fr (mailhost.stsn.dga.fr) by cli.com (4.1/SMI-4.1)
	id AA12274; Wed, 31 May 95 08:07:18 CDT
Received: (from lnm@localhost) by asterix.stsn.dga.fr (8.6.9/8.6.9) id PAA00721; Wed, 31 May 1995 15:06:27 +0100
Date: Wed, 31 May 1995 15:06:27 +0100
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199505311406.PAA00721@asterix.stsn.dga.fr>
To: gcl@cli.com
Subject: [Q] Best CLOS for gcl-2.1 ?

Hi,

As it has many free implementations of CLOS, which one is best
suitable for gcl-2.1 ? And where can I fetch it?

Thanx,

Marc LIGNON
________________________________________________________________________
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 45.59.20.40


From levan@eagle.eku.edu  Wed May 31 10:54:36 1995
Return-Path: <levan@eagle.eku.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00673; Wed, 31 May 95 10:54:36 CDT
Received: from eagle.eku.edu by cli.com (4.1/SMI-4.1)
	id AA12443; Wed, 31 May 95 09:09:16 CDT
Received:  by eagle.eku.edu (5.59/25-eef)
	id AA17918; Wed, 31 May 95 09:06:08 EDT
From: Jerry LeVan <levan@eagle.eku.edu>
Message-Id: <9505311306.AA17918@eagle.eku.edu>
Subject: Need Help for SSE
To: gcl@cli.com
Date: Wed, 31 May 1995 09:05:58 -0400 (EDT)
X-Mailer: ELM [version 2.4 PL23]
Content-Type: text
Content-Length: 506       

Help,

I am trying to build gcl-2.1 on an AT&T StarServer E
(a dual processor 486 machine running SYS V rel 4.04).

I am using the "ncr" hints file. This file defines
UNIXFASL to be dummyfasl.c. Regetably this file is
not in the distribution. Consequently the compilation
of unixfasl.c fails.

Can I get a copy of dummyfasl.c ? It did not appear
to be in any of the earlier distributions I have downloaded.

I am not a member of the list, so please reply directly...

--Jerry LeVan
  levan@falcon.eku.edu


From billm@jacobi.maths.monash.edu.au  Fri Jun  2 23:23:11 1995
Return-Path: <billm@jacobi.maths.monash.edu.au>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01607; Fri, 2 Jun 95 23:23:11 CDT
Received: from jacobi.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA28481; Fri, 2 Jun 95 22:18:30 CDT
Received: (billm@localhost) by jacobi.maths.monash.edu.au (8.6.8/8.6.4) id NAA09177 for gcl@cli.com; Sat, 3 Jun 1995 13:18:26 +1000
Date: Sat, 3 Jun 1995 13:18:26 +1000
From: WE Metzenthen <billm@jacobi.maths.monash.edu.au>
Message-Id: <199506030318.NAA09177@jacobi.maths.monash.edu.au>
To: gcl@cli.com
Subject: Semi ELF gcl on Linux

I have had my address changed on the gcl mailing list and since
then I have seen no messages from the list.  Perhaps the list
has simply been quiet.

Please mail any replies to this message to me, in case I have been
snafu'd.

I have been fiddling with the gcl-2.1 sources and removed a few bugs
and have managed to get gcl compiled as an ELF object on Linux.  It
seems to work well.  However, I have not been able to see how to
convert the fasl feature to ELF (fasl works form me, but it still uses
the a.out format).  Does the fasl feature work using the ELF format on
any system?

I don't really understand how the fasl feature works.  Is there any
useful documentation on it?


--Bill

From tkunze@ccrma.Stanford.EDU  Mon Jun  5 21:10:07 1995
Return-Path: <tkunze@ccrma.Stanford.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02595; Mon, 5 Jun 95 21:10:07 CDT
Received: from  ccrma.Stanford.EDU  (ccrma.Stanford.EDU) by cli.com (4.1/SMI-4.1)
	id AA04192; Mon, 5 Jun 95 19:55:01 CDT
Received: from cmn18 by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA08347; Mon, 5 Jun 95 17:54:55 -0700
From: tkunze@ccrma.Stanford.EDU (Tobias Kunze)
Message-Id: <9506060054.AA08347@ ccrma.Stanford.EDU >
Received: by cmn18.Stanford.EDU (NX5.67d/NX3.0X)
	id AA24574; Mon, 5 Jun 95 17:54:54 -0700
Date: Mon, 5 Jun 95 17:54:54 -0700
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: use-fast-links nil --> bus error



Did anyone succeed to do a (use-fast-links nil) in gcl-2.1?
I experience the following oddities:

   [1]  use-fast-links is not available in the user-package
   [2]  it bombs.  Bus error.  :(

> tkunze@cmn18:~ [53]> /Lisp/next-m68k/gcl/gcl-2.1/unixport/saved_gcl
> GCL (GNU Common Lisp)  Version(2.1) Wed May 31 01:55:15 PDT 1995
> Licensed under GNU Public Library License
> Contains Enhancements by W. Schelter
> 

> >(use-fast-links nil)
> 

> Error: The function USE-FAST-LINKS is undefined.
> Fast links are on: do (use-fast-links nil) for debugging
> Error signalled by EVAL.
> Broken at EVAL.  Type :H for Help.
> >>:q
> 

> Top level.
> >(si:use-fast-links nil)
> Bus error
> tkunze@cmn18:~ [54]>


It apparently doesn't depend on the platform I'm running on.  I get
the same behaviour on an SGI under Irix5, as well as on NeXTStep 3.3 

Motorola _AND_ Intel...


Any hints?


-----------------------------------------

Another question: 


Does anyone know of an ANSI-loop version that works with gcl-2.1?


TIA,

-Tobias

From sawada@jaist.ac.jp  Tue Jun  6 04:48:09 1995
Return-Path: <sawada@jaist.ac.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02820; Tue, 6 Jun 95 04:48:09 CDT
Received: from melon.jaist.ac.jp by cli.com (4.1/SMI-4.1)
	id AA05651; Tue, 6 Jun 95 03:20:37 CDT
Received: by melon.jaist.ac.jp (8.6.9+2.4Wb3/2.8Wb); Tue, 6 Jun 1995 17:20:23 +0900
From: Toshimi Sawada <sawada@jaist.ac.jp>
Received: by gold.jaist.ac.jp (4.1/JE-C); Tue, 6 Jun 95 17:20:22 JST
Date: Tue, 6 Jun 95 17:20:22 JST
Message-Id: <9506060820.AA06715@gold.jaist.ac.jp>
To: gcl@cli.com
Subject: NULL_OR_ON_C_STACK for NextStep3.0 & other questions with minor bug fix

I'm trying to run gcl-2.1 on NextStep3.0 (m68k).
Curretly, with some adaptations to NextStep3.0, 
and minor bug fixes, saved_gcl and saved_pcl could be 
installed. They seem runs properly, but the behaviour 
is not stable, occationaly gcl causes fatal signal and aborts.

Here are some questions that I have for making current system more
stable. Would some one help me please?

1. How can I define the macro NULL_OR_ON_C_STACK 
   for NextStep3.0(m68k) or later?

   This is a system depedent macros used in the 
   inplementation of gcl-2.1.
   The macro gets one argument a pointer to an object, 
   and determines if the pointer is on th C stack or the 0 pointer.
   The default definition is 
     #define NULL_OR_ON_C_STACK(x) ((int)x <= 0)
   This does not work on NextStep and raw_gcl aborts immediately.
   Curretly I define 
     #define NULL_OR_ON_C_STACK(x) ((int)x = 0)
   Obviously, this must be fixed.

2. FILE: 'o/nfunink.c', the following code fragments around line 216
   if (atypes==0) {abase = base;}
    else { abase = vs_top;
           for (i=0; i < nargs ; i++, atypes >>= F_TYPE_WIDTH)
	    { object next = base[i];
	       int atyp = atypes & MASK_RANGE(0,F_TYPE_WIDTH);
-->216	       vs_push( COERCE_F_TYPE(next,F_object,atyp));}
	  }
    `vs_push' causes a fatal type error for Next C compiler.
     I changed the line as the followings
               abase[i] = COERCE_F_TYPE(next,F_object,atyp);
               *vs_top++ ;
     This avoids the compiling erro, but is this a proper solution?

3. This may be a bug:
   FILE: grab_defs.c, line 74
         while (3==read_some(buf,3,'\n',0))
-->74	   { buf[4] = 0;
	     if (strcmp(buf,"DEF") ==0)
	       { printf("\n%s",buf);
     buf[4] shoud be buf[3]
     On non memory clean machines (like Next), grab_defs makes
     null .ini files.

I tried also stall gcl-tk, there seems a bug:
(1) File : o/soekcts.c
    In the definition body of DEFUN("PRINT-TO-STRING1" ...

      case t_string:
	   {int len = x->st.st_fillp;
	     p = &x->st.st_self[0];
	    if (downcase)
	    while (--len>=0)
	      { char c = *p++;
-->388     	 c=tolower(c);
		 if(needs_quoting[c])
		   PUSH('\\');
		 PUSH(c);}
     Formally, tolower returns undefined value if the given character
     is not a upcase letter. At least on NextStep3.0, this causes a
      problem. This should be 
         if (isupper(c)) c=tolower(c) ;

   This patch makes gcl-tk on NexStep3.0 work, at least demos works fine.

VERY thanks in advance.
--
sawada

From yonezawa@vceew46.lsi.tmg.nec.co.jp  Tue Jun  6 04:55:50 1995
Return-Path: <yonezawa@vceew46.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02825; Tue, 6 Jun 95 04:55:50 CDT
Received: from TYO2.gate.nec.co.jp by cli.com (4.1/SMI-4.1)
	id AA05654; Tue, 6 Jun 95 03:34:36 CDT
Received: from mailsv.nec.co.jp ([133.200.254.203]) by TYO2.gate.nec.co.jp (8.6.11+2.5Wb2/3.3Wb-NEC-TYO2) with ESMTP id RAA01753; Tue, 6 Jun 1995 17:34:14 +0900
Received: from vceew46.lsi.tmg.nec.co.jp (vceew46.lsi.tmg.nec.co.jp [133.202.13.117]) by mailsv.nec.co.jp (8.6.11+2.5Wb2/3.3W-95040611) with ESMTP id RAA27722; Tue, 6 Jun 1995 17:34:12 +0900
Received: from vceew46 (localhost [127.0.0.1]) by vceew46.lsi.tmg.nec.co.jp (8.6.12+2.5Wb4/3.3W9.lsi_mx_3.0) with SMTP id RAA02634; Tue, 6 Jun 1995 17:31:25 +0900
Message-Id: <199506060831.RAA02634@vceew46.lsi.tmg.nec.co.jp>
To: sawada@jaist.ac.jp
Cc: gcl@cli.com
Subject: Re: NULL_OR_ON_C_STACK for NextStep3.0 & other questions with minor
	 bug fix
From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
In-Reply-To: Your message of "Tue, 6 Jun 95 17:20:22 JST"
References: <9506060820.AA06715@gold.jaist.ac.jp>
X-Mailer: Mew beta version 0.91 on Emacs 19.28.1, Mule 2.2
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Tue, 06 Jun 1995 17:31:25 +0900
Sender: yonezawa@vceew46.lsi.tmg.nec.co.jp

sawada> 1. How can I define the macro NULL_OR_ON_C_STACK 
sawada>    for NextStep3.0(m68k) or later?

#define NULL_OR_ON_C_STACK(x) ((x)==0||(((unsigned int)(x)) >= 0x3f00000 )) 

sawada> 3. This may be a bug:
sawada>    FILE: grab_defs.c, line 74
sawada>          while (3==read_some(buf,3,'\n',0))
sawada> -->74	   { buf[4] = 0;
sawada> 	     if (strcmp(buf,"DEF") ==0)
sawada> 	       { printf("\n%s",buf);
sawada>      buf[4] shoud be buf[3]

Right. It's a bug.

--
Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>

From yonezawa@vceew46.lsi.tmg.nec.co.jp  Tue Jun  6 05:05:06 1995
Return-Path: <yonezawa@vceew46.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02830; Tue, 6 Jun 95 05:05:06 CDT
Received: from TYO2.gate.nec.co.jp by cli.com (4.1/SMI-4.1)
	id AA05668; Tue, 6 Jun 95 03:46:55 CDT
Received: from mailsv.nec.co.jp ([133.200.254.203]) by TYO2.gate.nec.co.jp (8.6.11+2.5Wb2/3.3Wb-NEC-TYO2) with ESMTP id RAA03229; Tue, 6 Jun 1995 17:46:11 +0900
Received: from vceew46.lsi.tmg.nec.co.jp (vceew46.lsi.tmg.nec.co.jp [133.202.13.117]) by mailsv.nec.co.jp (8.6.11+2.5Wb2/3.3W-95040611) with ESMTP id RAA29069; Tue, 6 Jun 1995 17:46:10 +0900
Received: from vceew46 (localhost [127.0.0.1]) by vceew46.lsi.tmg.nec.co.jp (8.6.12+2.5Wb4/3.3W9.lsi_mx_3.0) with SMTP id RAA02776; Tue, 6 Jun 1995 17:43:24 +0900
Message-Id: <199506060843.RAA02776@vceew46.lsi.tmg.nec.co.jp>
To: sawada@jaist.ac.jp
Cc: gcl@cli.com
Subject: Re: NULL_OR_ON_C_STACK for NextStep3.0 & other questions with minor
	 bug fix
From: Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>
In-Reply-To: Your message of "Tue, 6 Jun 95 17:20:22 JST"
References: <9506060820.AA06715@gold.jaist.ac.jp>
X-Mailer: Mew beta version 0.91 on Emacs 19.28.1, Mule 2.2
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Tue, 06 Jun 1995 17:43:24 +0900
Sender: yonezawa@vceew46.lsi.tmg.nec.co.jp

oops, I forgot to send you additional patch.

If you have any questions about my NeXT port of gcl,
feel free to email me.
Messages in Japanese are welcome, of course :-)

--
Noritake YONEZAWA <yonezawa@lsi.tmg.nec.co.jp>


*** gcl-2.1/o/NeXTunixfasl.c.BAK	Wed May 10 20:10:37 1995
--- gcl-2.1/o/NeXTunixfasl.c	Mon Jun  5 21:57:32 1995
***************
*** 6,11 ****
--- 6,12 ----
   * 
   * Modified by Noritake YONEZAWA (yonezawa@lsi.tmg.nec.co.jp)
   * May 1, 1995
+  * June 5, 1995
   */
  
  #include <mach/mach.h>
***************
*** 21,30 ****
  static unsigned long object_size, object_start;
  
  static unsigned long
! my_address_func(size)
      unsigned long       size;
  {
!     return (object_start = (unsigned long)alloc_contblock(object_size = size));
  }
  
  static void
--- 22,33 ----
  static unsigned long object_size, object_start;
  
  static unsigned long
! my_address_func(size, headers_size)
      unsigned long       size;
+     unsigned long	headers_size;
  {
!     return (object_start =
! 	    (unsigned long)alloc_contblock(object_size = size + headers_size));
  }
  
  static void

From jukka@ee.oulu.fi  Tue Jun  6 10:03:50 1995
Return-Path: <jukka@ee.oulu.fi>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02873; Tue, 6 Jun 95 10:03:50 CDT
Received: from ee.oulu.fi  (tks.oulu.fi) by cli.com (4.1/SMI-4.1)
	id AA06290; Tue, 6 Jun 95 08:28:14 CDT
Received: from el14.ee.university.oulu.fi (el14.oulu.fi) by ee.oulu.fi  (4.1/SMI-4.1)
	id AA09906; Tue, 6 Jun 95 16:27:05 +0300
Received: by el14.ee.university.oulu.fi (5.x/SMI-SVR4)
	id AA24107; Tue, 6 Jun 1995 16:26:43 +0300
Date: Tue, 6 Jun 1995 16:26:43 +0300
From: jukka@ee.oulu.fi (Jukka Lahti)
Message-Id: <9506061326.AA24107@el14.ee.university.oulu.fi>
To: gcl@cli.com
Subject: GCL+Solaris 2.4 problem


I have the following problem:

Compilation of GCL 2.1 fails on a Sun SS5 running Solaris 2.4 with
the error messages shown below. Actually the C-compilation (with gcc) succeeds,
but LISP-initialization apparently fails when loading one of
the compiled files.

The compilation commands used were

	add-defs solaris
	make

I also tried to use the Sun C-compiler, but could not get past the first couple
of files. 

Any help is appreciated!

- jukka
_________________________________________________________________

   Jukka Lahti * jukka@ee.oulu.fi *  http://ee.oulu.fi/~jukka 
         tel: +358-81-5532682  *  fax: + 358-81-5532700
         University of Oulu  *  Electronics Laboratory
                PL 444  FIN-90571 OULU * FINLAND                    
_________________________________________________________________


Relevant portion of make output:
================================

cat init_gcl.lsp | \
sed -e "s"DATE"Version(`cat ../majvers`.`cat ../minvers`) `date`g" \
-e 'ssaved_gclsaved_gclg' \
-e 'slinks t)links t)(setq compiler::*cc* "gcc -I/elsoft1/gcl/gcl-2.1/o -static -DVOL=volatile -fsigned-char")(si::build-symbol-table)g' \
-e "sGCLDIR/elsoft1/gcl/gcl-2.1g" \
-e "s(defun lisp-imp(setq si::*gcl-version* `cat ../minvers` si::*gcl-major-version* `cat ../majvers`)(defun lisp-impg" \
-e "s:GCL-1:GCL-"`cat ../majvers`":g" 	> foo 
../unixport/raw_gcl ../unixport/ -libdir /elsoft1/gcl/gcl-2.1/ < foo
GCL (GNU Common Lisp)  April 1994  32768 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
This file was dumped with FASD version ~a not ~a.
Lisp initialization failed.
make command
rm -f bin/gcl xbin/gcl
make install-command "INSTALL_LIB_DIR=/elsoft1/gcl/gcl-2.1" "PREFIX_DIR=/elsoft1/gcl/gcl-2.1"
(echo "#!/bin/sh" ; \
echo exec /elsoft1/gcl/gcl-2.1/unixport/saved_gcl \\ ; \
echo '   -dir' /elsoft1/gcl/gcl-2.1/unixport/ \\ ; \
echo '   -libdir' /elsoft1/gcl/gcl-2.1/ \\ ; \
echo '   -eval '\''(setq si::*allow-gzipped-file* t)'\' \\ ;\
echo '   -eval '\''(setq si::*tk-library* '\"/usr/local/lib/tk\"')'\' \\;\
echo '     '\"\$@\" ) > /elsoft1/gcl/gcl-2.1/bin/gcl;
echo '#' other options: -load "/tmp/foo.o" -load "jo.lsp" -eval '"(joe 3)"' >> /elsoft1/gcl/gcl-2.1/bin/gcl
chmod a+x /elsoft1/gcl/gcl-2.1/bin/gcl
(cd xbin ; ln -s ../bin/gcl .)
(cd  cmpnew ; make collectfn.o)
../unixport/saved_gcl ../unixport/ -compile collectfn.lsp
sh: ../unixport/saved_gcl: not found
*** Error code 1
make: Fatal error: Command failed for target `collectfn.o'
Current working directory /export/elsoft1/gcl/gcl-2.1/cmpnew
*** Error code 1
make: Fatal error: Command failed for target `all'

        

From price@wam.umd.edu  Tue Jun  6 21:59:30 1995
Return-Path: <price@wam.umd.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03128; Tue, 6 Jun 95 21:59:30 CDT
Received: from wor-srv.wam.umd.edu by cli.com (4.1/SMI-4.1)
	id AA08519; Tue, 6 Jun 95 20:47:26 CDT
Received: from next18pg2.wam.umd.edu (next18pg2.wam.umd.edu [128.8.73.28]) by wor-srv.wam.umd.edu (8.6.10/8.6.9) with ESMTP id VAA22050; Tue, 6 Jun 1995 21:47:25 -0400
From: Sherwin Hugh Price <price@wam.umd.edu>
Received: (price@localhost) by next18pg2.wam.umd.edu (8.6.9/8.6.9) id VAA00811; Tue, 6 Jun 1995 21:47:24 -0400
Date: Tue, 6 Jun 1995 21:47:24 -0400
Message-Id: <199506070147.VAA00811@next18pg2.wam.umd.edu>
Received: by NeXT.Mailer (1.100.RR)
Received: by NeXT Mailer (1.100.RR)
To: tkunze@ccrma.stanford.edu
Subject:  Re: gcl-2.1 on next-3.3-m68k and next-3.3-i386 with gcc-2.6.3
Cc: gcl@cli.com

Hello,

Should I add both the NeXT30-m68k and the NeXT32-m68k defs if I have  
a Motorola NS3.2 machine, or should only one def be used?

Also prior to receiving this letter I successfully compile gcl-2.1 up  
to and including the TK interface.  My earlier difficulties spring  
from the fact that the order of the libraries as stated in the  
linking command found in the gcl-tk makefile was incorrect--at least  
on my system, a 68040 NeXTcube running NS3.2 compiling with gcc-2.6.3
the line was:
	$(LD_ORDINARY_CC) $(GUIOS) -o gcltkaux ${X11_LIBS}
			${TCL_LIBS} ${TK_LIBS} ${LIBS} ${GCLIB}
and is changed to:
	$(LD_ORDINARY_CC) $(GUIOS) -o gcltkaux  ${TCL_LIBS}
			${TK_LIBS} ${X11_LIBS} ${LIBS} ${GCLIB}

I will now attempt to compile with this your most recent set of  
patches and get back to you.

Thank You,
price


From schelter@posso.ibp.fr  Wed Jun  7 07:37:56 1995
Return-Path: <schelter@posso.ibp.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA03373; Wed, 7 Jun 95 07:37:56 CDT
Received: from ibp.ibp.fr by cli.com (4.1/SMI-4.1)
	id AA09525; Wed, 7 Jun 95 06:08:46 CDT
Received: from posso.ibp.fr (posso.ibp.fr [132.227.66.10])
	by ibp.ibp.fr (8.6.12/jtpda-5.0) with ESMTP id NAA21945
	; Wed, 7 Jun 1995 13:08:15 +0200
Received: from sysal.ibp.fr (sisal.ibp.fr [132.227.66.1])
	by posso.ibp.fr (8.6.11/jtpda-5.0)
	with ESMTP id NAA11859 ; Wed, 7 Jun 1995 13:10:50 +0200
From: schelter@posso.ibp.fr (William Schelter)
Received: (wfs@localhost)
	by sysal.ibp.fr (8.6.11/jtpda-5.0) id NAA28594 ; Wed, 7 Jun 1995 13:12:12 +0200
Date: Wed, 7 Jun 1995 13:12:12 +0200
Message-Id: <199506071112.NAA28594@sysal.ibp.fr>
To: yonezawa@lsi.tmg.nec.co.jp
Cc: sawada@jaist.ac.jp, gcl@cli.com
In-Reply-To: <199506060831.RAA02634@vceew46.lsi.tmg.nec.co.jp> (message from Noritake YONEZAWA on Tue, 06 Jun 1995 17:31:25 +0900)
Subject: Re: NULL_OR_ON_C_STACK for NextStep3.0 & other questions with minor
	 bug fix
Reply-To: schelter@posso.ibp.fr


It appears

#define NULL_OR_ON_C_STACK(x) ((x)==0||(((unsigned int)(x)) >= 0x3f00000 )) 

is appropriate on next ...

    sawada>      buf[4] shoud be buf[3]
Thanks!


From tkunze@ccrma.Stanford.EDU  Thu Jun  8 23:09:22 1995
Return-Path: <tkunze@ccrma.Stanford.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04180; Thu, 8 Jun 95 23:09:22 CDT
Received: from  ccrma.Stanford.EDU  (ccrma.Stanford.EDU) by cli.com (4.1/SMI-4.1)
	id AA23264; Thu, 8 Jun 95 21:57:24 CDT
Received: from cmn18 by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA08661; Thu, 8 Jun 95 19:57:22 -0700
From: tkunze@ccrma.Stanford.EDU (Tobias Kunze)
Message-Id: <9506090257.AA08661@ ccrma.Stanford.EDU >
Received: by cmn18.Stanford.EDU (NX5.67d/NX3.0X)
	id AA03783; Thu, 8 Jun 95 19:57:21 -0700
Date: Thu, 8 Jun 95 19:57:21 -0700
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: gcl-2.1/o/makefile bug



just happened to notice that `make clean' doesn't remove ./o/new_init.o 

no big deal, anyway, but the makefile should be updated.
Here are the diffs:

*** o/makefile	Thu Jun  8 19:51:31 1995
--- o/makefile.fixed	Thu Jun  8 19:47:51 1995
***************
*** 174,180 ****
  	$(AR) gcllib.a ${ALIB}
  	${RANLIB} gcllib.a
  clean:
! 	rm -f $(OBJS) ${ALIB} new-init.o *.a grab_defs
  

  fsavres.o: /lib/libc.a
  	ar xv /lib/libc.a fsavres.o
--- 174,180 ----
  	$(AR) gcllib.a ${ALIB}
  	${RANLIB} gcllib.a
  clean:
! 	rm -f $(OBJS) ${ALIB} new_init.o *.a grab_defs
  

  fsavres.o: /lib/libc.a
  	ar xv /lib/libc.a fsavres.o
--------------------------------------------------------------


From rjf@infograph.com  Thu Jun  8 23:44:06 1995
Return-Path: <rjf@infograph.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04188; Thu, 8 Jun 95 23:44:06 CDT
Received: from herald.indirect.com by cli.com (4.1/SMI-4.1)
	id AA23513; Thu, 8 Jun 95 22:32:19 CDT
Received: (from Uinfogrf@localhost) by herald.indirect.com (8.6.9/8.6.9) with UUCP id UAA03278 for gcl@cli.com; Thu, 8 Jun 1995 20:32:17 -0700
From: rjf@infograph.com (Ron Forrester)
Received: by infograph.com (1.37.109.15/3.2.083191-Informative Graphics)
	id AA041087853; Thu, 8 Jun 1995 20:17:33 -0700
Message-Id: <199506090317.AA041087853@infograph.com>
Subject: Port to NT?
To: gcl@cli.com (gcl)
Date: Thu, 8 Jun 1995 20:17:33 -0700 (MST)
X-Mailer: ELM [version 2.4 PL24]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 89        


Has anyone made an attempt at porting GCL to Windows NT?

If not, are there plans?

rjf

From rld@juliet.ll.mit.edu  Mon Jun 12 10:01:32 1995
Return-Path: <rld@juliet.ll.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05649; Mon, 12 Jun 95 10:01:32 CDT
Received: from juliet.ll.mit.edu (JULIET.WX.LL.MIT.EDU) by cli.com (4.1/SMI-4.1)
	id AA09685; Mon, 12 Jun 95 08:25:47 CDT
Received: from escalus (ESCALUS.WX.LL.MIT.EDU) by juliet.ll.mit.edu id AA03272g; Mon, 12 Jun 95 09:31:55 EDT
From: rld@juliet.ll.mit.edu ( Richard Delanoy (group 21))
Received: by escalus; Mon, 12 Jun 95 09:38:25 EDT
Date: Mon, 12 Jun 95 09:38:25 EDT
Message-Id: <9506121338.AA02864@escalus>
To: gcl@cli.com
Subject: Bug report
Cc: rld@juliet.ll.mit.edu



I have isolated a short, I presume legal, sequence of code that consistently 
generates the error:

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by UNWIND-PROTECT.
Broken at PROGN.  Type :H for Help.

The code that generates the error is as follows:


(let* ((the-stream (open "foo" :direction :output
                               :if-exists :overwrite
                               :if-does-not-exist :create)))
    (print 1)
    (unwind-protect
        (progn
          (sleep 1)
          (write "abc" :stream the-stream))
       (close the-stream))
    nil)

When gcl was compiled with -g and run under gdb and the above code sequence 
loaded from a file, the error occurs at line 1056 of file eval.c (gcl-2.0 
version), after the write command succeeds (file "foo" contains "abc").

The following backtrace is evident at the error:

Backtrace: funcall > system:top-level > eval > load > let* > unwind-protect > P\ROGN


I'm running on a Sparc 10 using BSD 4.1.3.


GCL-2.0 was compiled using gcc version 2.4.5 and then 2.6.0.
GCL-2.1 was then tried using gcc version 2.6.0.
All variations failed the same way.

The sequence of open, print, unwind-protect, and write commands are critical.
The sleep command can be replaced with some other simple instructions that
appear to be time dependent.  For example, the expression (setq xxx 1) in
place of the (sleep 1) does not generate the error, where the expression
(nth 3 '(1 2 3 4 5 6)) in place of the (sleep 1) does generate the error.
As far as I can tell, the close command is never reached.

This problem did not exist in AKCL 6.05 (the most recent previous version I have
worked with).

Dick Delanoy
MIT/Lincoln Laboratory
rld@ll.mit.edu
(508) 568-0673

From noordhuizen@ps-net.cft.philips.nl  Tue Jun 13 03:46:31 1995
Return-Path: <noordhuizen@ps-net.cft.philips.nl>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06077; Tue, 13 Jun 95 03:46:31 CDT
Received: from relay.philips.nl by cli.com (4.1/SMI-4.1)
	id AA12567; Tue, 13 Jun 95 02:09:47 CDT
Received: from smtp.nl.cis.philips.com ([192.26.173.32]) by relay.philips.nl (8.6.9/8.6.9-950414) with ESMTP id JAA06718 for <gcl@cli.com>; Tue, 13 Jun 1995 09:09:36 +0200
From: noordhuizen@ps-net.cft.philips.nl
Received: from nlcps1.cft.philips.nl ([130.144.85.33]) by smtp.nl.cis.philips.com (8.6.10/8.6.10-0.9z-02May95) with SMTP id JAA18518 for <gcl@cli.com>; Tue, 13 Jun 1995 09:10:17 +0200
Received: from ps-net.cft.philips.nl by nlcps1.cft.philips.nl; (5.65/1.1.8.2/28Jan95-0406PM)
	id AA00572; Tue, 13 Jun 1995 09:11:26 +0200
Received: from cc:Mail by ps-net.cft.philips.nl
	id AA803060250; Tue, 13 Jun 95 09:06:43 met
Date: Tue, 13 Jun 95 09:06:43 met
Encoding: 4 Text
Message-Id: <9505138030.AA803060250@ps-net.cft.philips.nl>
To: gcl@cli.com
Subject: Windows NT 3.5 Implementation ?

     As the subject indicates, has somebody already ported GCL to the 
     Windows NT platform ?
     
     Leo Noordhuizen


From blake@edge.net  Tue Jun 13 05:36:54 1995
Return-Path: <blake@edge.net>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06091; Tue, 13 Jun 95 05:36:54 CDT
Received: from edge.edge.net by cli.com (4.1/SMI-4.1)
	id AA12701; Tue, 13 Jun 95 03:59:25 CDT
Received: from edge (ip177.nash.edge.net [199.0.68.177]) by edge.edge.net (8.6.12/8.6.9) with SMTP id EAA16456 for <gcl@cli.com>; Tue, 13 Jun 1995 04:00:12 -0500
Date: Tue, 13 Jun 1995 04:00:12 -0500
Message-Id: <199506130900.EAA16456@edge.edge.net>
X-Sender: blake@edge.net
X-Mailer: Windows Eudora Version 1.4.4
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: gcl@cli.com
From: blake@edge.net (Blake McBride)
Subject: Re: Windows NT 3.5 Implementation ?

>     As the subject indicates, has somebody already ported GCL to the 
>     Windows NT platform ?
>     
>     Leo Noordhuizen
>
>

Good luck!  Due to the fact that the GCL powers that be insist on loading
OS specific object files it wouldn't be easy.  Even if you got it to work
you'd be subject to every little change Microsoft makes...

This could be fixed without too much difficulty, however (ala Scheme->C),
without any loss in effeciency.  Unfortunatly, the GCL powers that be
believe that UNIX=WORLD and they couldn't care less about the non-academics
who would like to use a potentially great system in the real world.  No
wonder lisp can't seem to become mainstream...

--blake

P.S.  Sorry about the flame you GCL guys.  I'm frustrated because GCL is so
close to being something mainstream people could use.  I would love to do
it myself if I had the time....  I really believe that with a few portability
changes GCL could become a much more widely used and accepted
development environment.  You're so close and yet so far...


-- 
Blake McBride				Algorithms Corporation
615-791-1636 voice			3020 Liberty Hills Drive
615-791-7736 fax			Franklin, TN  37064
blake@edge.net				USA


From tomkwong@wilshire.com  Tue Jun 13 14:08:58 1995
Return-Path: <tomkwong@wilshire.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06328; Tue, 13 Jun 95 14:08:58 CDT
Received: from netcomsv.netcom.com (uucp5.netcom.com) by cli.com (4.1/SMI-4.1)
	id AA13809; Tue, 13 Jun 95 12:30:49 CDT
Received: by netcomsv.netcom.com with UUCP (8.6.12/SMI-4.1)
	id KAA11609; Tue, 13 Jun 1995 10:19:57 -0700
Received: by delilah (5.65/1.35)
	id AA16310; Tue, 13 Jun 95 10:07:25 -0700
From: tomkwong@wilshire.com (Thomas Kwong)
Message-Id: <9506131707.AA16310@delilah>
Subject: Solaris 2.4 for x86 Implementation?
To: gcl@cli.com
Date: Tue, 13 Jun 1995 10:07:25 -0700 (PDT)
X-Organization: Wilshire Associates, Inc.
X-Phone: (310)451-3051
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 306       

Hi.  I got GCL-2.1 lately but failed to make it compile under 
either Solaris x86 or Interactive UNIX.  I'd love to learn
Common Lisp and CLOS but I can't find an implementation...

I tried clisp but that's only CLTL1 and that's doesn't compile
either.  I also tried CMU CL but...

Thanks in advance.

Tom

From laing02@opim.wharton.upenn.edu  Fri Jun 16 01:54:18 1995
Return-Path: <laing02@opim.wharton.upenn.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07850; Fri, 16 Jun 95 01:54:18 CDT
Received: from opim.wharton.upenn.edu by cli.com (4.1/SMI-4.1)
	id AA22956; Fri, 16 Jun 95 00:38:31 CDT
Received: from grace.wharton.upenn.edu (GRACE.WHARTON.UPENN.EDU [130.91.161.2]) by opim.wharton.upenn.edu (8.6.12/8.6.12) with ESMTP id BAA24434 for <gcl@cli.com>; Fri, 16 Jun 1995 01:32:44 -0400
From: Martin McCormick <laing02@opim.wharton.upenn.edu>
Received: (laing02@localhost) by grace.wharton.upenn.edu (8.6.12/8.6.12) id BAA02264 for gcl@cli.com; Fri, 16 Jun 1995 01:33:41 -0400
Message-Id: <199506160533.BAA02264@grace.wharton.upenn.edu>
Subject: porting Lucid to GCL
To: gcl@cli.com
Date: Fri, 16 Jun 1995 01:33:41 -0400 (EDT)
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 264       


	Has anyone tried porting anything from Lucid Common Lisp to GCL?
Has anyone ported any seriously big Lisp program to GCL?  
I am considering porting a genetic-programming simulation (by Koza) program
from Lucid/Mac Common LISP to GCL.

Thanks,
Marty McCormick



From Chandan.Haldar@blr.sni.de  Fri Jun 16 04:18:13 1995
Return-Path: <Chandan.Haldar@blr.sni.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07881; Fri, 16 Jun 95 04:18:13 CDT
Received: from mail.sni.de by cli.com (4.1/SMI-4.1)
	id AA23140; Fri, 16 Jun 95 02:48:40 CDT
Received: from blrsn01.blr.sni.de by mail.sni.de with SMTP (PP) id <08773-0@mail.sni.de>; Fri, 16 Jun 1995 09:47:08 +0200
Received: from blrast03.blr.sni.de by blr.sni.de (4.1/SMI-4.1)
	id AA19725; Fri, 16 Jun 95 13:18:34+050
Date: Fri, 16 Jun 95 13:18:34+050
From: Chandan.Haldar@blr.sni.de (Dr. Chandan Haldar)
Message-Id: <9506160818.AA19725@blr.sni.de>
Received: by blrast03.blr.sni.de (5.0/SMI-SVR4)
	id AA01766; Fri, 16 Jun 95 13:37:09 GMT
To: laing02@opim.wharton.upenn.edu
Cc: gcl@cli.com
In-Reply-To: <199506160533.BAA02264@grace.wharton.upenn.edu> (message from Martin McCormick on Fri, 16 Jun 1995 01:33:41 -0400 (EDT))
Subject: Re: porting Lucid to GCL
Content-Length: 641

Koza's system worked fine with AKCL even before KCL became GCL :-), so
I would expect it to work in GCL too without problems.  What specific
problem did you face anyway?

Chandan

--------------------------------------------------------------------------
Dr. Chandan Haldar
--------------------------------------------------------------------------
Siemens Information Systems Limited
Real Time Systems Division
29 Infantry Road, Bangalore 560 001, India.
Phone:    +91 80 551 1012                       Fax:      +91 80 551 1214
Internet: Chandan.Haldar@blr.sni.de
--------------------------------------------------------------------------

From jeff@aiai.ed.ac.uk  Fri Jun 16 12:18:32 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA08008; Fri, 16 Jun 95 12:18:32 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA24279; Fri, 16 Jun 95 10:49:37 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id QAA11456; Fri, 16 Jun 1995 16:48:25 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 16 Jun 95 16:48:14 BST
Date: Fri, 16 Jun 95 16:48:14 BST
Message-Id: <15237.9506161548@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: porting Lucid to GCL
To: Martin McCormick <laing02@opim.wharton.upenn.edu>, gcl@cli.com
In-Reply-To: Martin McCormick's message of Fri, 16 Jun 1995 01:33:41 -0400 (EDT)

> 	Has anyone tried porting anything from Lucid Common Lisp to GCL?
> Has anyone ported any seriously big Lisp program to GCL?  
> I am considering porting a genetic-programming simulation (by Koza) program
> from Lucid/Mac Common LISP to GCL.

I have a moderately large program -- O-Plan, an AI planning system --
that works in both Lucid and GCL.  So I can probably do a fairly good
job of answering specific questions.  The porting was from AKCL (as
GCL used to be called) to Lucid, but now many changes are tried first
in Lucid.

More generally, GCL does seem capable of handling fairly large
programs.  I'm not sure what "seriously big" amounts to.  

GCL is still a "1st edition" Common Lisp, in that it doen't have 
many of the features added during standardization.  However, most
(if not all) "new" features are available in one form or another.

The main problem I know of is that the only CLOS is PCL.  PCL
does work (if you get the right version), but it can be annoyingly
slow at time, especially when it compiles at run-time (which,
in GCL, runs a C compiler).

-- jeff

Jeff Dalton,
AI Applications Institute,                               J.Dalton@ed.ac.uk
Edinburgh University.

From nils@guru.ims.uni-stuttgart.de  Sun Jun 18 18:19:22 1995
Return-Path: <nils@guru.ims.uni-stuttgart.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA08687; Sun, 18 Jun 95 18:19:22 CDT
Received: from guru.ims.uni-stuttgart.de by cli.com (4.1/SMI-4.1)
	id AA01070; Sun, 18 Jun 95 17:14:41 CDT
Received: by guru.ims.uni-stuttgart.de (Smail3.1.28.1 #21)
	id m0sN5nU-0002i9C; Sat, 17 Jun 95 23:52 MET DST
Message-Id: <m0sN5nU-0002i9C@guru.ims.uni-stuttgart.de>
Date: Sat, 17 Jun 95 23:52 MET DST
From: nils@guru.ims.uni-stuttgart.de (Cornelis van der Laan)
To: gcl@cli.com
Subject: Bug in gnumalloc based code when using SGC
Reply-To: nils@ims.uni-stuttgart.de

Hi all

There's a bug in the GNU malloc based file malloc.c when SGC is
turned on. This bug is in AKCL-1.624, gcl-1.1 and gcl-2.0. In
morecore() all signals are blocked by the following code:

#ifdef BSD
#ifndef BSD4_1
  oldmask = sigsetmask (-1);
#endif
#endif

Sometimes the allocation references some protected memory region
which cannot be unprotected by SGC's memprotect_handler() since
the triggering SIGPROTV is blocked and the handler never runs. 
Hence the process repeats the failing access ad inifinitum.

Fix:

#ifdef BSD
#ifndef BSD4_1
#ifdef SGC
  oldmask = sigsetmask (-1 & ~(sigmask(SIGPROTV)));
#else
  oldmask = sigsetmask (-1);
#endif
#endif
#endif

Nils
----------------------------------------------------------------
Cornelis van der Laan -- nils@ims.uni-stuttgart.de
                      -- nils@guru.stgt.sub.org
# echo echo Knusper Knusper Knaeuschen > /etc/nologin

From jch@GS69.SP.CS.CMU.EDU  Wed Jun 21 13:32:34 1995
Return-Path: <jch@GS69.SP.CS.CMU.EDU>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA09860; Wed, 21 Jun 95 13:32:34 CDT
Received: from GS69.SP.CS.CMU.EDU by cli.com (4.1/SMI-4.1)
	id AA10328; Wed, 21 Jun 95 11:54:34 CDT
Message-Id: <9506211654.AA10328@cli.com>
Date: Wed, 21 Jun 95 12:54:07 EDT
From: Jonathan Hardwick <jch@cs.cmu.edu>
To: gcl@cli.com
Subject: GCL under HP-UX 9.05?
Reply-To: Jonathan Hardwick <jch@cs.cmu.edu>

I'm trying to build GCL-2.1 on an HP 712 running HPUX 9.05.  I tried
using the "hp800" definitions, but that gives the following error:

        cc -DVOL=volatile -I../gcl-tk -I../h/ -O -I/usr/local/include -c  sockets.c
cpp: "param.h", line 85: warning 2001: Redefinition of macro HZ.
cc: "/usr/include/string.h", line 81: error 1584: Inconsistent type declaration: "memset".

If I uncomment the gcc lines in hp800.defs, I get the following at the
final link stage of the "make saved_gcl" target:

/bin/ld: ../lsp/defmacro.o: Not a valid object file (invalid system id)

Has anyone successfully compiled GCL under HPUX 9.x?  Any hints to pass
along? 

Thanks,
Jonathan Hardwick, jch@cs.cmu.edu

From okuma@itl.atr.co.jp  Mon Jun 26 05:25:51 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11805; Mon, 26 Jun 95 05:25:51 CDT
Received: from itl.atr.co.jp.itl.atr.co.jp ([133.186.30.1]) by cli.com (4.1/SMI-4.1)
	id AA22572; Mon, 26 Jun 95 03:38:41 CDT
Received: from as30.itl.atr.co.jp by itl.atr.co.jp (8.6.12+2.5W/2.7W-2)
	id RAA06036; Mon, 26 Jun 1995 17:38:21 +0900
Return-Path: <okuma@itl.atr.co.jp>
Received: from localhost by as30.itl.atr.co.jp (4.1/6.4J.6-atr2.0)
	id AA01904; Mon, 26 Jun 95 17:38:20 JST
Message-Id: <9506260838.AA01904@as30.itl.atr.co.jp>
From: okuma@itl.atr.co.jp (Hideo KURIHARA)
To: gcl@cli.com
Reply-To: okuma@itl.atr.co.jp
Subject: GCL on MachTen
Date: Mon, 26 Jun 1995 17:38:19 +0900
Sender: okuma@itl.atr.co.jp

Has anyone ported GCL 2.1 under MachTen 2.2?

Thanks,

Hideo KURIHARA @ Dept 3,
ATR Interpreting Telecommunications Research Laboratories
e-mail: okuma@itl.atr.co.jp
tel:    0774-95-1335


From kr@shell.portal.com  Tue Jun 27 15:16:38 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA12318; Tue, 27 Jun 95 15:16:38 CDT
Received: from nova (nova.unix.portal.com) by cli.com (4.1/SMI-4.1)
	id AA26617; Tue, 27 Jun 95 13:18:01 CDT
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova (8.6.11/8.6.5) with ESMTP id LAA07622; Tue, 27 Jun 1995 11:17:00 -0700
Received: from DialupEudora (jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.11/8.6.5) with SMTP id LAA07321; Tue, 27 Jun 1995 11:16:54 -0700
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110100ac16017016ea@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: kr\r\essword:, 27 Jun 1995 11:17:39 -0800
To: gcl@cli.com, clisp-list@ma2s2.mathematik.uni-karlsruhe.de
From: kr@shell.portal.com (kr)
Subject: Issues for Multithreaded Ports [formerly: Re: cl-http for clisp]

I am forwarding the followng note, because I believe that both GCL and
CLISP would benefit from a multithreading facility, one that hopefully is
mutually compatible.
===========================================================================
>Mime-Version: 1.0
>Date: Tue, 27 Jun 1995 09:12:17 -0400
>To: kr@shell.portal.com (kr)
>From: JCMA@ai.mit.edu (John C. Mallery)
>Subject: Issues for Multithreaded Ports [formerly: Re: cl-http for clisp]
>Cc: deilmann@router.leat.ruhr-uni-bochum.de, www-cl@ai.mit.edu
>
>At 4:50 AM 6/27/95, kr wrote:
>>At 23:44 6/26/95, John C. Mallery wrote:
>>>A port reduces to providing the network interface and multithreading.
>>
>>Does a capsule summary exist regarding the requirements and interface to
>>the multithreading facility ?
>
>The mac port is quite parsimonious.
>>
>>Would it be difficult to emulate (or implement) multithreading in GCL or
>>CLISP ? What would be required ?
>
>Singlethreading will suffice until after you get the network interface up
>and fully debugged.
>Then, you can introduce multithreading, and debug that.
>
>Karsten Poeck implemented a poor man's multithreading for the MAC running in
>MCL 2.0.1 based on MCLs periodic tasks. It is found in http:mac;contributions;
>
>The main problem occurs if you get an error and don't have a stack. Not so
>nice.
>
>Thus, what you would like it a scheduler and stackgroups for each thread.
>It has
>been suggested that closures could be used to fake stack frames, but I
>don't have
>experience with this.
>
>You need to understand the serial, single thread assumptions built into the
>lisp or
>networking code and work around them.  Basically, this means avoiding
>collisions
>across threads. Garbage collection is a nasty area for possible collisions.
>
>In the networking code, a series of conditions are handled in the Lisp
>Machine and MAC versions.
>One should arrange to detect and signal these.  The mac version provides
>source code for all
>of these in http:mac;server; tcp-conditions. The availability of these
>conditions will definitely
>help  with poor man's multithreading.
>
>In general, it will help if the developers of the Lisp contribute to adding
>real threads with
>their own stackgroups.  Source code access will be essential to get robust
>threading
>to work.
>
>The bottom line, though, is that you are better off getting a single
>threaded server running
>first, and then, working on arranging for multithreading.  That way, you
>will have something
>running as soon as you get the network code up and it will be a server
>which is prefectly usable
>with single-threaded clients.  Once you get that far, it will be easier to
>get help with
>multithreading.
>

Greetings
Markus Krummenacker



From gene@ccs.neu.edu  Fri Jun 30 13:34:00 1995
Return-Path: <gene@ccs.neu.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13756; Fri, 30 Jun 95 13:34:00 CDT
Received: from amber.ccs.neu.edu by cli.com (4.1/SMI-4.1)
	id AA05519; Fri, 30 Jun 95 12:02:12 CDT
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.80])
	by amber.ccs.neu.edu (8.6.12/8.6.4) with ESMTP id NAA24372; Fri, 30 Jun 1995 13:02:07 -0400
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.12/8.6.4) id NAA01828; Fri, 30 Jun 1995 13:02:03 -0400
Date: Fri, 30 Jun 1995 13:02:03 -0400
Message-Id: <199506301702.NAA01828@highpoint.ccs.neu.edu>
To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, gcl@cli.com,
        kr@shell.portal.com
Subject: Re:  Issues for Multithreaded Ports [formerly: Re: cl-http for clisp]

On a related subject, I plan to distribute an integration of MPI
with Common LISP any day now.  MPI is a Message Passing Interface.
I'm doing the last polishing.
The beta version runs multiple LISP processes, communicating via MPI.
The LISP processes can be on the same or different CPU's.  An interactive
interface to the point-to-point layer of MPI is provided, along with
a higher level (easy-to-use?) master-slave architecture.

The current implementation is based on MPI and GCL or AKCL, but it should
be easily portable to other message passing libraries (such as PVM)
and other dialects of Common LISP with a foreign function interface
capable of loading object (.o) files and library archive (.a) files.
							- Gene Cooperman

From gene@ccs.neu.edu  Mon Jul  3 04:29:29 1995
Return-Path: <gene@ccs.neu.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA14760; Mon, 3 Jul 95 04:29:29 CDT
Received: from amber.ccs.neu.edu by cli.com (4.1/SMI-4.1)
	id AA01195; Mon, 3 Jul 95 02:56:14 CDT
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.80])
	by amber.ccs.neu.edu (8.6.12/8.6.4) with ESMTP id DAA02405
	for <gcl@cli.com>; Mon, 3 Jul 1995 03:56:13 -0400
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.12/8.6.4) id DAA10244
	for gcl@cli.com; Mon, 3 Jul 1995 03:56:12 -0400
Date: Mon, 3 Jul 1995 03:56:12 -0400
Message-Id: <199507030756.DAA10244@highpoint.ccs.neu.edu>
To: gcl@cli.com
Subject: GCL/MPI (parallel LISP)

A beta version of GCL/MPI is now available by anonymous ftp.  This is
a free software package built on top of MPI and GCL LISP, to easily write
parallel programs on networks of workstations.

GCL/MPI is intended as an easy-to-use master-slave distributed
architecture.  It combines the feedback of an interactive language (the
GCL or AKCL dialect of LISP) with the the use of MPI (Message Passing
Interface) to take advantage of networks of workstations.  As such, it
is hoped that it will make available an SPMD architecture that helps
people overcome the initial learning barrier in writing parallel
programs.  Ease-of-use is emphasized while hoping to maintain
reasonable efficiency and a reasonable feature set.  This distribution,
along with a paper describing it is available by anonymous ftp in the
directory /pub/people/gene/starmpi at ftp.ccs.neu.edu .

The current implementation is based on MPI and GCL or AKCL, but it should
be easily portable to other message passing libraries (such as PVM)
and other dialects of Common LISP with a foreign function interface
capable of loading object (.o) files and library archive (.a) files.

This version is still experimental.  Comments are gratefully accepted.

From Fritz.Heinrichmeyer@FernUni-Hagen.de  Wed Jul 12 07:59:49 1995
Return-Path: <Fritz.Heinrichmeyer@FernUni-Hagen.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18685; Wed, 12 Jul 95 07:59:49 CDT
Received: from ilex.FernUni-Hagen.de by cli.com (4.1/SMI-4.1)
	id AA20519; Wed, 12 Jul 95 06:18:16 CDT
Received: from ES-sun1.fernuni-hagen.de by ilex.FernUni-Hagen.de with SMTP (PP);
          Wed, 12 Jul 1995 13:18:10 +0200
Received: from ES-sun2.fernuni-hagen.de 
          by ES-sun1.fernuni-hagen.de (4.1/SMI-4.1) id AA22769;
          Wed, 12 Jul 95 13:18:09 +0200
Date: Wed, 12 Jul 95 13:18:09 +0200
Message-Id: <9507121118.AA22769@ES-sun1.fernuni-hagen.de>
Received: by ES-sun2.fernuni-hagen.de (4.1/SMI-4.1) id AA04480;
          Wed, 12 Jul 95 13:14:31 +0200
From: Johann Friedrich Heinrichmeyer <Fritz.Heinrichmeyer@FernUni-Hagen.de>
To: gcl@cli.com
Subject: gcl and linux and sunos-4.1.3

Hello,

i compiled gcl-2.1 under linux with gcc-2.7.0. unixport/gcl_raw
failed with segmentation fault in alloc_simple_string. It tried to fill
a structure, but the pointer to it was a NULL (excuse me, it was called
sSmaxpage_alloc or similar). I only wanted to know which systems are
know to work with gcl-2.1? I have linux (a.out and elf, would be nice to
have the elf one!) and sunos-4.1.3.

Thanks!

-- 
Fritz Heinrichmeyer                             FernUniversitaet Hagen
FAX:   +49 2371/566236                          LG Elektronische Schaltungen
EMAIL: fritz.heinrichmeyer@fernuni-hagen.de     Frauenstuhlweg 31
PHONE: +49 02371/566-243                        58644 Iserlohn (Germany)
WWW:  http://ES-sun2.fernuni-hagen.de

From Fritz.Heinrichmeyer@FernUni-Hagen.de  Wed Jul 12 08:26:29 1995
Return-Path: <Fritz.Heinrichmeyer@FernUni-Hagen.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18691; Wed, 12 Jul 95 08:26:29 CDT
Received: from ilex.FernUni-Hagen.de by cli.com (4.1/SMI-4.1)
	id AA20554; Wed, 12 Jul 95 06:52:00 CDT
Received: from ES-sun1.fernuni-hagen.de by ilex.FernUni-Hagen.de with SMTP (PP);
          Wed, 12 Jul 1995 13:47:17 +0200
Received: from ES-sun2.fernuni-hagen.de 
          by ES-sun1.fernuni-hagen.de (4.1/SMI-4.1) id AA22892;
          Wed, 12 Jul 95 13:47:17 +0200
Date: Wed, 12 Jul 95 13:47:17 +0200
Message-Id: <9507121147.AA22892@ES-sun1.fernuni-hagen.de>
Received: by ES-sun2.fernuni-hagen.de (4.1/SMI-4.1) id AA04551;
          Wed, 12 Jul 95 13:43:39 +0200
From: Johann Friedrich Heinrichmeyer <Fritz.Heinrichmeyer@FernUni-Hagen.de>
To: wfs@fireant.ma.utexas.edu, gcl@cli.com
Cc: Fritz.Heinrichmeyer@FernUni-Hagen.de
In-Reply-To: <199507121135.NAA07007@sysal.ibp.fr> (schelter@posso.ibp.fr)
Subject: Re: gcl and linux and sunos-4.1.3

thanks for the fast reply,

i have a tk application written in scheme. The port to gcl would be easy
as the interface to tk seems very similar (scheme is fine, but a little
poor as for example you cant open a file in append mode). We have all
our binaries now under elf, everything works (dosemu, x11, ptolemy ..)
and dynamic loading of extensions with dlopen and friends ... Gdb also
works ..

Elf will become THE linux binary format soon i hope ...

 In my opinion the core dump occured before elf specific things
happened as You also stated. All this happened with the version 2.1.
Btw. is it necessary to ling gcl statically under linux?

Fritz


-- 
Fritz Heinrichmeyer                             FernUniversitaet Hagen
FAX:   +49 2371/566236                          LG Elektronische Schaltungen
EMAIL: fritz.heinrichmeyer@fernuni-hagen.de     Frauenstuhlweg 31
PHONE: +49 02371/566-243                        58644 Iserlohn (Germany)
WWW:  http://ES-sun2.fernuni-hagen.de



From Fritz.Heinrichmeyer@FernUni-Hagen.de  Wed Jul 12 18:24:57 1995
Return-Path: <Fritz.Heinrichmeyer@FernUni-Hagen.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18887; Wed, 12 Jul 95 18:24:57 CDT
Received: from ilex.FernUni-Hagen.de by cli.com (4.1/SMI-4.1)
	id AA21888; Wed, 12 Jul 95 16:06:02 CDT
Received: from ES-sun1.fernuni-hagen.de by ilex.FernUni-Hagen.de with SMTP (PP);
          Wed, 12 Jul 1995 22:50:11 +0200
Received: from ES-sun2.fernuni-hagen.de 
          by ES-sun1.fernuni-hagen.de (4.1/SMI-4.1) id AA24075;
          Wed, 12 Jul 95 22:50:10 +0200
Date: Wed, 12 Jul 95 22:50:10 +0200
Message-Id: <9507122050.AA24075@ES-sun1.fernuni-hagen.de>
Received: by ES-sun2.fernuni-hagen.de (4.1/SMI-4.1) id AA07548;
          Wed, 12 Jul 95 22:46:33 +0200
From: Johann Friedrich Heinrichmeyer <Fritz.Heinrichmeyer@FernUni-Hagen.de>
To: gcl@cli.com
Subject: gcl only statically linked?

Today i compiled and installed gcl-2.1 out of the box with sunos-4.1.3
and gcc-2.7.0. But i managed it only when linking statically. Did i miss
something?

Fritz

-- 
Fritz Heinrichmeyer                             FernUniversitaet Hagen
FAX:   +49 2371/566236                          LG Elektronische Schaltungen
EMAIL: fritz.heinrichmeyer@fernuni-hagen.de     Frauenstuhlweg 31
PHONE: +49 02371/566-243                        58644 Iserlohn (Germany)
WWW:  http://ES-sun2.fernuni-hagen.de



From schelter@posso.ibp.fr  Thu Jul 13 08:07:54 1995
Return-Path: <schelter@posso.ibp.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA19133; Thu, 13 Jul 95 08:07:54 CDT
Received: from ibp.ibp.fr by cli.com (4.1/SMI-4.1)
	id AA23125; Thu, 13 Jul 95 06:38:31 CDT
Received: from posso.ibp.fr (posso.ibp.fr [132.227.66.10])
	by ibp.ibp.fr (8.6.12/jtpda-5.0) with ESMTP id NAA07657
	; Thu, 13 Jul 1995 13:37:12 +0200
Received: from sysal.ibp.fr (sisal.ibp.fr [132.227.66.1])
	by posso.ibp.fr (8.6.11/jtpda-5.0)
	with ESMTP id NAA06272 ; Thu, 13 Jul 1995 13:39:39 +0200
From: schelter@posso.ibp.fr (William Schelter)
Received: (wfs@localhost)
	by sysal.ibp.fr (8.6.11/jtpda-5.0) id NAA10200 ; Thu, 13 Jul 1995 13:41:13 +0200
Date: Thu, 13 Jul 1995 13:41:13 +0200
Message-Id: <199507131141.NAA10200@sysal.ibp.fr>
To: Fritz.Heinrichmeyer@FernUni-Hagen.de
Cc: gcl@cli.com
In-Reply-To: <9507122050.AA24075@ES-sun1.fernuni-hagen.de> (message from Johann Friedrich Heinrichmeyer on Wed, 12 Jul 95 22:50:10 +0200)
Subject: Re: gcl only statically linked?
Reply-To: wfs@fireant.ma.utexas.edu


Normally it links statically on sun os, so that it can do its own .o
loading, which needs to know where things are eg a
(load "foo.o") which references a printf, needs to know at load time
where printf is.   There may be ways of doing it with dynamic linking,
but this tends to be more 'system' dependent.









From Fritz.Heinrichmeyer@FernUni-Hagen.de  Fri Jul 14 05:13:15 1995
Return-Path: <Fritz.Heinrichmeyer@FernUni-Hagen.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA19557; Fri, 14 Jul 95 05:13:15 CDT
Received: from ilex.FernUni-Hagen.de by cli.com (4.1/SMI-4.1)
	id AA25929; Fri, 14 Jul 95 02:46:22 CDT
Received: from ES-sun1.fernuni-hagen.de by ilex.FernUni-Hagen.de with SMTP (PP);
          Fri, 14 Jul 1995 08:38:26 +0200
Received: from ES-sun2.fernuni-hagen.de 
          by ES-sun1.fernuni-hagen.de (4.1/SMI-4.1) id AA13166;
          Thu, 13 Jul 95 15:02:31 +0200
Date: Thu, 13 Jul 95 15:02:31 +0200
Message-Id: <9507131302.AA13166@ES-sun1.fernuni-hagen.de>
Received: by ES-sun2.fernuni-hagen.de (4.1/SMI-4.1) id AA08595;
          Thu, 13 Jul 95 14:53:16 +0200
From: Johann Friedrich Heinrichmeyer <Fritz.Heinrichmeyer@FernUni-Hagen.de>
To: kr@shell.portal.com, gcl@cli.com
Cc: Fritz.Heinrichmeyer@FernUni-Hagen.de, wfs@fireant.ma.utexas.edu
In-Reply-To: <v02110100ac2a139b3b8a@DialupEudora> (kr@shell.portal.com)
Subject: Re: gcl and linux and sunos-4.1.3

I must apologize,

this is the first time that i realize that the last mails about gcl came
from a list server. As far as i remember there was no hint in the header.
Here what happened:

I had very easily success in installing gcl-2.1 under sunos-4.1.3 and
with gcc-2.7.0 but only when linking with "-static".

Till now there was no way (i had no more time since the last posting) to
install gcl-2.1 with a linux-elf system.

Of course i did __NOT__ trie to install it statically linked. This is
the very last option for me ..

After my reports there was some traffic about pros and cons of elf
binary format. I think easily building of shared libraries and good
dynamic linking support are enough arguments for linux-elf. Other
platforms may have also good support for shared libraries and dynamic
linking without elf, but not linux.

I hope it is possible at all to link gcl dynamic as it is with emacs
under sunos-4.1.3 (a.out) and linux (elf).

Fritz

-- 
Fritz Heinrichmeyer                             FernUniversitaet Hagen
FAX:   +49 2371/566236                          LG Elektronische Schaltungen
EMAIL: fritz.heinrichmeyer@fernuni-hagen.de     Frauenstuhlweg 31
PHONE: +49 02371/566-243                        58644 Iserlohn (Germany)
WWW:  http://ES-sun2.fernuni-hagen.de



From rharris@chestnut.com  Mon Jul 17 18:26:01 1995
Return-Path: <rharris@chestnut.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA20733; Mon, 17 Jul 95 18:26:01 CDT
Received: from almond.chestnut.com by cli.com (4.1/SMI-4.1)
	id AA05840; Mon, 17 Jul 95 16:47:38 CDT
Received: (from rharris@localhost) by almond.chestnut.com (8.6.9/8.6.9) id RAA29103 for gcl@cli.com; Mon, 17 Jul 1995 17:42:49 -0400
Date: Mon, 17 Jul 1995 17:42:49 -0400
From: Richard Harris <rharris@chestnut.com>
Message-Id: <199507172142.RAA29103@almond.chestnut.com>
To: gcl@cli.com
Subject: PCL problems

Does someone want to summarize the PCL compilation problems that
have been reported in gcl lately?  I can fix them, if I am given
enough details.  I am not on this mailing list; please reply to
rharris@chestnut.com.

Richard Harris

From tmb@almaden.ibm.com  Tue Jul 18 21:44:37 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21298; Tue, 18 Jul 95 21:44:37 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA09221; Tue, 18 Jul 95 20:18:33 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 6454;
   Tue, 18 Jul 95 18:16:21 PDT
Received: by ALMADEN (XAGENTA 3.0) id 2425; Tue, 18 Jul 1995 18:16:20 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA26001; Tue, 18 Jul 1995 18:18:27 -0700
Date: Tue, 18 Jul 1995 18:18:27 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507190118.AA26001@zen.almaden.ibm.com>
To: gcl@cli.com
Subject: problems with dynamic loading under Linux
Reply-To: <tmb@almaden.ibm.com>


I'm running Linux 1.2.1 and GCL 2.1.  I believe I'm using a.out
format.  I'm having problems dynamically loading C functions into the
executable.  Here is a transcript summarizing my problems; note the
lines starting with ";;;"; "tardis" is the name of the machine.

Any help you can offer would be appreciated.

Another comment: the documentation on calling C from Lisp is a little
difficult to find; "C Interface" in the Info file has virtually no
information (most of it is under "GCL Specific), and I didn't find
"littleXlsp" until today...

                        Cheers,
                                Thomas.

tardis$ cat try.c
#include "cmpinclude.h"

init_code() {
    write(2,"hi\n",3);
    return 0;
}

tardis$ make try.o
cc -I/usr/local/src/gcl/gcl-2.1/h   -c try.c -o try.o
tardis$

;;; It seems that the Linux version is configured not to accept
;;; data appended to the ".o" file; unfortunately, rather than
;;; treating a non-existent data file as an empty one, "open_fasd"
;;; treats it as a fatal error.

tardis$ cat > try.data
#
()
tardis$

;;; Well, things sort of work, except for the crash...

tardis$ lisp
GCL (GNU Common Lisp)  Version(2.1) Mon Jul 17 19:20:51 PDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(load "try.o")
Loading try.o
hi

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at LOAD.  Type :H for Help.
>>tardis$

;;; Let's try the faslink stuff instead

tardis$ lisp
GCL (GNU Common Lisp)  Version(2.1) Mon Jul 17 19:20:51 PDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si::faslink "try.o" "-lc")
ld: cannot open linker script file 68b000: No such file or directory

Error: The linkage editor failed.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at SYSTEM:FASLINK.  Type :H for Help.
>>tardis$

;;; Oops, two flags are wrong for Linux; that should be
;;; a "-R" instead of a "-A", and "-Ttext" instead of "-T"
;;; (the latter invokes a linker script file, hence the
;;; error message).
;;;
;;; Let's kludge around this one.

tardis$ cat > ld
#!/usr/bin/perl
grep(s/-T/-Ttext/,@ARGV);
grep(s/-A/-R/,@ARGV);
print "[@ARGV]\n";
system "/usr/bin/ld",@ARGV;
exit(0);
tardis$

;;; Here we go; the link works, but things fail even without
;;; running the init_code() function...
;;; (Why is it running the linker twice anyway?)

tardis$ lisp
GCL (GNU Common Lisp)  Version(2.1) Mon Jul 17 19:20:51 PDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si::faslink "try.o" "-lc")
[-d -S -N -x -R /usr/local/lib/gcl-2.1/unixport/saved_pcl_clx -Ttext 68b000 try.o -lc -o /tmp/fasltemp4305]
[-d -S -N -x -R /usr/local/lib/gcl-2.1/unixport/saved_pcl_clx -Ttext 639000 try.o -lc -o /tmp/fasltemp4305]
start address -T 639000
Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at SYSTEM:FASLINK.  Type :H for Help.
tardis$

From kr@shell.portal.com  Wed Jul 19 20:50:26 1995
Return-Path: <kr@shell.portal.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21722; Wed, 19 Jul 95 20:50:26 CDT
Received: from nova.unix.portal.com by cli.com (4.1/SMI-4.1)
	id AA13018; Wed, 19 Jul 95 19:07:31 CDT
Received: from jobe.shell.portal.com (jobe.shell.portal.com [156.151.3.4]) by nova.unix.portal.com (8.6.11/8.6.5) with ESMTP id RAA10986; Wed, 19 Jul 1995 17:06:37 -0700
Received: from DialupEudora (jobe.shell.portal.com [156.151.3.4]) by jobe.shell.portal.com (8.6.11/8.6.5) with SMTP id RAA14028; Wed, 19 Jul 1995 17:06:31 -0700
X-Sender: kr@pop.shell.portal.com
Message-Id: <v02110105ac3356b31e1e@DialupEudora>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: \p\r\r\e%, 19 Jul 1995 17:07:20 -0800
To: Brian_Leverich@rand.org, Jeff Dalton <jeff@aiai.ed.ac.uk>
From: kr@shell.portal.com (kr)
Subject: Re: Can't get garnet to compile / giving up on CL ?
Cc: bb-comp-windows-garnet@cs.cmu.edu, gcl@cli.com

At 11:00 7/19/95, Brian Leverich wrote on the Garnet mailing list:
>It's just not worth the hassle.  If we can't build real tools, we
>ought to throw in the towel on Common Lisp, let the schools teach
>Scheme as an afterthought, and get on with doing work with more
>appropriate tools.

All this negative ranting and complaining of course won't help at all to
change the situation. Note that when you say "if we can't build", then you
are part of "we". The free implementations are all done by volunteers, and
the progress depends strictly on people doing things. So why not fix broken
stuff instead of spending the same amount of time complaining ?
I also do not think it is fair to say "_we_ ought to throw in the towel on
Common Lisp". If this is what you personally are going to do, fine, I don't
mind. But you have to say that this is what _you_ are doing. Trying to
foster pessimism for everybody else on a public forum is unfair and does
not make any sense. After all, if this topic does not interest you, and if
you  have already given up, then you do not have to read this mailing list.
I for one will choose to ignore your advice. I will continue to stick with
CL.

>BTW, I'm not at all a C bigot -- if there was a serious move to take
>some core set of tools (say GCL, PCL, CLX, GARNET, ILISP, and maybe a
>few others), get them all cleaned up and integrated into one
>environment on one platform (say Linux), get them running on multiple
>platforms, and start integrating options (like Franz or Harlequin,
>CLIM, ... ), then I'd be in there up to my elbows.

OK, do it !   (Hic Rhodos, hic salta !)
As most of these tools largely already exist, then according to your
theory, it would not be too much work just integrating them. It certainly
will be much less work than re-writing such stuff from scratch.
So why are you not considering a serious move in that direction, if you
love LISP so much ? You might even find fellow friends to help you.

>But that's not going to happen, so it's time to throw in the towel
>and go join the huddled masses.  -B

You seem to give up rather easily, so close to the goal...
Given that attitude, the only result will actually be dissolution.
A more positive attitude will stand a much better chance for getting you
the tools you really want.


Greetings
Markus Krummenacker



From tmb@almaden.ibm.com  Thu Jul 20 00:00:31 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21735; Thu, 20 Jul 95 00:00:31 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA13228; Wed, 19 Jul 95 22:25:32 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 0350;
   Wed, 19 Jul 95 20:23:17 PDT
Received: by ALMADEN (XAGENTA 3.0) id 3390; Wed, 19 Jul 1995 20:23:16 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA27156; Wed, 19 Jul 1995 20:25:23 -0700
Date: Wed, 19 Jul 1995 20:25:23 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507200325.AA27156@zen.almaden.ibm.com>
To: gcl@cli.com
Subject: dynamic loading in GCL 2.1 under Linux and AIX
Reply-To: <tmb@almaden.ibm.com>


I want to be able to write Lisp wrappers around existing C libraries,
but trying to do this in GCL has been an exercise in frustration.

I can get CLINES/DEFCENTRY to work, but that doesn't allow linking
with C libraries.

In principle, incremental linking of a ".o" file containing wrapper
code with the library should result in a ".o" file that can be loaded
into GCL.  But SI::FASLINK, which implements this directly, gives bad
flags to the linker (and correcting them doesn't fix things either).
I was thinking I could do the incremental linking by hand and use LOAD
to load the resulting ".o" file, but I'm not even able to make that
work for simple ".c" files; anything other than "do_init(VV)" in
"init_code" causes a SEGV in GCL when I try to load the file.

I would REALLY appreciate if someone could help me or tell me that
this just isn't possible in GCL.

                                Thanks,
                                Thomas.

From jeff@aiai.ed.ac.uk  Thu Jul 20 14:18:01 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22063; Thu, 20 Jul 95 14:18:01 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA15033; Thu, 20 Jul 95 12:18:14 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id SAA19997; Thu, 20 Jul 1995 18:16:19 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 20 Jul 95 18:15:38 BST
Date: Thu, 20 Jul 95 18:15:38 BST
Message-Id: <8780.9507201715@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: bb-comp-windows-garnet@cs.cmu.edu
Cc: Brian_Leverich@rand.org, Robert Goldman <goldman@src.honeywell.com>,
        kr@shell.portal.com, gcl@cli.com

I didn't want to start a language war, and I'm sure we can still avoid
one.  I would like -- indeed, I need -- to understand the views of those
who have (for now at least) given up ono Lisp.  Reasons to stick with
Lisp will also be useful.  The reason: I am currently having to justify
the use of Common Lisp on a (research) project.

I would also like to hear about the experiences of any Lisp
programmers who have moved from Common Lisp to C or C++, e.g.
of anyone who used to work on Garnet and now works on Amulet.

I've been programming in Lisp for a long time.  I've also done a
fair amount of programming in other languages, including C (but
not C++).  I find that I get a big win on programming time in
Lisp, and I'd hate to be stuck in C where it's difficult to
inspect data at run-time, where I can't load in code or redefine
functions, and so on.  I know that such problems can be decreased,
with enough work, but I don't really want to spend the time
doing it.

I can understand why someone else might not get such a big win
in programming time when using Lisp.  For instance, if I were
trying to deliver a product that had to work with several different
Common Lisp implementations, I might feel the same way.  Even
more so if I needed an "interesting" GUI and to do it all from
within Lisp (rather than, say, by running a spearate non-Lisp
program connected by a pipe).

But for the kind of work I do, which tends to be "exploratory"
in nature, I find Common Lisp to be far better than C.

In any case, I don't feel that Common Lisp confines me to high-end
SPARCstations with 30MB executables.  I in fact use such a machine
at work.  But I can run the same programs on a 386 PC (running
FreeBSD, 16 Meg but formerly 8) at home.

I also have some sympathy with Markus Krummenacker's views.
Indeed, when I have time I spend some on the volunteer work
he mentions.  For instance, I've ported KCL/AKCL to a couple
of machines, and I developed a version/port of Franz Lisp
for [345]86/BSD machines (this includes a Franz-to-C Compiler).
Two of my friends -- Richard Tobin and Alan Black -- did an
early port of AKCL to 386BSD and also an early port of GCC
(needed for comiling AKCL).

-- jeff

From tmb@almaden.ibm.com  Thu Jul 20 16:26:37 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22115; Thu, 20 Jul 95 16:26:37 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA15454; Thu, 20 Jul 95 14:40:57 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 2558;
   Thu, 20 Jul 95 12:38:45 PDT
Received: by ALMADEN (XAGENTA 3.0) id 3822; Thu, 20 Jul 1995 12:38:44 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA25985; Thu, 20 Jul 1995 12:40:48 -0700
Date: Thu, 20 Jul 1995 12:40:48 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507201940.AA25985@zen.almaden.ibm.com>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: Brian_Leverich@rand.org, Robert Goldman <goldman@src.honeywell.com>,
        kr@shell.portal.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <8780.9507201715@subnode.aiai.ed.ac.uk>
References: <8780.9507201715@subnode.aiai.ed.ac.uk>
Reply-To: <tmb@almaden.ibm.com>


Jeff Dalton writes:
 > I didn't want to start a language war, and I'm sure we can still avoid
 > one.  I would like -- indeed, I need -- to understand the views of those
 > who have (for now at least) given up ono Lisp.  Reasons to stick with
 > Lisp will also be useful.  The reason: I am currently having to justify
 > the use of Common Lisp on a (research) project.

Recently, I decided to give GCL a try again.  I can't use CMU CL
anymore, because it doesn't run on the machines I use here.  Well,
dynamic linking used to work in AKCL.  It doesn't anymore in GCL under
either AIX or Linux, the documentation doesn't explain how to, and
nobody has stood up to offer help.  That makes it pretty much academic
whether I want or don't want to use it.  Maybe that sounds like a very
specific problem, but I think it is symptomatic.  Those are the kinds
of problems one runs into when one needs to make CL interoperate
or integrate with existing software.

Too bad, since GCL seems to have acquired quite a bit of useful
functionality over the last few years, and the pure Lisp part is pretty
nice.  On the other hand, it still pales in comparison to languages
like Python and Perl, which have extensive built-in functionality (no
need even for an FFI to get "socket", but if you need an FFI, they
have that, too) and for which hundred of modules are available for all
sorts of tasks (SGML parsing, socket abstractions, distributed
processing, persistence, SQL interfaces, DBM interfaces, multiple
Window systems, etc.).

Have I "given up" on CommonLisp or Lisp?  No, but this current
project isn't going to get done in it because it can't get done
efficiently in it.

                                Thomas.

From jeff@aiai.ed.ac.uk  Thu Jul 20 16:31:52 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22120; Thu, 20 Jul 95 16:31:52 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA15462; Thu, 20 Jul 95 14:49:18 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id UAA21851; Thu, 20 Jul 1995 20:48:17 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 20 Jul 95 20:47:36 BST
Date: Thu, 20 Jul 95 20:47:36 BST
Message-Id: <9783.9507201947@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: goldman@src.honeywell.com
In-Reply-To: Robert P. Goldman's message of Thu, 20 Jul 95 14:17:42 CDT
Cc: bb-comp-windows-garnet@cs.cmu.edu, Brian_Leverich@rand.org,
        kr@shell.portal.com, gcl@cli.com

> My C-bigot friends tell me there are already C interpreters [...]

There are.  Or at least there were, a few years ago.  (I haven't
checked recently.)  But they have at least one problem: too slow.
(I seldom debug interpreted Lisp, BTW.)

> Besides, if you have to develop your own toolset, there goes the big
> time savings from Lisp you refer to above.

That might be true if I'd needed to do the toolset development
in order to get the time savings, but I didn't.

I'd also question it in any case.  I'd say the amount of time saved by
using Common Lisp instead of C is greater than the amount of time I've
spent on Common Lisp tool development.

> Final disclaimer:  I'm a heck of a lot more productive in Common
> Lisp.  I like working in Common Lisp.  I don't think that people who
> are doing exploratory programming should be forced into using
> inappropriate tools like C or C++.  I don't think that people who
> are doing shrink-wrap delivery programming should be forced into using
> inappropriate tools like Common Lisp.

Nor do I.

-- jeff


From jeff@aiai.ed.ac.uk  Thu Jul 20 16:32:06 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22124; Thu, 20 Jul 95 16:32:06 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA15479; Thu, 20 Jul 95 14:55:48 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id UAA21914; Thu, 20 Jul 1995 20:55:21 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 20 Jul 95 20:54:40 BST
Date: Thu, 20 Jul 95 20:54:41 BST
Message-Id: <9823.9507201954@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: tmb@almaden.ibm.com
In-Reply-To: Thomas Breuel's message of Thu, 20 Jul 1995 12:40:48 -0700
Cc: gcl@cli.com

> Recently, I decided to give GCL a try again.  I can't use CMU CL
> anymore, because it doesn't run on the machines I use here.  Well,
> dynamic linking used to work in AKCL.  It doesn't anymore in GCL under
> either AIX or Linux, the documentation doesn't explain how to, and
> nobody has stood up to offer help.

What do you mean by "dynamic linking"?  That load doesn't work
for compiled code?  That's a standard difficulty when porting
Lisps written in C, because the various unixes don't agree on
object file format (etc) and because they keep changing what they
do.  I'd try to help if I had a Linux machine, but unfortunately
I don't.

>      Those are the kinds
> of problems one runs into when one needs to make CL interoperate
> or integrate with existing software.

I have a fair amount of experience doing that kind of thing,
and I still think Lisp is a win over C.  But it would be
for someone to come to different conclusions than I have.

> Have I "given up" on CommonLisp or Lisp?  No, but this current
> project isn't going to get done in it because it can't get done
> efficiently in it.

Fair enough.

-- jeff

From blake@edge.net  Thu Jul 20 18:42:10 1995
Return-Path: <blake@edge.net>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22183; Thu, 20 Jul 95 18:42:10 CDT
Received: from edge.edge.net by cli.com (4.1/SMI-4.1)
	id AA15808; Thu, 20 Jul 95 16:46:29 CDT
Received: from edge (ip177.nash.edge.net [199.0.68.177]) by edge.edge.net (8.6.12/8.6.9) with SMTP id QAA26726; Thu, 20 Jul 1995 16:46:39 -0500
Date: Thu, 20 Jul 1995 16:46:39 -0500
Message-Id: <199507202146.QAA26726@edge.edge.net>
X-Sender: blake@edge.net
X-Mailer: Windows Eudora Version 1.4.4
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: tmb@almaden.ibm.com
From: blake@edge.net (Blake McBride)
Subject: Re: giving up on [common] lisp....
Cc: jeff@aiai.ed.ac.uk, Brian_Leverich@rand.org, goldman@src.honeywell.com,
        kr@shell.portal.com, gcl@cli.com,
        clisp-list@ma2s2.mathematik.uni-karlsruhe.de

>Recently, I decided to give GCL a try again.  I can't use CMU CL
>anymore, because it doesn't run on the machines I use here.  Well,
>dynamic linking used to work in AKCL.  It doesn't anymore in GCL under
>either AIX or Linux, the documentation doesn't explain how to, and
>nobody has stood up to offer help.  That makes it pretty much academic
>whether I want or don't want to use it.  Maybe that sounds like a very
>specific problem, but I think it is symptomatic.  Those are the kinds
>of problems one runs into when one needs to make CL interoperate
>or integrate with existing software.
>

I don't know what it is about these lisp people.  For no apparent
reason they insist on using non-portable tools and techniques, and sticking
their finger at non-academics (the commercial world).  IMO, lisp is the most
powerful and flexable language in existance.  Given the relatively recient
increase in power associated with common machines (PCs), it is now, for
the first time, that lisp has a chance of being used as it should!

In spite of this fact, the people associated with GCL & CLISP insist on
_unnecessarily_ using tools and techniques which preclude those
tools from use on commonly available machines.

Go figure....

--blake

-- 
Blake McBride				Algorithms Corporation
615-791-1636 voice			3020 Liberty Hills Drive
615-791-7736 fax			Franklin, TN  37064
blake@edge.net				USA


From leverich@rand.org  Thu Jul 20 19:26:39 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22194; Thu, 20 Jul 95 19:26:39 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA15933; Thu, 20 Jul 95 17:41:25 CDT
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id PAA06141; Thu, 20 Jul 1995 15:37:01 -0700
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id PAA14908; Thu, 20 Jul 1995 15:37:00 -0700
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.10) with SMTP id PAA29779; Thu, 20 Jul 1995 15:36:58 -0700
Message-Id: <199507202236.PAA29779@atlantis.rand.org>
To: kr@shell.portal.com (kr)
Cc: Jeff Dalton <jeff@aiai.ed.ac.uk>, bb-comp-windows-garnet@cs.cmu.edu,
        gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: Can't get garnet to compile / giving up on CL ? 
In-Reply-To: Your message of {date}.
             <v02110105ac3356b31e1e@DialupEudora> 
Date: Thu, 20 Jul 95 15:36:54 PDT
From: Brian Leverich <leverich@rand.org>



-- Your message was:   (from "kr@shell.portal.com")

> All this negative ranting and complaining of course won't help at all to
> change the situation. Note that when you say "if we can't build", then you

It's not negative ranting and complaining.  It's the way things are.
And yes, I'm worried that it won't change the situation -- I keep
having the feeling like the Lisp community, in lemming-like solidarity
with the AI community, is going relearn the lesson that things that
work uniformly beat things that are intellectually neat.

> are part of "we". The free implementations are all done by volunteers, and
> the progress depends strictly on people doing things. So why not fix broken
> stuff instead of spending the same amount of time complaining ?

The RAND folks have been maintaining the Linux/GCL/CLX/Garnet environment
for public use -- it's available in ftp://rand.org/pub/leverich/.  We
already do contribute, though of course not on the scale of wfs or bam.

Our gripe-to-work ration is pretty low.  8-)

> I also do not think it is fair to say "_we_ ought to throw in the towel on
> Common Lisp". If this is what you personally are going to do, fine, I don't
> mind. But you have to say that this is what _you_ are doing. Trying to
> foster pessimism for everybody else on a public forum is unfair and does
> not make any sense. After all, if this topic does not interest you, and if
> you    have already given up, then you do not have to read this mailing list.
> I for one will choose to ignore your advice. I will continue to stick with
> CL.

I'm not interested in fostering pessism.  What a waste of cycles!  I
_am_ interested in fostering an understanding that we _are_ badly
broken and if we don't fix it then we're going to lose big on our
ability to support anything other than academic research.

> >BTW, I'm not at all a C bigot -- if there was a serious move to take
> >some core set of tools (say GCL, PCL, CLX, GARNET, ILISP, and maybe a
> >few others), get them all cleaned up and integrated into one
> >environment on one platform (say Linux), get them running on multiple
> >platforms, and start integrating options (like Franz or Harlequin,
> >CLIM, ... ), then I'd be in there up to my elbows.
>
> OK, do it !   (Hic Rhodos, hic salta !)
> As most of these tools largely already exist, then according to your
> theory, it would not be too much work just integrating them. It certainly
> will be much less work than re-writing such stuff from scratch.
> So why are you not considering a serious move in that direction, if you
> love LISP so much ? You might even find fellow friends to help you.

It's _not_ easy - we've been doing it for the last several years, and
it's major hours.  If a group of other individuals and labs wanted to
team with us to bring our Linux/GCL/CLX/Garnet environment up-to-date
and then start adding platforms and more goodies, it would make our
day.

VOLUNTEERS?  I will kick in man-months if other folks will make similar
commitments.

> >But that's not going to happen, so it's time to throw in the towel
> >and go join the huddled masses.  -B
>
> You seem to give up rather easily, so close to the goal...

I give up after having hacked Lisp for 20 years, having watched
vendors disappear and software fall into disrepair, and having seen
the CL community go into a collective state of denial where we refuse
to face the fact that we are becoming irrelevant in the software world
because we can't produce tools that work for nonacademic purposes.

> Given that attitude, the only result will actually be dissolution.
> A more positive attitude will stand a much better chance for getting you
> the tools you really want.

No, wrong.  The attitude that "everything is still OK" will bring us
dissolution.  A little healthy fear that motivated some concrete
activity would probably give us a better chance.  -B

> Greetings
> Markus Krummenacker

------------
Dr. Brian Leverich
Information Systems Scientist, The RAND Corporation
leverich@rand.org

  ------------------

From leverich@rand.org  Thu Jul 20 19:59:47 1995
Return-Path: <leverich@rand.org>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22199; Thu, 20 Jul 95 19:59:47 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA16013; Thu, 20 Jul 95 18:18:45 CDT
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id QAA07671; Thu, 20 Jul 1995 16:11:58 -0700
Received: from atlantis.rand.org (atlantis.rand.org [130.154.12.124]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id QAA17730; Thu, 20 Jul 1995 16:11:58 -0700
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.10) with SMTP id QAA29815; Thu, 20 Jul 1995 16:11:56 -0700
Message-Id: <199507202311.QAA29815@atlantis.rand.org>
To: blake@edge.net (Blake McBride)
Cc: tmb@almaden.ibm.com, jeff@aiai.ed.ac.uk, goldman@src.honeywell.com,
        kr@shell.portal.com, gcl@cli.com,
        clisp-list@ma2s2.mathematik.uni-karlsruhe.de, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: giving up on [common] lisp.... 
In-Reply-To: Your message of Thu, 20 Jul 95 16:46:39 EST.
             <199507202146.QAA26726@edge.edge.net> 
Date: Thu, 20 Jul 95 16:11:54 PDT
From: Brian Leverich <leverich@rand.org>



-- Your message was:   (from "blake@edge.net")

  In spite of this fact, the people associated with GCL & CLISP insist on
  _unnecessarily_ using tools and techniques which preclude those
  tools from use on commonly available machines.

  ------------------


It's important to note that, whatever else may be true, the community
owes huge debts to the GCL and CLISP team.  They are doing what seems
best to them, given their available resources.

All of us camp-follower types probably should be looking for ways to
strengthen their efforts, like contributing code or doing clever things
with what we have.

For example, the MS-DOS version of GCL 1.1 just begged for someone to
marry CLX to DESQview/X, so we could finally have a windowing (albeit
not Windoze) Lisp on stock hardware without going all the way to
Linux/BSD or the expense of ACL/PC.

*sigh*  The problem is just getting enough people focussed on building
and maintaining workable code for the community.  -B



From tmb@almaden.ibm.com  Thu Jul 20 20:22:53 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22204; Thu, 20 Jul 95 20:22:53 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA16016; Thu, 20 Jul 95 18:22:29 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 3484;
   Thu, 20 Jul 95 16:20:09 PDT
Received: by ALMADEN (XAGENTA 3.0) id 4080; Thu, 20 Jul 1995 16:20:08 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA20786; Thu, 20 Jul 1995 16:22:09 -0700
Date: Thu, 20 Jul 1995 16:22:09 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507202322.AA20786@zen.almaden.ibm.com>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <9823.9507201954@subnode.aiai.ed.ac.uk>
References: <9823.9507201954@subnode.aiai.ed.ac.uk>
Reply-To: <tmb@almaden.ibm.com>


Jeff Dalton writes:
 > What do you mean by "dynamic linking"?  That load doesn't work
 > for compiled code?

Well, more specifically, it doesn't work for ".o" files that were
compiled by something other than COMPILE-FILE.

 > That's a standard difficulty when porting
 > Lisps written in C, because the various unixes don't agree on
 > object file format (etc) and because they keep changing what they
 > do.  I'd try to help if I had a Linux machine, but unfortunately
 > I don't.

GCL already knows how to do dynamic linking, since it has not trouble
loading the ".o" files that it generates itself.

I think the problem might be related to the fact that the FASL format
expects a ".data" file that corresponds to the ".o" file and must
contain the right information for things to work.

If there were more information (documentation, source code comments)
about the FASL format and the structure of compiled code, I could
probably get it to work.  Apparently, there are two kinds of ".data"
files, textual and binary.  The ".data" file also seems to contain
some addresses that are related to the ".o" file (something about
where to put the data segment).

I did look at the source code and also did some tracing at the
instruction level and what I found was the following: if I have an
"init_code() { write(2,"hi\n",3); }" function and I kludge up a simple
".data" file to go with it (say "#()"), "init_code" gets called, the
"write" happens, "init_code" returns to its caller, but the next "ret"
instruction jumps to an invalid address, so the stack got clobbered in
some way.  There don't seem to be debugging symbols in the "saved_gcl"
that is generated by default, so tracing things any further is
cumbersome.

Ultimately, the GCL dynamic loader should probably be rewritten by
combining bits and pieces of "ld" and "bfd", but that's a major
undertaking...

 > I have a fair amount of experience doing that kind of thing,
 > and I still think Lisp is a win over C.  But it would be
 > for someone to come to different conclusions than I have.

I think actually there are few projects where the choice of Lisp vs. C
even realistically comes up.  In this case, C wasn't even a
consideration.  Out of curiosity, I have started doing this one in
Python.  I'm favorably impressed by the amount of useful code
available for it and its ease of use.  Fortunately, I don't need a
native code compiler or heavy optimization for this project, so it's a
viable choice (it would be interesting to measure how Python compares
to undeclared GCL code or Scheme/SCL/GUILE).

                        Cheers,
                                Thomas.


From blake@edge.net  Thu Jul 20 22:24:02 1995
Return-Path: <blake@edge.net>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22223; Thu, 20 Jul 95 22:24:02 CDT
Received: from edge.edge.net by cli.com (4.1/SMI-4.1)
	id AA16143; Thu, 20 Jul 95 20:44:22 CDT
Received: from edge (ip158.nash.edge.net [199.0.68.158]) by edge.edge.net (8.6.12/8.6.9) with SMTP id UAA03141; Thu, 20 Jul 1995 20:44:53 -0500
Date: Thu, 20 Jul 1995 20:44:53 -0500
Message-Id: <199507210144.UAA03141@edge.edge.net>
X-Sender: blake@edge.net
X-Mailer: Windows Eudora Version 1.4.4
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: Brian_Leverich@rand.org
From: blake@edge.net (Blake McBride)
Subject: Re: Can't get garnet to compile / giving up on CL ? 
Cc: kr@shell.portal.com, jeff@aiai.ed.ac.uk, bb-comp-windows-garnet@cs.cmu.edu,
        gcl@cli.com

Brian_Leverich@rand.org writes:

>It's not negative ranting and complaining.  It's the way things are.
>And yes, I'm worried that it won't change the situation -- I keep
>having the feeling like the Lisp community, in lemming-like solidarity
>with the AI community, is going relearn the lesson that things that
>work uniformly beat things that are intellectually neat.

Yes!


>I'm not interested in fostering pessism.  What a waste of cycles!  I
>_am_ interested in fostering an understanding that we _are_ badly
>broken and if we don't fix it then we're going to lose big on our
>ability to support anything other than academic research.

Yes!  Yes!


>I give up after having hacked Lisp for 20 years, having watched
>vendors disappear and software fall into disrepair, and having seen
>the CL community go into a collective state of denial where we refuse
>to face the fact that we are becoming irrelevant in the software world
>because we can't produce tools that work for nonacademic purposes.

Yes! Yes! Yes!

>
>> Given that attitude, the only result will actually be dissolution.
>> A more positive attitude will stand a much better chance for getting you
>> the tools you really want.
>
>No, wrong.  The attitude that "everything is still OK" will bring us
>dissolution.  A little healthy fear that motivated some concrete
>activity would probably give us a better chance.  -B


Right on.

I see my opinions are not mine alone....

--blake

-- 
Blake McBride				Algorithms Corporation
615-791-1636 voice			3020 Liberty Hills Drive
615-791-7736 fax			Franklin, TN  37064
blake@edge.net				USA


From jeff@aiai.ed.ac.uk  Thu Jul 20 23:03:10 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22227; Thu, 20 Jul 95 23:03:10 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA16183; Thu, 20 Jul 95 21:27:59 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id DAA24932; Fri, 21 Jul 1995 03:27:40 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 21 Jul 95 03:26:58 BST
Date: Fri, 21 Jul 95 03:26:57 BST
Message-Id: <11868.9507210226@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: tmb@almaden.ibm.com
In-Reply-To: Thomas Breuel's message of Thu, 20 Jul 1995 16:22:09 -0700
Cc: gcl@cli.com

> Jeff Dalton writes:
>  > What do you mean by "dynamic linking"?  That load doesn't work
>  > for compiled code?
> 
> Well, more specifically, it doesn't work for ".o" files that were
> compiled by something other than COMPILE-FILE.

That isn't necessarily the same mechanism.  I'm pretty sure that
in some cases (ie for some machines/operating systems), GCL uses
its own loader for compiled Common Lisp files.  For other .o
files, it would use "ld -a".  If "ld -a", or some equivalent,
doesn't exist, you can't load those files.  For a while (maybe
still?), that was the case on Suns running Solaris 2.

>  > That's a standard difficulty when porting
>  > Lisps written in C, because the various unixes don't agree on
>  > object file format (etc) and because they keep changing what they
>  > do.  I'd try to help if I had a Linux machine, but unfortunately
>  > I don't.
> 
> GCL already knows how to do dynamic linking, since it has not trouble
> loading the ".o" files that it generates itself.

See above.

Could be be that you're just calling the wrong function?  On Suns,
one uses load for compiled Lisp and si:faslink for other .o files.
E.g. (si:faslink "foo.o" "-lc").

> I think actually there are few projects where the choice of Lisp vs. C
> even realistically comes up.

Sometimes it comes up because a person makes it come up.
That's what I'm faced with, at least.

-- jeff

From tmb@almaden.ibm.com  Fri Jul 21 00:17:10 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22403; Fri, 21 Jul 95 00:17:10 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA16366; Thu, 20 Jul 95 22:39:09 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 4089;
   Thu, 20 Jul 95 20:36:56 PDT
Received: by ALMADEN (XAGENTA 3.0) id 4236; Thu, 20 Jul 1995 20:36:56 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA20827; Thu, 20 Jul 1995 20:39:00 -0700
Date: Thu, 20 Jul 1995 20:39:00 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507210339.AA20827@zen.almaden.ibm.com>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <11868.9507210226@subnode.aiai.ed.ac.uk>
References: <11868.9507210226@subnode.aiai.ed.ac.uk>
Reply-To: <tmb@almaden.ibm.com>


Jeff Dalton writes:
 > > Jeff Dalton writes:
 > >  > What do you mean by "dynamic linking"?  That load doesn't work
 > >  > for compiled code?
 > >
 > > Well, more specifically, it doesn't work for ".o" files that were
 > > compiled by something other than COMPILE-FILE.
 >
 > That isn't necessarily the same mechanism.  I'm pretty sure that
 > in some cases (ie for some machines/operating systems), GCL uses
 > its own loader for compiled Common Lisp files.  For other .o
 > files, it would use "ld -a".  If "ld -a", or some equivalent,
 > doesn't exist, you can't load those files.  For a while (maybe
 > still?), that was the case on Suns running Solaris 2.

GCL is capable of dynamically loading ".o" files produced by the C
compiler; it doesn't matter whether "ld -a" exists or not on the
architecture.  Now, maybe there are restrictions on how the ".o" files
are generated that it knows how to load; if you know of suchr
restrictions, please let me know.

So far, that's all I'm trying to do by hand: produce a ".o" file and a
corresponding ".data" file that I can load and use inside Linux.  I
have generated examples using the :C-FILE and :DATA-FILE keywords to
COMPILE-FILE, but the data file is binary, and modifying the :C-FILE
in innocuous ways causes the ".o" file to crash on load.

The incremental linking is there for resolving symbols against
libraries.  That happens to be ultimately what I want to do.
SI::FASLINK used to do that (under AKCL at least), but it doesn't seem
fully supported anymore and it's broken under Linux.  In any case, if
I can dynamically load ".o" files produced by the C compiler using
LOAD, I can do the incremental linking myself behind GCL's back.  GCL
shouldn't be able to tell (or care) whether a ".o" file it gets was
incrementally linked or generated in one piece by the C compiler.
Note that GCL apparently also has new mechanisms for resolving symbol
dependencies between ".o" files that do not involve linker support.

 > Could be be that you're just calling the wrong function?  On Suns,
 > one uses load for compiled Lisp and si:faslink for other .o files.
 > E.g. (si:faslink "foo.o" "-lc").

SI::FASLINK is broken under Linux.  It gives the wrong flags to the
linker.  But even after I fixed the flags, it still doesn't work.
Otherwise, I'd be using it.  There is a bug somewhere.

                                Thomas.

From jeff@aiai.ed.ac.uk  Fri Jul 21 12:28:59 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22622; Fri, 21 Jul 95 12:28:59 CDT
Received: from haymarket.ed.ac.uk ([129.215.128.53]) by cli.com (4.1/SMI-4.1)
	id AA17775; Fri, 21 Jul 95 10:16:39 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id QAA06506; Fri, 21 Jul 1995 16:14:06 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 21 Jul 95 16:13:25 BST
Date: Fri, 21 Jul 95 16:13:25 BST
Message-Id: <17175.9507211513@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: tmb@almaden.ibm.com
In-Reply-To: Thomas Breuel's message of Thu, 20 Jul 1995 20:39:00 -0700
Cc: gcl@cli.com

>  > >  > What do you mean by "dynamic linking"?  That load doesn't work
>  > >  > for compiled code?
>  > >
>  > > Well, more specifically, it doesn't work for ".o" files that were
>  > > compiled by something other than COMPILE-FILE.
>  >
>  > That isn't necessarily the same mechanism.  I'm pretty sure that
>  > in some cases (ie for some machines/operating systems), GCL uses
>  > its own loader for compiled Common Lisp files.  For other .o
>  > files, it would use "ld -a".  If "ld -a", or some equivalent,
>  > doesn't exist, you can't load those files.  For a while (maybe
>  > still?), that was the case on Suns running Solaris 2.
> 
> GCL is capable of dynamically loading ".o" files produced by the C
> compiler; it doesn't matter whether "ld -a" exists or not on the
> architecture.  Now, maybe there are restrictions on how the ".o" files
> are generated that it knows how to load; if you know of suchr
> restrictions, please let me know.

It did matter at one time whether "ld -a" existed or not.  I know
this, if for no other reason, because I've ported AKCL.  I haven't
looked at recent sources in detail, so I don't know exactly what
it does now.  But being able to load the ".o" files produced
by compile-file doesn't necessarily mean it can load .o files
in general.  I wasn't able to use GCL on Sun Solaris 2 machines
for just that reason.

> So far, that's all I'm trying to do by hand: produce a ".o" file and a
> corresponding ".data" file that I can load and use inside Linux. 

Yes, and what I'm suggesting is that that sort of thing may not
be enough.

> The incremental linking is there for resolving symbols against
> libraries.  That happens to be ultimately what I want to do.
> SI::FASLINK used to do that (under AKCL at least), but it doesn't seem
> fully supported anymore and it's broken under Linux. 

I don't know what you say that.  I use it all the time in GCL 1.0
under FreeBSD.

> In any case, if I can dynamically load ".o" files produced by the
> C compiler using LOAD, I can do the incremental linking myself
> behind GCL's back.  GCL shouldn't be able to tell (or care)
> whether a ".o" file it gets was incrementally linked or generated
> in one piece by the C compiler.

Such tricks do sometimes work.  I used to use them with KCL on Sun3s.

> Note that GCL apparently also has new mechanisms for resolving symbol
> dependencies between ".o" files that do not involve linker support.

Ok.

>  > Could be be that you're just calling the wrong function?  On Suns,
>  > one uses load for compiled Lisp and si:faslink for other .o files.
>  > E.g. (si:faslink "foo.o" "-lc").
> 
> SI::FASLINK is broken under Linux.  It gives the wrong flags to the
> linker.  But even after I fixed the flags, it still doesn't work.
> Otherwise, I'd be using it.  There is a bug somewhere.

Ok.  If I had a machine that ran Linux, I'd look at it.
Unfortunately, I don't.

-- jeff

From tmb@almaden.ibm.com  Fri Jul 21 17:10:09 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22695; Fri, 21 Jul 95 17:10:09 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA18554; Fri, 21 Jul 95 14:55:26 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 6265;
   Fri, 21 Jul 95 12:53:14 PDT
Received: by ALMADEN (XAGENTA 3.0) id 4623; Fri, 21 Jul 1995 12:53:13 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA20817; Fri, 21 Jul 1995 12:55:17 -0700
Date: Fri, 21 Jul 1995 12:55:17 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507211955.AA20817@zen.almaden.ibm.com>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <17175.9507211513@subnode.aiai.ed.ac.uk>
References: <17175.9507211513@subnode.aiai.ed.ac.uk>
Reply-To: <tmb@almaden.ibm.com>


Jeff Dalton writes:
 > > GCL is capable of dynamically loading ".o" files produced by the C
 > > compiler; it doesn't matter whether "ld -a" exists or not on the
 > > architecture.
 >
 > It did matter at one time whether "ld -a" existed or not.

Yes: when it didn't have other mechanisms for dynamic loading, if
there was no "ld -a", you couldn't load any compiled files, Lisp or
otherwise.  I think that's ancient history, though.

 > > So far, that's all I'm trying to do by hand: produce a ".o" file and a
 > > corresponding ".data" file that I can load and use inside Linux.
 >
 > Yes, and what I'm suggesting is that that sort of thing may not
 > be enough.

Well, I'm not superstitious.  GCL can read ".o" files produced by the
C compiler, so there must be rules for how to construct ".o" files and
".data" files that it can read, rules that the Lisp compiler and
COMPILE-FILE follow.  That's what I'm trying to find out.  Maybe that
capability is not enough, but I can't really think of any constraints
on the ".o" files that would make the normal LOAD unsuitable for my
purposes.

 > > The incremental linking is there for resolving symbols against
 > > libraries.  That happens to be ultimately what I want to do.
 > > SI::FASLINK used to do that (under AKCL at least), but it doesn't seem
 > > fully supported anymore and it's broken under Linux.
 >
 > I don't know what you say that.  I use it all the time in GCL 1.0
 > under FreeBSD.

I think SI:FASLINK is now SI::FASLINK, the documentation seems to
discourage using it and, I believe even suggests using LOAD, and there
are alternative mechanisms for resolving symbols among ".o" files
being put into place.  Note that GCL 2.1 seems to be different from
1.0 or 1.1 in this regard; in fact SI::FASLINK also apparently works
for GCL 1.1 under Linux.

Hmm. Altogether, it seems like WFS is the only one who really knows
what is happening in that code, so either I have to pore over the code
myself again or I have to wait for his response.

                        Thomas.

From jeff@aiai.ed.ac.uk  Fri Jul 21 21:14:10 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22749; Fri, 21 Jul 95 21:14:10 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA19025; Fri, 21 Jul 95 19:21:39 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id AAA12697; Sat, 22 Jul 1995 00:58:15 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Sat, 22 Jul 95 00:57:34 BST
Date: Sat, 22 Jul 95 00:57:32 BST
Message-Id: <20667.9507212357@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: tmb@almaden.ibm.com
In-Reply-To: tmb@almaden.ibm.com's message of Fri, 21 Jul 1995 12:55:17 -0700
Cc: gcl@cli.com

>  > > GCL is capable of dynamically loading ".o" files produced by the C
>  > > compiler; it doesn't matter whether "ld -a" exists or not on the
>  > > architecture.
>  >
>  > It did matter at one time whether "ld -a" existed or not.
> 
> Yes: when it didn't have other mechanisms for dynamic loading, if
> there was no "ld -a", you couldn't load any compiled files, Lisp or
> otherwise.  I think that's ancient history, though.

This is becoming somewhat strange...

1. "ld -A" is part of a mechanism for dynamic loading, as you
   presumably know.
   (Sorry for the capitalization error on the "-A" in earlier
   messages, BTW.)

2. I just checked on my 386, and GCL 1.1 for FreeBSD 2.0, and it
   does pretty much what I was suggesting: when loading compiled Lisp,
   it uses its own loader, but when loading compiled C it uses
   "ld -A".  So the two cases use different mechanisms.

> Well, I'm not superstitious.  GCL can read ".o" files produced by the
> C compiler, so there must be rules for how to construct ".o" files and
> ".data" files that it can read, rules that the Lisp compiler and
> COMPILE-FILE follow.  That's what I'm trying to find out.  Maybe that
> capability is not enough, but I can't really think of any constraints
> on the ".o" files that would make the normal LOAD unsuitable for my
> purposes.

You may well be right, but it isn't necessarily so.  For instance,
the Franz Lisp loader for it's own .o files was not at all capable
of loading .o files in general.  It had to use "ld -A".  

> I think SI:FASLINK is now SI::FASLINK, the documentation seems to
> discourage using it and, I believe even suggests using LOAD, and there
> are alternative mechanisms for resolving symbols among ".o" files
> being put into place.  Note that GCL 2.1 seems to be different from
> 1.0 or 1.1 in this regard; in fact SI::FASLINK also apparently works
> for GCL 1.1 under Linux.

Are there reasons why you can't use 1.1?  I'm planning to avoid 2.x
until it settles down (unless I find some free testing time).

-- jeff

From tmb@almaden.ibm.com  Fri Jul 21 21:19:55 1995
Return-Path: <tmb@almaden.ibm.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22753; Fri, 21 Jul 95 21:19:55 CDT
Received: from almaden.ibm.com by cli.com (4.1/SMI-4.1)
	id AA19042; Fri, 21 Jul 95 19:47:46 CDT
Received: from ALMADEN by almaden.ibm.com (IBM VM SMTP V2R2) with BSMTP id 7355;
   Fri, 21 Jul 95 17:45:34 PDT
Received: by ALMADEN (XAGENTA 3.0) id 4990; Fri, 21 Jul 1995 17:45:34 -0700
Received: by zen.almaden.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA34545; Fri, 21 Jul 1995 17:47:37 -0700
Date: Fri, 21 Jul 1995 17:47:37 -0700
From: <tmb@almaden.ibm.com> (Thomas Breuel)
Message-Id: <9507220047.AA34545@zen.almaden.ibm.com>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <20667.9507212357@subnode.aiai.ed.ac.uk>
References: <20667.9507212357@subnode.aiai.ed.ac.uk>
Reply-To: <tmb@almaden.ibm.com>


Jeff Dalton writes:
 > 2. I just checked on my 386, and GCL 1.1 for FreeBSD 2.0, and it
 >    does pretty much what I was suggesting: when loading compiled Lisp,
 >    it uses its own loader [presumably, using LOAD], but when
 >    loading compiled C [presumably using FASLINK] it uses
 >    "ld -A".  So the two cases use different mechanisms.

Yes, exactly, that's my point: there are two different linkers.  But
the ".o" files are still standard ".o" files, since they come from
the C compiler.  So the reason why there are two linkers isn't the
object file format.

Here is what I believe happened (I have used kcl, akcl, several other
Lisps, and also hacked dynamic loaders in other environments, so my
memory of this is blurry). Originally, "ld" may have been used for all
dynamic loading.  But that was slow and not very portable.  Then, the
"rsym"-based mechanism came along.  That's fast and works for compiled
Lisp code, but it can't pull code out of libraries, so it's no good
for a lot of user-supplied C code.  But, in principle, the "rsym"
based mechanism works just fine on normal ".o" files.  In fact, I
_have_ compiled and loaded my own C programs successfully using the
rsym-based mechanism.  It's just that I can't make it work for
non-trivial programs.  And that seems to be related not to the ".o"
file, but to the ".data" file that LOAD needs, which I can't
construct.

 > You may well be right, but it isn't necessarily so.  For instance,
 > the Franz Lisp loader for it's own .o files was not at all capable
 > of loading .o files in general.  It had to use "ld -A".

Franz doesn't use the C compiler to generate its files; they should
probably not even be called ".o".  I suspect that "nm" wouldn't work
on them either.

 > Are there reasons why you can't use 1.1?  I'm planning to avoid 2.x
 > until it settles down (unless I find some free testing time).

I could use 1.1.  But I didn't know before I started that 2.1 was
unstable or non-working.  Unstable versions are usually called
something like 1.99 or 2.1alpha or something.

                        Cheers,
                                Thomas.


From jeff@aiai.ed.ac.uk  Sun Jul 23 11:56:34 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA23362; Sun, 23 Jul 95 11:56:34 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA21345; Sun, 23 Jul 95 10:26:39 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id QAA24569; Sun, 23 Jul 1995 16:26:18 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Sun, 23 Jul 95 16:25:34 BST
Date: Sun, 23 Jul 95 16:25:34 BST
Message-Id: <29428.9507231525@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: giving up on [common] lisp....
To: tmb@almaden.ibm.com
In-Reply-To: tmb@almaden.ibm.com's message of Fri, 21 Jul 1995 17:47:37 -0700
Cc: gcl@cli.com

> 
> Jeff Dalton writes:
>  > 2. I just checked on my 386, and GCL 1.1 for FreeBSD 2.0, and it
>  >    does pretty much what I was suggesting: when loading compiled Lisp,
>  >    it uses its own loader [presumably, using LOAD], but when
>  >    loading compiled C [presumably using FASLINK] it uses
>  >    "ld -A".  So the two cases use different mechanisms.
> 
> Yes, exactly, that's my point: there are two different linkers.  But
> the ".o" files are still standard ".o" files, since they come from
> the C compiler.  So the reason why there are two linkers isn't the
> object file format.

Standard .o files can still differ in a number of ways.

> Here is what I believe happened (I have used kcl, akcl, several other
> Lisps, and also hacked dynamic loaders in other environments, so my
> memory of this is blurry). Originally, "ld" may have been used for all
> dynamic loading.  [...]

You could well be right.  I suppose I could look at the KCL sources...
I still have some somewhere.

>  > You may well be right, but it isn't necessarily so.  For instance,
>  > the Franz Lisp loader for it's own .o files was not at all capable
>  > of loading .o files in general.  It had to use "ld -A".
> 
> Franz doesn't use the C compiler to generate its files; they should
> probably not even be called ".o".  I suspect that "nm" wouldn't work
> on them either.

The standardness or otherwise of the .o files wasn't really important.
A problem was that the compiled file loader didn't have a general
way of resolving external symbols.

>  > Are there reasons why you can't use 1.1?  I'm planning to avoid 2.x
>  > until it settles down (unless I find some free testing time).
> 
> I could use 1.1.  But I didn't know before I started that 2.1 was
> unstable or non-working.  Unstable versions are usually called
> something like 1.99 or 2.1alpha or something.

So far as I know, the version numbers just count up.  I'd be more
inclined to think 1.99 was stable than that 1.1 was, if I were going
by the numbers alone.  GCL 1.0 and 1.1 are special cases, because
they could also be considered AKCL 1.x for some x > 615.

I used KCL and AKCL for years without having the sort of problem
you're having.  The main reason you're having it now, I'd say,
is that the free PC unixes don't agree about a.out formats and
the like, and because they keep changing in gratuitous or nearly
gratuitous ways.  Until the operating systems settle down a bit,
there will keep being cases where GCL is out of sync with the
latest version of Linux, FreeBSD, or NetBSD.

-- jeff

From hnqec@westminster.ac.uk  Mon Jul 24 19:35:19 1995
Return-Path: <hnqec@westminster.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA23867; Mon, 24 Jul 95 19:35:19 CDT
Received: from rabbit.wmin.ac.uk by cli.com (4.1/SMI-4.1)
	id AA24284; Mon, 24 Jul 95 17:56:27 CDT
Message-Id: <9507242256.AA24284@cli.com>
Received: from dialup (actually dip-11.dialup.wmin.ac.uk) by rabbit.wmin.ac.uk 
          with Internet SMTP (PP); Mon, 24 Jul 1995 23:01:13 +0100
To: gcl@cli.com
Cc: hnqec@westminster.ac.uk
Subject: sco 3.2v4.2 port
Date: Mon, 24 Jul 1995 22:41:20 +0100
From: Nigel Williams <hnqec@westminster.ac.uk>


Hi

I wonder if anyone has managed to get GCLv2.1 running under SCO UNIX 3.2v4.2

If this is possible and not too involved I would be very grateful if somone

in the know could mail me with the mods I require.

Thanks 

Nigel Williams


From toy@rtp.ericsson.se  Wed Jul 26 18:38:36 1995
Return-Path: <toy@rtp.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA24708; Wed, 26 Jul 95 18:38:36 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA00641; Wed, 26 Jul 95 16:57:36 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.6.10/8.6.10) with ESMTP id QAA27180 for <gcl@cli.com>; Wed, 26 Jul 1995 16:57:35 -0500
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.6.8/NAHUB-MR1.1) with ESMTP id QAA01933 for <gcl@cli.com>; Wed, 26 Jul 1995 16:57:34 -0500
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id RAA01842 for <gcl@cli.com>; Wed, 26 Jul 1995 17:58:08 -0400
Message-Id: <199507262158.RAA01842@screamer.rtp.ericsson.se>
To: GCL Mailing List <gcl@cli.com>
Subject: reduce with :key and map-into
Date: Wed, 26 Jul 1995 17:57:25 -0400
From: Raymond Toy <toy@rtp.ericsson.se>

I noticed that gcl 2.1 still does not have reduce with the :key
keyword and is missing map-into, as specified by CLTL2.

The appended patch adds this functionality for gcl 2.1.

Ray

--- tmp/gcl-2.1/lsp/seqlib.lsp	Sat May  7 14:44:04 1994
+++ gcl-2.1/lsp/seqlib.lsp	Wed Jul 26 17:54:32 1995
@@ -35,7 +35,7 @@
           position position-if position-if-not
           remove-duplicates delete-duplicates
           mismatch search
-          sort stable-sort merge))
+          sort stable-sort merge map-into))
 
 
 (in-package 'system)
@@ -112,27 +112,29 @@
                &key from-end
                     start 
                     end
-                    (initial-value nil ivsp))
+		    (initial-value nil ivsp)
+		    (key #'identity))
   (with-start-end  start end sequence
      (cond ((not from-end)
            (when (null ivsp)
                  (when (>= start end)
                        (return-from reduce (funcall function)))
-                 (setq initial-value (elt sequence start))
+		 (setq initial-value (funcall key (elt sequence start)))
                  (setf start (f+ 1 start))
 		 )
            (do ((x initial-value
-                   (funcall function x (prog1 (elt sequence start)
+		   (funcall function x (funcall key (prog1 (elt sequence start)
 					      (setf start (f+ 1 start))
-					      ))))
+						       )))))
                ((>= start end) x)))
           (t
            (when (null ivsp)
                  (when (>= start end)
                        (return-from reduce (funcall function)))
                  (setf end (f+ end -1))
-                 (setq initial-value (elt sequence end)))
-           (do ((x initial-value (funcall function (elt sequence end) x)))
+		  (setq initial-value (funcall key (elt sequence end)))
+		  )
+	    (do ((x initial-value (funcall function (funcall key (elt sequence end)) x)))
                ((>= start end) x)
 	       (setf end (f+ -1 end)))))))
 
@@ -717,3 +719,18 @@
 	  (t
 	   (setf (elt newseq j) (elt sequence2 i2))
 	   (setf  i2 (f+ 1  i2))))))
+
+(defun map-into (result-sequence function &rest sequences)
+  "map-into:  (result-sequence function &rest sequences)"
+  (let ((nel (apply #'min (if (eq 'vector (type-of result-sequence))
+			      (array-dimension result-sequence 0)
+			    (length result-sequence))
+		    (mapcar #'length sequences))))
+    ;; Set the fill pointer to the number of iterations
+    (when (and (eq 'vector (type-of result-sequence))
+		(array-has-fill-pointer-p result-sequence))
+      (setf (fill-pointer result-sequence) nel))
+    ;; Perform mapping
+    (dotimes (k nel result-sequence)
+      (setf (elt result-sequence k)
+	    (apply function (mapcar #'(lambda (v) (elt v k)) sequences))))))

From toy@rtp.ericsson.se  Thu Jul 27 13:27:31 1995
Return-Path: <toy@rtp.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA25141; Thu, 27 Jul 95 13:27:31 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA03219; Thu, 27 Jul 95 11:35:59 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.6.10/8.6.10) with ESMTP id LAA29253 for <gcl@cli.com>; Thu, 27 Jul 1995 11:35:58 -0500
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.6.8/NAHUB-MR1.1) with ESMTP id LAA04193 for <gcl@cli.com>; Thu, 27 Jul 1995 11:35:58 -0500
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id MAA05675; Thu, 27 Jul 1995 12:36:31 -0400
Message-Id: <199507271636.MAA05675@screamer.rtp.ericsson.se>
To: GCL Mailing List <gcl@cli.com>
Cc: toy@rtp.ericsson.se
Subject: Slow constructs?
Date: Thu, 27 Jul 1995 12:35:47 -0400
From: Raymond Toy <toy@rtp.ericsson.se>

In the documentation (gcl-si), in the section about compilation, there
is a comment about looking at OPTIMIZE to find out how to get the
compiler to give info about slow constructs.  I can't find that entry
anywhere.  Can any one tell me what the appropriate variable/option
would be?  I'd just like to find out if I can speed up my lisp program
a bit more.  I've already included declarations for just everything,
and I was just curious if there's anything reasonable left to do.
Currently, my simple matrix multiplier runs at about 1/2 the speed of
cmulisp and about 2-3 times the speed of clisp.  (I think they're all
roughly equal if I leave out the declarations.)

Thanks,

Ray


P.S.  In the last mail that I sent, quite a few addresses bounced
because there was no such user or machine.  Can these addresses be
removed from the list?


From goldman@src.honeywell.com  Fri Aug  4 16:27:14 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01184; Fri, 4 Aug 95 16:27:14 CDT
Received: from moon.src.honeywell.com by cli.com (4.1/SMI-4.1)
	id AA26225; Fri, 4 Aug 95 14:45:40 CDT
Return-Path: <goldman@src.honeywell.com>
Received: from quasar.src.honeywell.com by src.honeywell.com (4.1/smail2.6.3/SRCv0.25);
	Thu, 20 Jul 95 14:17:43 CDT id AA08524  for jeff@aiai.ed.ac.uk  at aiai.ed.ac.uk
Posted-Date: Thu, 20 Jul 95 14:17:42 CDT
Received: by quasar.src.honeywell.com (4.1/SMI-3.2)
	id AA12139; Thu, 20 Jul 95 14:17:42 CDT
Date: Thu, 20 Jul 95 14:17:42 CDT
From: goldman@src.honeywell.com (Robert P. Goldman)
Message-Id: <9507201917.AA12139@quasar.src.honeywell.com>
To: jeff@aiai.ed.ac.uk
Cc: bb-comp-windows-garnet@cs.cmu.edu, Brian_Leverich@rand.org,
        kr@shell.portal.com, gcl@cli.com
In-Reply-To: <8780.9507201715@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Thu, 20 Jul 95 18:15:38 BST)
Subject: Re: giving up on [common] lisp....
Reply-To: goldman@src.honeywell.com (Robert Goldman)

>>>>> "JD" == Jeff Dalton <jeff@aiai.ed.ac.uk> writes:

JD> I didn't want to start a language war, and I'm sure we can still avoid
JD> one.  I would like -- indeed, I need -- to understand the views of those
JD> who have (for now at least) given up ono Lisp.  Reasons to stick with
JD> Lisp will also be useful.  The reason: I am currently having to justify
JD> the use of Common Lisp on a (research) project.

On a research project, most of your objections don't apply --- unless
the person running the program is an anti-lisp bigot.  That's pretty
common these days, regrettably.

As usual, most people want a programming language that's all things to
all people --- great for final efficient applications delivery and for
rapid prototyping.

I don't really believe there will ever be an ultimate language like
that.

But people who run bureaucracies are constantly being told that they
can get everything under the sun if they just buy product X (which
this year happens to be C++).  Like things that are good for
rapid-prototyping and are good for production-line work.

Funny, really.  If you told someone who ran a car company that new
designs should be prototyped on an assembly line, they would know you
were being stupid.  The corresponding realization doesn't seem to have
hit the software world.

JD> I would also like to hear about the experiences of any Lisp
JD> programmers who have moved from Common Lisp to C or C++, e.g.
JD> of anyone who used to work on Garnet and now works on Amulet.

JD> I've been programming in Lisp for a long time.  I've also done a
JD> fair amount of programming in other languages, including C (but
JD> not C++).  I find that I get a big win on programming time in
JD> Lisp, and I'd hate to be stuck in C where it's difficult to
JD> inspect data at run-time, where I can't load in code or redefine
JD> functions, and so on.  I know that such problems can be decreased,
JD> with enough work, but I don't really want to spend the time
JD> doing it.

My C-bigot friends tell me there are already C interpreters (I believe
it, there were pretty damn close before I went to grad school, more
than a decade ago, now).  I'm told there are C++ interpreters coming
Real Soon Now.

JD> I can understand why someone else might not get such a big win
JD> in programming time when using Lisp.  For instance, if I were
JD> trying to deliver a product that had to work with several different
JD> Common Lisp implementations, I might feel the same way.  Even
JD> more so if I needed an "interesting" GUI and to do it all from
JD> within Lisp (rather than, say, by running a spearate non-Lisp
JD> program connected by a pipe).

I've certainly found cross-platform porting under lisp to be a
nightmare.

JD> But for the kind of work I do, which tends to be "exploratory"
JD> in nature, I find Common Lisp to be far better than C.

If you see my objections to Lisp (aside from the "I give up fighting
the anti-lisp bigot" objection), you see that they don't apply here.
You don't have to worry about a lot of the things that Lisp is bad at.

JD> In any case, I don't feel that Common Lisp confines me to high-end
JD> SPARCstations with 30MB executables.  I in fact use such a machine
JD> at work.  But I can run the same programs on a 386 PC (running
JD> FreeBSD, 16 Meg but formerly 8) at home.

My Garnet-using prototype certainly did...  And the people I visit are
not real interested in Unix these days, either.  "Does it run under
Windows?" is what I hear a lot these days.  Which is not to be taken
as an endorsement of Bill Gates' totally bletcherous OS; just as a
statement of sociological fact.

JD> I also have some sympathy with Markus Krummenacker's views.
JD> Indeed, when I have time I spend some on the volunteer work
JD> he mentions.  For instance, I've ported KCL/AKCL to a couple
JD> of machines, and I developed a version/port of Franz Lisp
JD> for [345]86/BSD machines (this includes a Franz-to-C Compiler).
JD> Two of my friends -- Richard Tobin and Alan Black -- did an
JD> early port of AKCL to 386BSD and also an early port of GCC
JD> (needed for comiling AKCL).

I have enough trouble logging some time under the Great Light In The
Sky without doing a whole lot more s/w development in my copious free
time.

Besides, if you have to develop your own toolset, there goes the big
time savings from Lisp you refer to above.

Final disclaimer:  I'm a heck of a lot more productive in Common
Lisp.  I like working in Common Lisp.  I don't think that people who
are doing exploratory programming should be forced into using
inappropriate tools like C or C++.  I don't think that people who
are doing shrink-wrap delivery programming should be forced into using
inappropriate tools like Common Lisp.

R


From toy@rtp.ericsson.se  Fri Aug  4 17:00:11 1995
Return-Path: <toy@rtp.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01203; Fri, 4 Aug 95 17:00:11 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA26301; Fri, 4 Aug 95 15:27:07 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.6.10/8.6.10) with ESMTP id PAA26022 for <gcl@cli.com>; Fri, 4 Aug 1995 15:27:00 -0500
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.6.8/NAHUB-MR1.1) with ESMTP id PAA01350 for <gcl@cli.com>; Fri, 4 Aug 1995 15:26:59 -0500
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id QAA10947 for <gcl@cli.com>; Fri, 4 Aug 1995 16:27:37 -0400
Message-Id: <199508042027.QAA10947@screamer.rtp.ericsson.se>
To: GCL Mailing List <gcl@cli.com>
Subject: Re: row-major-aref for gcl 
In-Reply-To: (Your message of Sun, 30 Jul 1995 13:38:47 EDT.)
             <199507301739.NAA16468@screamer.rtp.ericsson.se> 
Date: Fri, 04 Aug 1995 16:26:48 -0400
From: Raymond Toy <toy@rtp.ericsson.se>


I wrote:
    RLT> GCL 2.1 is missing row-major-aref, so here are macros to add this:

    RLT> (defmacro row-major-aref (array idx)
    RLT>   `(system:aref1 ,array ,idx))

    RLT> (defsetf row-major-aref (array idx) (val)
    RLT>   `(system:aset1 ,array ,idx ,val))

Steve Haflich (smh@Franz.COM) pointed out to me that this 

	definition is not conformant with the ANS or CLtL2.
	ROW-MAJOR-AREF is defined to be a real function, not a macro.

His suggested solution was this:

(defun row-major-aref (array idx)
  (system:aref1 array idx))

Of course, I suppose the correct solution would be to change the
definition of aref1 to be row-major-aref, since they are completely
compatible.  


Ray

From sg@hdklab.wustl.edu  Fri Aug  4 19:58:02 1995
Return-Path: <sg@hdklab.wustl.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01244; Fri, 4 Aug 95 19:58:02 CDT
Received: from wugate.wustl.edu by cli.com (4.1/SMI-4.1)
	id AA26611; Fri, 4 Aug 95 17:56:48 CDT
Received: from hdklab.wustl.edu (hdklab.wustl.edu [128.252.148.8]) by wugate.wustl.edu (8.6.12/8.6.11) with SMTP id RAA16080 for <gcl@cli.com>; Fri, 4 Aug 1995 17:56:46 -0500
Received: by hdklab.wustl.edu (4.1/SMI-4.1)
	id AA05015; Fri, 4 Aug 95 17:53:14 CDT
Date: Fri, 4 Aug 95 17:53:14 CDT
From: sg@hdklab.wustl.edu (Stuart Goldkind)
Message-Id: <9508042253.AA05015@hdklab.wustl.edu>
To: gcl@cli.com
Subject: porting to Mach10
Cc: sg@wugate.wustl.edu


From sg Thu Aug  3 20:42:16 1995
To: MachTen@tenon.com
Subject: porting gcl
Cc: sg


I'm trying to port gcl 2.1 to Mach10 (BSD 4.3 UNIX for the MacIntosh) 
using gcc 2.6.0.  (the only  other choice was gcc 2.3.3 which the docs 
for gcl say doesn't work).

I used mac2 for the machine type (for gcl this means AUX)
and tried to avoid all the SYSV and ATT stuff.

After a couple of hours (everything seems to be going fine --
all the connections to tcl-tk are made with no problems) the make 
gets as far as a file called unixsave.c -- although there
were also probs with file.c.  The most recent messages say roughly:

   "don't know the storage size of: 'fileheader' 'header' 'sectionheader'"

These seem to be defined in some .h files that are not in Mach10
viz. filehdr.h, aouthdr.h, and scnhdr.h (at least neither gcc nor I 
could find them).

Since I'm mainly a lisp person (not a real c hacker) I would
really appreciate any help or suggestions.  (E.g. are there some
files to use instead of filehdr.h, aouthdr.h, and scnhdr.h
to provide definitions for 'fileheader' 'header' and 'sectionheader'?)

Please reply directly, since I don't subscribe to the list. (Maybe when I get
this thing compiled!)

Thanks in advance,

Stuart Goldkind (sg@hdklab.wustl.edu)


From billm@euler.maths.monash.edu.au  Tue Aug  8 01:50:31 1995
Return-Path: <billm@euler.maths.monash.edu.au>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02783; Tue, 8 Aug 95 01:50:31 CDT
Received: from euler.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA03163; Tue, 8 Aug 95 00:13:33 CDT
Received: (billm@localhost) by euler.maths.monash.edu.au (8.6.8/8.6.4) id PAA18341 for gcl@cli.com; Tue, 8 Aug 1995 15:13:21 +1000
Date: Tue, 8 Aug 1995 15:13:21 +1000
From: WE Metzenthen <billm@euler.maths.monash.edu.au>
Message-Id: <199508080513.PAA18341@euler.maths.monash.edu.au>
To: gcl@cli.com
Subject: gcl-2.1 on ELF Linux systems

Just a note to announce that I have managed to get gcl-2.1 working
with ELF format files (both the executable and fasl files) on an
ELF Linux system.

I can mail a copy of my patches to anyone who requests them.  I will
probably upload the patches to sunsite in a day or two.


--Bill

From nickm@cse.unsw.edu.au  Tue Aug  8 02:02:07 1995
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02788; Tue, 8 Aug 95 02:02:07 CDT
Received: from albeniz.orchestra.cse.unsw.EDU.AU by cli.com (4.1/SMI-4.1)
	id AA03164; Tue, 8 Aug 95 00:14:15 CDT
Return-Path: nickm@cse.unsw.edu.au
Received: From crwth With LocalMail ; Tue, 8 Aug 95 15:10:17 +1000 
From: nickm@cse.unsw.edu.au (Nick Maddern)
To: gcl@cli.com
Date: Tue, 8 Aug 1995 15:10:14 +1000 (EST)
Message-Id:  <950808051015.11635@cse.unsw.edu.au>
Subject: Subscribe
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 10        

subscribe

From andre@mselrt3.ise.vt.edu  Wed Aug  9 15:03:42 1995
Return-Path: <andre@mselrt3.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00665; Wed, 9 Aug 95 15:03:42 CDT
Received: from mselrt3.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA07119; Wed, 9 Aug 95 13:24:04 CDT
Received: from localhost (andre@localhost) by mselrt3.ise.vt.edu (8.6.4/8.6.4) id OAA17764 for gcl@cli.com; Wed, 9 Aug 1995 14:17:14 -0400
Date: Wed, 9 Aug 1995 14:17:14 -0400
From: andre@mselrt3.ise.vt.edu
Message-Id: <199508091817.OAA17764@mselrt3.ise.vt.edu>
To: gcl@cli.com
Subject: Problems compiling PCL on RS/6000 running AIX 3.2.5


Hi,

I'm trying to compile pcl-gcl-2.1 (from utexas) on an RS/6000 
running AIX 3.2.5. The package compiles ok until this point:

>Loading binary of PKG...
Loading binary of WALK...
Loading binary of ITERATE...
Loading binary of MACROS...
Loading binary of LOW...
Loading binary of GCL-LOW...
Loading binary of FIN...
Loading binary of DEFCLASS...
Compiling DEFS...
Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant 
expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
             A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
        Check path name and permissions or
        use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone be able to help me?
Thanks in advance.

Sincerely,

Andre Luiz T. Ramos
Graduate student
Dept. Industrial and Systems Engineering
Virginia Tech

From rtm@eecs.harvard.edu  Wed Aug  9 20:48:55 1995
Return-Path: <rtm@eecs.harvard.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA00744; Wed, 9 Aug 95 20:48:55 CDT
Received: from virtual1.eecs.harvard.edu by cli.com (4.1/SMI-4.1)
	id AA07904; Wed, 9 Aug 95 19:14:22 CDT
Received: (from rtm@localhost) by virtual1.eecs.harvard.edu (8.6.12/8.6.12) id UAA12730; Wed, 9 Aug 1995 20:14:21 -0400
Date: Wed, 9 Aug 1995 20:14:21 -0400
From: Robert Morris <rtm@eecs.harvard.edu>
Message-Id: <199508100014.UAA12730@virtual1.eecs.harvard.edu>
To: gcl@cli.com
Subject: si:run-process improvement
Cc: pg@virtual1.eecs.harvard.edu

The gcl-2.1 si:run-process spawns the sub-process in a way that prevents
the Lisp program from seeing end-of-file on the input stream. In addition,
gcl doesn't wait() for the process, and will run out of UNIX process slots
if you call run-process a lot. Here is an improved version:

void
reap_spawned_process()
{
  int status;

  fprintf(stderr, "gcl: reaping spawned process\n");
  if(wait(&status) < 0)
    perror("gcl: wait");
  signal(SIGCHLD, reap_spawned_process);
}

spawn_process_with_streams(istream, ostream, pname, argv)
object istream;
object ostream;
char *pname;
char **argv;
{

  int fdin;
  int fdout;
  int i;
  if (istream->sm.sm_fp == NULL || ostream->sm.sm_fp == NULL)
    FEerror("Cannot spawn process with given stream", 0);
  fdin = istream->sm.sm_int0;
  fdout = ostream->sm.sm_int0;

  signal(SIGCHLD, reap_spawned_process);

  if (fork() == 0)
    { /* the child --- replace standard in and out with descriptors given */
      close(0);
      dup(fdin);
      close(1);
      dup(fdout);
      
      /* 
       * make sure child isn't holding open the *other* end of
       * the pipes.
       */
      for(i = getdtablesize() - 1; i > 2; --i)
	close(i);
      fprintf(stderr, "\n***** Spawning process %s ", pname);
      if (execvp(pname, argv) == -1)
	{
	  fprintf(stderr, "\n***** Error in process spawning *******");
	  fflush(stderr);
	  exit(1);
	}
    }

  /*
   * make sure parent isn't holding open the *other* end of
   * the pipes.
   */
  close(istream->sm.sm_int0);
  istream->sm.sm_int0 = -1;
  close(ostream->sm.sm_int0);
  ostream->sm.sm_int0 = -1;
}

From jeff@aiai.ed.ac.uk  Fri Aug 11 13:50:59 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01687; Fri, 11 Aug 95 13:50:59 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA12056; Fri, 11 Aug 95 11:47:06 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id RAA26398 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 11 Aug 1995 17:46:58 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 11 Aug 95 17:46:00 BST
Date: Fri, 11 Aug 95 17:45:59 BST
Message-Id: <2310.9508111645@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: use-fast-links problem
To: gcl@cli.com

bute 75% uname -a
SunOS bute 4.1.3 2 sun4

bute 76% gcl-2.1
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si:use-fast-links t)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>

-- jeff

From jeff@aiai.ed.ac.uk  Fri Aug 11 13:59:14 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01692; Fri, 11 Aug 95 13:59:14 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA12114; Fri, 11 Aug 95 12:20:14 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id SAA26932 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 11 Aug 1995 18:20:12 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 11 Aug 95 18:19:14 BST
Date: Fri, 11 Aug 95 18:19:14 BST
Message-Id: <2528.9508111719@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Creturn in GCl 2.0
To: gcl@cli.com

What happened to Creturn (used in defCfuns)?

Will ordinary return work?

-- jeff


From jeff@aiai.ed.ac.uk  Fri Aug 11 15:27:18 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01751; Fri, 11 Aug 95 15:27:18 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA12304; Fri, 11 Aug 95 13:31:02 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA03407 for <gcl@cli.com>; Fri, 11 Aug 1995 20:30:57 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA26027; Fri, 11 Aug 1995 20:30:54 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA03400 for <etokna@etn.ericsson.se>; Fri, 11 Aug 1995 20:30:50 +0200
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA12056; Fri, 11 Aug 95 11:47:06 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id RAA26398 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 11 Aug 1995 17:46:58 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 11 Aug 95 17:46:00 BST
Date: Fri, 11 Aug 95 17:45:59 BST
Message-Id: <2310.9508111645@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: use-fast-links problem
To: gcl@cli.com
Content-Length: 421

bute 75% uname -a
SunOS bute 4.1.3 2 sun4

bute 76% gcl-2.1
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si:use-fast-links t)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>

-- jeff

From jeff@aiai.ed.ac.uk  Fri Aug 11 15:55:08 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01770; Fri, 11 Aug 95 15:55:08 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA12331; Fri, 11 Aug 95 13:43:23 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA04043 for <gcl@cli.com>; Fri, 11 Aug 1995 20:43:21 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA26091; Fri, 11 Aug 1995 20:43:18 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA04033 for <etokna@etn.ericsson.se>; Fri, 11 Aug 1995 20:43:17 +0200
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA12114; Fri, 11 Aug 95 12:20:14 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id SAA26932 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 11 Aug 1995 18:20:12 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 11 Aug 95 18:19:14 BST
Date: Fri, 11 Aug 95 18:19:14 BST
Message-Id: <2528.9508111719@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Creturn in GCl 2.0
To: gcl@cli.com
Content-Length: 83

What happened to Creturn (used in defCfuns)?

Will ordinary return work?

-- jeff


From jeff@aiai.ed.ac.uk  Fri Aug 11 16:48:55 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01800; Fri, 11 Aug 95 16:48:55 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA12554; Fri, 11 Aug 95 15:09:14 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA08399 for <gcl@cli.com>; Fri, 11 Aug 1995 22:08:36 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA26266; Fri, 11 Aug 1995 22:08:09 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA08343 for <etokna@etn.ericsson.se>; Fri, 11 Aug 1995 22:07:31 +0200
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA12304; Fri, 11 Aug 95 13:31:02 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA03407 for <gcl@cli.com>; Fri, 11 Aug 1995 20:30:57 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA26027; Fri, 11 Aug 1995 20:30:54 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id UAA03400 for <etokna@etn.ericsson.se>; Fri, 11 Aug 1995 20:30:50 +0200
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA12056; Fri, 11 Aug 95 11:47:06 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id RAA26398 for <gcl%cli.com@haymarket.ed.ac.uk>; Fri, 11 Aug 1995 17:46:58 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 11 Aug 95 17:46:00 BST
Date: Fri, 11 Aug 95 17:45:59 BST
Message-Id: <2310.9508111645@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: use-fast-links problem
To: gcl@cli.com
Content-Length: 421

bute 75% uname -a
SunOS bute 4.1.3 2 sun4

bute 76% gcl-2.1
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si:use-fast-links t)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>

-- jeff

From rld@juliet.ll.mit.edu  Fri Aug 11 17:21:03 1995
Return-Path: <rld@juliet.ll.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01805; Fri, 11 Aug 95 17:21:03 CDT
Received: from juliet.ll.mit.edu (JULIET.WX.LL.MIT.EDU) by cli.com (4.1/SMI-4.1)
	id AA12612; Fri, 11 Aug 95 15:37:31 CDT
Received: from escalus (ESCALUS.WX.LL.MIT.EDU) by juliet.ll.mit.edu id AA10663g; Fri, 11 Aug 95 16:37:08 EDT
From: rld@juliet.ll.mit.edu ( Richard Delanoy (group 21))
Received: by escalus; Fri, 11 Aug 95 16:37:06 EDT
Date: Fri, 11 Aug 95 16:37:06 EDT
Message-Id: <9508112037.AA25872@escalus>
To: gcl@cli.com
Subject: Re: use-fast-links problem


With reference to the following mail message:


----- Begin Included Message -----

From jeff@aiai.ed.ac.uk Fri Aug 11 15:49:47 1995
Date: Fri, 11 Aug 95 17:45:59 BST
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: use-fast-links problem
To: gcl@cli.com
Content-Length: 421

bute 75% uname -a
SunOS bute 4.1.3 2 sun4

bute 76% gcl-2.1
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si:use-fast-links t)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>

-- jeff


----- End Included Message -----

I've been working extensively with gcl-2.1 for the last 6 weeks, attempting
to replace AKCL-6.05 in our library of lisp-based algorithms.  I too am running
gcl-2.1 on a Sparc station on BSD 4.1.3, and making extensive use of the 
new TK/TCL display tools.

While the software has been working pretty well under most conditions, I've
been consistently getting segment faults and [memory may be damamged]
errors during two conditions.

1. Software errors that normally would have resulted in
a standard error capture to the debug prompt in AKCL 6.05 and which could be
overcome with a ":q" command, now often result in a [memory may be damaged] 
problem sometime in the near future.

2. I also sent in a bug report awhile ago in which a print command interleaved
between the opening of a stream and writing to that stream would produce the
same problem.  The problem consistently happens with the command WRITE, but 
never with WRITE-LINE and WRITE-CHAR.

In most of the cases I have encountered, I have been able to associate the
failure with a PRINT or WRITE command, especially when the print command
recursively invokes a :print-function associated with a object (e.g.,
a WRITE of a structure will usually cause a crash.  In contrast, 
WRITE-LINE and WRITE-CHAR never generates an error).

Given that Jeff's reported problem was detected in PRIN1, I'm speculating
that part of his problem may be related to what I have been seeing.  I hope
that this is helpful.


Dick Delanoy
MIT/Lincoln Laboratory.

From rld@juliet.ll.mit.edu  Fri Aug 11 18:27:14 1995
Return-Path: <rld@juliet.ll.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA01826; Fri, 11 Aug 95 18:27:14 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA12816; Fri, 11 Aug 95 16:59:23 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id XAA13787 for <gcl@cli.com>; Fri, 11 Aug 1995 23:59:20 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA26506; Fri, 11 Aug 1995 23:59:18 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id XAA13777 for <etokna@etn.ericsson.se>; Fri, 11 Aug 1995 23:59:16 +0200
Received: from juliet.ll.mit.edu (JULIET.WX.LL.MIT.EDU) by cli.com (4.1/SMI-4.1)
	id AA12612; Fri, 11 Aug 95 15:37:31 CDT
Received: from escalus (ESCALUS.WX.LL.MIT.EDU) by juliet.ll.mit.edu id AA10663g; Fri, 11 Aug 95 16:37:08 EDT
From: rld@juliet.ll.mit.edu ( Richard Delanoy (group 21))
Received: by escalus; Fri, 11 Aug 95 16:37:06 EDT
Date: Fri, 11 Aug 95 16:37:06 EDT
Message-Id: <9508112037.AA25872@escalus>
To: gcl@cli.com
Subject: Re: use-fast-links problem
Content-Length: 2236


With reference to the following mail message:


----- Begin Included Message -----

From jeff@aiai.ed.ac.uk Fri Aug 11 15:49:47 1995
Date: Fri, 11 Aug 95 17:45:59 BST
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: use-fast-links problem
To: gcl@cli.com
Content-Length: 421

bute 75% uname -a
SunOS bute 4.1.3 2 sun4

bute 76% gcl-2.1
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(si:use-fast-links t)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>

-- jeff


----- End Included Message -----

I've been working extensively with gcl-2.1 for the last 6 weeks, attempting
to replace AKCL-6.05 in our library of lisp-based algorithms.  I too am running
gcl-2.1 on a Sparc station on BSD 4.1.3, and making extensive use of the 
new TK/TCL display tools.

While the software has been working pretty well under most conditions, I've
been consistently getting segment faults and [memory may be damamged]
errors during two conditions.

1. Software errors that normally would have resulted in
a standard error capture to the debug prompt in AKCL 6.05 and which could be
overcome with a ":q" command, now often result in a [memory may be damaged] 
problem sometime in the near future.

2. I also sent in a bug report awhile ago in which a print command interleaved
between the opening of a stream and writing to that stream would produce the
same problem.  The problem consistently happens with the command WRITE, but 
never with WRITE-LINE and WRITE-CHAR.

In most of the cases I have encountered, I have been able to associate the
failure with a PRINT or WRITE command, especially when the print command
recursively invokes a :print-function associated with a object (e.g.,
a WRITE of a structure will usually cause a crash.  In contrast, 
WRITE-LINE and WRITE-CHAR never generates an error).

Given that Jeff's reported problem was detected in PRIN1, I'm speculating
that part of his problem may be related to what I have been seeing.  I hope
that this is helpful.


Dick Delanoy
MIT/Lincoln Laboratory.

From andre@mselrt4.ise.vt.edu  Sat Aug 12 14:46:53 1995
Return-Path: <andre@mselrt4.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02238; Sat, 12 Aug 95 14:46:53 CDT
Received: from mselrt4.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA14432; Sat, 12 Aug 95 13:20:57 CDT
Received: from localhost (andre@localhost) by mselrt4.ise.vt.edu (8.6.4/8.6.4) id OAA14239 for gcl@cli.com; Sat, 12 Aug 1995 14:11:52 -0400
Date: Sat, 12 Aug 1995 14:11:52 -0400
From: andre@mselrt4.ise.vt.edu
Message-Id: <199508121811.OAA14239@mselrt4.ise.vt.edu>
To: gcl@cli.com
Subject: Problems with PCL and  GCL 2.1 on AIX 3.2.5

Hi,

I'm trying to compile pcl-gcl-2.1 (from utexas) on an RS/6000 
running AIX 3.2.5. The package compiles ok until this point:

>Loading binary of PKG...
Loading binary of WALK...
Loading binary of ITERATE...
Loading binary of MACROS...
Loading binary of LOW...
Loading binary of GCL-LOW...
Loading binary of FIN...
Loading binary of DEFCLASS...
Compiling DEFS...
Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant 
expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
             A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
        Check path name and permissions or
        use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone be able to help me?
Thanks in advance.

Sincerely,

Andre Luiz T. Ramos
Graduate student
Dept. Industrial and Systems Engineering
Virginia Tech

From Michal.Spalinski@fuw.edu.pl  Sat Aug 12 15:30:20 1995
Return-Path: <Michal.Spalinski@fuw.edu.pl>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02245; Sat, 12 Aug 95 15:30:20 CDT
Received: from sunic.sunet.se by cli.com (4.1/SMI-4.1)
	id AA14473; Sat, 12 Aug 95 14:08:13 CDT
From: Michal.Spalinski@fuw.edu.pl
Received: from cocos.fuw.edu.pl by sunic.sunet.se (8.6.8/2.03)
	id VAA11946; Sat, 12 Aug 1995 21:07:56 +0200
Received: from albert4.fuw.edu.pl by cocos.fuw.edu.pl (4.1/SMI-4.1)
	id AA18373; Sat, 12 Aug 95 21:07:42 +0200
Received: by albert4.fuw.edu.pl (4.1/SMI-4.1)
	id AA08818; Sat, 12 Aug 95 21:09:40 +0200
Date: Sat, 12 Aug 95 21:09:40 +0200
Message-Id: <9508121909.AA08818@albert4.fuw.edu.pl>
To: rld@juliet.ll.mit.edu
Cc: gcl@cli.com
In-Reply-To: <9508112037.AA25872@escalus> (rld@juliet.ll.mit.edu)
Subject: Re: use-fast-links problem


Hallo Stephan,

danke f"ur die Nachricht - es klingt sehr gut und ich hoffe es funktioniert
alles. Wenn Du in Garching bist kannst Du mich vielleicht anrufen - ich
weiss nicht ob Du eine fr"uhere Nachricht von mir bekommen hast wo ich
meine Nummer gegeben habe. Es lautet (4822) 453357.

Hat der Benakli etwas geschrieben, ich meine das was Hans-Peter berichtet
hat? Ich habe nichts gesehen. 

Viele Gr"usse, Michal.

From andre@mselrt4.ise.vt.edu  Sat Aug 12 15:54:27 1995
Return-Path: <andre@mselrt4.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02250; Sat, 12 Aug 95 15:54:27 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14481; Sat, 12 Aug 95 14:30:28 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15387 for <gcl@cli.com>; Sat, 12 Aug 1995 21:30:25 +0200
From: andre@mselrt4.ise.vt.edu
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA02266; Sat, 12 Aug 1995 21:30:20 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15381 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 21:30:17 +0200
Received: from mselrt4.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA14432; Sat, 12 Aug 95 13:20:57 CDT
Received: from localhost (andre@localhost) by mselrt4.ise.vt.edu (8.6.4/8.6.4) id OAA14239 for gcl@cli.com; Sat, 12 Aug 1995 14:11:52 -0400
Date: Sat, 12 Aug 1995 14:11:52 -0400
Message-Id: <199508121811.OAA14239@mselrt4.ise.vt.edu>
To: gcl@cli.com
Subject: Problems with PCL and  GCL 2.1 on AIX 3.2.5
Content-Length: 1319

Hi,

I'm trying to compile pcl-gcl-2.1 (from utexas) on an RS/6000 
running AIX 3.2.5. The package compiles ok until this point:

>Loading binary of PKG...
Loading binary of WALK...
Loading binary of ITERATE...
Loading binary of MACROS...
Loading binary of LOW...
Loading binary of GCL-LOW...
Loading binary of FIN...
Loading binary of DEFCLASS...
Compiling DEFS...
Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant 
expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
             A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
        Check path name and permissions or
        use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone be able to help me?
Thanks in advance.

Sincerely,

Andre Luiz T. Ramos
Graduate student
Dept. Industrial and Systems Engineering
Virginia Tech

From andre@mselrt4.ise.vt.edu  Sat Aug 12 17:00:43 1995
Return-Path: <andre@mselrt4.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02262; Sat, 12 Aug 95 17:00:43 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14508; Sat, 12 Aug 95 15:38:40 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA16727 for <gcl@cli.com>; Sat, 12 Aug 1995 22:38:38 +0200
From: andre@mselrt4.ise.vt.edu
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA02887; Sat, 12 Aug 1995 22:38:36 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA16723 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 22:38:35 +0200
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14481; Sat, 12 Aug 95 14:30:28 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15387 for <gcl@cli.com>; Sat, 12 Aug 1995 21:30:25 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA02266; Sat, 12 Aug 1995 21:30:20 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15381 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 21:30:17 +0200
Received: from mselrt4.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA14432; Sat, 12 Aug 95 13:20:57 CDT
Received: from localhost (andre@localhost) by mselrt4.ise.vt.edu (8.6.4/8.6.4) id OAA14239 for gcl@cli.com; Sat, 12 Aug 1995 14:11:52 -0400
Date: Sat, 12 Aug 1995 14:11:52 -0400
Message-Id: <199508121811.OAA14239@mselrt4.ise.vt.edu>
To: gcl@cli.com
Subject: Problems with PCL and  GCL 2.1 on AIX 3.2.5
Content-Length: 1319

Hi,

I'm trying to compile pcl-gcl-2.1 (from utexas) on an RS/6000 
running AIX 3.2.5. The package compiles ok until this point:

>Loading binary of PKG...
Loading binary of WALK...
Loading binary of ITERATE...
Loading binary of MACROS...
Loading binary of LOW...
Loading binary of GCL-LOW...
Loading binary of FIN...
Loading binary of DEFCLASS...
Compiling DEFS...
Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant 
expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
             A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
        Check path name and permissions or
        use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone be able to help me?
Thanks in advance.

Sincerely,

Andre Luiz T. Ramos
Graduate student
Dept. Industrial and Systems Engineering
Virginia Tech

From andre@mselrt4.ise.vt.edu  Sat Aug 12 18:06:26 1995
Return-Path: <andre@mselrt4.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA02284; Sat, 12 Aug 95 18:06:26 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14544; Sat, 12 Aug 95 16:46:28 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id XAA18005 for <gcl@cli.com>; Sat, 12 Aug 1995 23:46:27 +0200
From: andre@mselrt4.ise.vt.edu
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA03941; Sat, 12 Aug 1995 23:46:24 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id XAA18001 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 23:46:22 +0200
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14508; Sat, 12 Aug 95 15:38:40 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA16727 for <gcl@cli.com>; Sat, 12 Aug 1995 22:38:38 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA02887; Sat, 12 Aug 1995 22:38:36 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id WAA16723 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 22:38:35 +0200
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA14481; Sat, 12 Aug 95 14:30:28 CDT
Received: from billingstad2 (billingstad2.etn.ericsson.se [193.181.245.3]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15387 for <gcl@cli.com>; Sat, 12 Aug 1995 21:30:25 +0200
Received: from mailgate.ericsson.se by billingstad2 (5.0/LME-DOM-2.2.3)
	id AA02266; Sat, 12 Aug 1995 21:30:20 --100
Received: from cli.com (cli.com [192.31.85.1]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id VAA15381 for <etokna@etn.ericsson.se>; Sat, 12 Aug 1995 21:30:17 +0200
Received: from mselrt4.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA14432; Sat, 12 Aug 95 13:20:57 CDT
Received: from localhost (andre@localhost) by mselrt4.ise.vt.edu (8.6.4/8.6.4) id OAA14239 for gcl@cli.com; Sat, 12 Aug 1995 14:11:52 -0400
Date: Sat, 12 Aug 1995 14:11:52 -0400
Message-Id: <199508121811.OAA14239@mselrt4.ise.vt.edu>
To: gcl@cli.com
Subject: Problems with PCL and  GCL 2.1 on AIX 3.2.5
Content-Length: 1319

Hi,

I'm trying to compile pcl-gcl-2.1 (from utexas) on an RS/6000 
running AIX 3.2.5. The package compiles ok until this point:

>Loading binary of PKG...
Loading binary of WALK...
Loading binary of ITERATE...
Loading binary of MACROS...
Loading binary of LOW...
Loading binary of GCL-LOW...
Loading binary of FIN...
Loading binary of DEFCLASS...
Compiling DEFS...
Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant 
expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
             A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
        Check path name and permissions or
        use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone be able to help me?
Thanks in advance.

Sincerely,

Andre Luiz T. Ramos
Graduate student
Dept. Industrial and Systems Engineering
Virginia Tech

From whapp@siac.com  Thu Aug 17 11:11:15 1995
Return-Path: <whapp@siac.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04254; Thu, 17 Aug 95 11:11:15 CDT
Received: from gate.siac.com by cli.com (4.1/SMI-4.1)
	id AA27446; Thu, 17 Aug 95 09:29:32 CDT
Message-Id: <199508171429.KAA02414@Siac.COM>
X-Count: 2
From: Wayne Happ <whapp@siac.com>
Subject: Compile fails
To: gcl@cli.com
Date: Thu, 17 Aug 95 10:26:36 EDT
Mailer: Elm [revision: 70.85]


	When I try to compile gcl it fails on the following line.

 ../unixport/raw_gcl ../unixport/ -libdir /xtops/whapp/tmp/gcl-2.1/ < foo
 GCL (GNU Common Lisp)  April 1994  32768 pages
 sh: 25804 abort - core dumped
 *** Error code 134

	I am running HP-UX 9.01 on a 735. I tried the machine defination of 
hp800.

        Does anybody have a solution to this?

	Wayne

From toru@cs.titech.ac.jp  Thu Aug 17 11:38:50 1995
Return-Path: <toru@cs.titech.ac.jp>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04338; Thu, 17 Aug 95 11:38:50 CDT
Received: from jerry.cs.titech.ac.jp by cli.com (4.1/SMI-4.1)
	id AA27590; Thu, 17 Aug 95 09:57:49 CDT
Received: by jerry.cs.titech.ac.jp (8.6.12+2.5Wb7/titmx-2.0g-smnm); Thu, 17 Aug 1995 23:57:32 +0900
Message-Id: <199508171457.XAA21103@jerry.cs.titech.ac.jp>
To: whapp@siac.com
Cc: gcl@cli.com
Subject: Re: Compile fails
Reply-To: toru@cs.titech.ac.jp
In-Reply-To: Your message of "Thu, 17 Aug 95 10:26:36 EDT"
References: <199508171429.KAA02414@Siac.COM>
X-Mailer: Mew beta version 0.98 on Emacs 19.28.1, Mule 2.3
Mime-Version: 1.0
Content-Type: Text/Plain; charset=us-ascii
Date: Thu, 17 Aug 1995 23:57:31 +0900
From: "Toru Kon'no" <toru@cs.titech.ac.jp>

> 	I am running HP-UX 9.01 on a 735. I tried the machine defination of 
> hp800.

I got a same error on similar environment.
I've not heard that gcl-2.x succeeds on any HP-UX 9.0x on hp9000s7xx ...


        Toru Konno  <toru@cs.titech.ac.jp>
        Shimura laboratory, Department of Computer Science,
        Faculty of Engineering, Tokyo Institute of Technology
        2-12-1 Ookayama Meguro-ku Tokyo
        152 JAPAN

From jeff@aiai.ed.ac.uk  Thu Aug 17 12:23:32 1995
Return-Path: <jeff@aiai.ed.ac.uk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04364; Thu, 17 Aug 95 12:23:32 CDT
Received: from haymarket.ed.ac.uk ([129.215.128.53]) by cli.com (4.1/SMI-4.1)
	id AA27743; Thu, 17 Aug 95 10:48:38 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.10) with SMTP id QAA08472 for <gcl%cli.com@haymarket.ed.ac.uk>; Thu, 17 Aug 1995 16:48:28 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 17 Aug 95 16:47:26 BST
Date: Thu, 17 Aug 95 16:47:25 BST
Message-Id: <19053.9508171547@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: More on use-fast-links problem
To: gcl@cli.com
In-Reply-To: group 21" <rld@juliet.ll.mit.edu>'s message of Fri, 11 Aug 95 16:37:06 EDT

The problem appears to be in the value returned by use-fast-links.

----------------------------------------------------------------------
GCL (GNU Common Lisp)  Version(2.1) Thu Aug 10 19:32:47 BST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(setq a (si:use-fast-links t) b nil)
NIL

>(type-of a)
CONS

>(car a)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>(cdr a)

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by SYSTEM:UNIVERSAL-ERROR-HANDLER.
Backtrace: system:universal-error-handler > PRIN1

Broken at PRIN1.
>>(type-of (car a))
CONS
>>(type-of (cdr a))

Unrecoverable error: not a lisp data object.
IOT trap
----------------------------------------------------------------------

-- jeff

From jason@jbaker.async.csuohio.edu  Thu Aug 17 17:23:54 1995
Return-Path: <jason@jbaker.async.csuohio.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04605; Thu, 17 Aug 95 17:23:54 CDT
Received: from jbaker.async.csuohio.edu by cli.com (4.1/SMI-4.1)
	id AA28731; Thu, 17 Aug 95 15:46:38 CDT
Received: (from jason@localhost) by jbaker.async.csuohio.edu (8.6.9/8.6.9) id QAA00528; Thu, 17 Aug 1995 16:46:34 -0400
Date: Thu, 17 Aug 1995 16:46:34 -0400
From: jason <jason@jbaker.async.csuohio.edu>
Message-Id: <199508172046.QAA00528@jbaker.async.csuohio.edu>
To: gcl@cli.com
Subject: netbsd-i386 config, and the purpose of sgc
Reply-To: jabaker@grail.cba.csuohio.edu

	I noticed two problems with the netbsd header file in gcl-2.1:
It gives sigaltstack the top of the signal stack when it wants the
base, and since INSTALL_SEGMENTATION_CATCHER calls signal, signals
aren't delivered on the signal stack anyway.  I found all this out
because, when I started building pcl on my little 8meg pc, I decided I
should really get sgc working.  
	It was not really clear from the header, but the reason sgc
did not work w/ 386BSD was not any bug in the vm, but simply that
386BSD did not give SIGBUS or SIGSEGV the fault address as an extra
argument.  NetBSD does not do this either and I don't think it will.
Perhaps gcl should include kernel patches for netbsd?
	Anyway, I patched my kernel to allow sgc, and went back to
compiling pcl.  I did not see much improvement, since pages never
seemed to be reprotected after gc, or moved out of sgc when their free
count moved below tm_sgc_minfree: by the end of the compile, there
were over 5000 writeable pages.  What exactly is the point of this?

	I'm including diffs to h/NetBSD.h, and the NetBSD 1.0 i386
kernel.

	Jason

*** h/NetBSD.h	Sat Nov 26 20:46:24 1994
--- h/config.h	Thu Aug 17 15:50:25 1995
***************
*** 33,38 ****
--- 33,51 ----
  #include "bsd.h"
  /*#include "386.h" /* NOT if you want this to work on 386bsd!!!*/
  
+ /* Begin for cmpinclude */
+ #if 1 /* If you want to hack up your kernal to deliver the fault
+        * address to a sigbus handler */
+ #define SGC
+ #define SIGPROTV SIGBUS
+ #endif
+ 
+ #if 0 /* Maybe the i386 can align pointers on byte boudaries? */
+ #define AV
+ #endif
+ 
+ /* End for cmpinclude */
+ 
  #define ADDITIONAL_FEATURES \
  		     ADD_FEATURE("386BSD");\
                       ADD_FEATURE("NetBSD");\
***************
*** 74,87 ****
  /* end stuff for dumping and reloading */
  
  /* begin setup alternate signal stack */
! #define SIG_STACK_SIZE SIGSTKSZ
! #define SETUP_SIG_STACK \
! { static struct sigaltstack estack ; \
!   estack.ss_size = sizeof(estack_buf) ; \
!   estack.ss_flags = 0; \
!   estack.ss_base = (char *) &estack_buf[SIG_STACK_SIZE-1]; \
!   if (sigaltstack(&estack, (struct sigaltstack *)0) < 0) \
!                perror("sigaltstack");} \
  
  /* end setup signal stack  */
  
--- 87,101 ----
  /* end stuff for dumping and reloading */
  
  /* begin setup alternate signal stack */
! #define SIG_STACK_SIZE (SIGSTKSZ / sizeof (double))
! /* the stack base is just that:  the lowest address in the stack! */
! #define SETUP_SIG_STACK						\
! { struct sigaltstack estack ;					\
!   estack.ss_size = sizeof(estack_buf);				\
!   estack.ss_flags = 0;						\
!   estack.ss_base = (char *) estack_buf;				\
!   if (sigaltstack(&estack, (struct sigaltstack *)0) < 0)	\
!                perror("sigaltstack");}
  
  /* end setup signal stack  */
  
***************
*** 112,123 ****
  
  /* end read header */
  
! #define INSTALL_SEGMENTATION_CATCHER \
!   	 (void) signal(SIGSEGV,segmentation_catcher); \
!   	 (void) signal(SIGBUS,segmentation_catcher)
  
  /* yes we have alloca */
  #define HAVE_ALLOCA
  
! 
  
--- 126,135 ----
  
  /* end read header */
  
! #define HAVE_SIGACTION
  
  /* yes we have alloca */
  #define HAVE_ALLOCA
  
! #define HAVE_X11

Now, the kernel:
*** arch/i386/i386/machdep.c.orig	Fri Oct 14 10:11:44 1994
--- arch/i386/i386/machdep.c	Thu Aug 17 15:52:06 1995
***************
*** 449,454 ****
--- 449,465 ----
  }
  #endif
  
+ #ifdef KLUDGE_SIGBUS
+ /* gcl wants to collect garbage from only those pages modified since
+    the last gc.  To do this, it makes it's data pages unwriteable,
+    catches protection faults, and finds modified addresses in the 4th
+    argument of it's signal handler.  What is supposed to happen when
+    someone does 'kill -10'?
+ */
+ 
+ caddr_t sigbus_addr;
+ #endif
+ 
  /*
   * Send an interrupt to process.
   *
***************
*** 501,506 ****
--- 512,521 ----
  	}
  	frame.sf_code = code;
  	frame.sf_scp = &fp->sf_sc;
+ #ifdef KLUDGE_SIGBUS
+ 	frame.sf_addr = sigbus_addr;
+ 	sigbus_addr = 0;
+ #endif
  	frame.sf_handler = catcher;
  
  	/*
*** arch/i386/i386/trap.c.orig	Fri Oct  7 11:14:48 1994
--- arch/i386/i386/trap.c	Thu Aug 17 15:52:05 1995
***************
*** 233,238 ****
--- 233,244 ----
  	case T_STKFLT|T_USER:
  	case T_PROTFLT|T_USER:		/* protection fault */
  	case T_ALIGNFLT|T_USER:
+ #ifdef KLUDGE_SIGBUS
+ 		{
+ 		  extern caddr_t sigbus_addr;
+ 		  sigbus_addr=(caddr_t) rcr2();
+ 		}
+ #endif
  		trapsignal(p, SIGBUS, type &~ T_USER);
  		break;
  
***************
*** 298,303 ****
--- 304,316 ----
  		vm_prot_t ftype;
  		extern vm_map_t kernel_map;
  		unsigned nss, v;
+ #ifdef KLUDGE_SIGBUS /* also get info for sigsegv */
+ 	  	extern caddr_t sigbus_addr;
+ 		/* sigbus_addr shouldn't be set unless we actually
+ 		   deliver a signal, but maybe some of the stuff we do 
+ 		   here will reset cr2. */
+ 		caddr_t my_cr2=(caddr_t) rcr2();
+ #endif
  
  		va = trunc_page((vm_offset_t)rcr2());
  		/*
***************
*** 368,373 ****
--- 381,389 ----
  			    map, va, ftype, rv);
  			goto we_re_toast;
  		}
+ #ifdef KLUDGE_SIGBUS
+ 		sigbus_addr=my_cr2;
+ #endif
  		trapsignal(p, (rv == KERN_PROTECTION_FAILURE)
  		    ? SIGBUS : SIGSEGV, T_PAGEFLT);
  		break;
*** arch/i386/include/frame.h.orig	Fri Oct 14 10:11:51 1994
--- arch/i386/include/frame.h	Tue Aug 15 10:39:08 1995
***************
*** 97,102 ****
--- 97,105 ----
  	int	sf_signum;
  	int	sf_code;
  	struct	sigcontext *sf_scp;
+ #ifdef KLUDGE_SIGBUS
+ 	caddr_t sf_addr;
+ #endif
  	sig_t	sf_handler;
  	struct	sigcontext sf_sc;
  };
  

From starnet!bass!pgc.com!lakin@uucp-gw-2.pa.dec.com  Thu Aug 17 21:55:37 1995
Return-Path: <starnet!bass!pgc.com!lakin@uucp-gw-2.pa.dec.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04673; Thu, 17 Aug 95 21:55:37 CDT
Received: from uucp-gw-2.pa.dec.com by cli.com (4.1/SMI-4.1)
	id AA29173; Thu, 17 Aug 95 20:22:33 CDT
Received: by uucp-gw-2.pa.dec.com (5.65/vix-uugw2-4apr92)
	id AA04859; Thu, 17 Aug 95 18:19:44 -0700
Received: from bass by StarConn.com with uucp
	(Smail3.1.28.1 #1) id m0sjFop-00024QC; Thu, 17 Aug 95 18:01 PDT
Received: by  (4.1/SMI-4.1)
	id AA02228; Thu, 17 Aug 95 17:57:27 PDT
Date: Thu, 17 Aug 95 17:57:27 PDT
From: lakin@pgc.com (Fred Lakin)
Message-Id: <9508180057.AA02228@>
To: www-cl@ai.mit.edu, gcl@cli.com
Subject: CL-HTTP under GCL yet?
Return-Receipt-To: lakin@bass.starconn.com
Reply-To: lakin@pgc.com

Any new plans or projects underway to port CL-HTTP to GCL?

I hoped there might have been some discussion at LUV 95, particularly
on handling multi-processing since that seems to be one of the main
issues.

tnx,
-f

Fred Lakin  ::  lakin@pgc.com  ::  http://www.pgc.com


References --


CL-HTTP 37.7 new release:

  Mon, 24 Jul 1995: (MAC 1.6.1, Allegro CL 0.4.1, Symbolics Open Genera 1.0)

	http://www.ai.mit.edu/projects/iiip/doc/cl-http/home-page.html

	ftp://ftp.ai.mit.edu/pub/users/jcma/cl-http/



Multi-processing:

  From: clarisse@iexist.att.com
  Date: Tue, 27 Jun 95 11:11:26 CDT
  To: kr@shell.portal.com, JCMA@ai.mit.edu, www-cl@ai.mit.edu
  Subject: Re: Issues for Multithreaded Ports [formerly: Re: cl-http for clisp]

    Here is a topic of discussion with Lisp vendors at LUV'95 in
    Cambridge (August): I recommend Lisp vendors should provide
    "CLIM-SYS" as a minimal common process and resource package
    everywhere, otherwise porting CL applications remains more painful
    that desirable. In the mean time portable system developped using
    CL (like CL-HTTP) could provide there own "CLIM-SYS" (with or
    without CLIM).

From lynbech@daimi.aau.dk  Fri Aug 18 03:35:00 1995
Return-Path: <lynbech@daimi.aau.dk>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA04897; Fri, 18 Aug 95 03:35:00 CDT
Received: from xenon.daimi.aau.dk by cli.com (4.1/SMI-4.1)
	id AA29870; Fri, 18 Aug 95 02:09:22 CDT
Received: (from lynbech@localhost) by xenon.daimi.aau.dk (8.6.11/8.6.11) id HAA09751; Fri, 18 Aug 1995 07:07:35 GMT
Date: Fri, 18 Aug 1995 07:07:35 GMT
Message-Id: <199508180707.HAA09751@xenon.daimi.aau.dk>
From: Christian Lynbech <lynbech@daimi.aau.dk>
To: toru@cs.titech.ac.jp
Cc: whapp@siac.com, gcl@cli.com
Subject: Re: Compile fails
In-Reply-To: <199508171457.XAA21103@jerry.cs.titech.ac.jp>
References: <199508171429.KAA02414@Siac.COM>
	<199508171457.XAA21103@jerry.cs.titech.ac.jp>
Comments: Hyperbole mail buttons accepted, v03.19.01.

I haven't tried building GCL for HPUX, but I have in other connections
heard some pretty negative statements on HP's bourne shell
implementation. You may try to use Korn Shell (/bin/ksh) or bash
(GNU's Bourne Again SHell) instead of sh.


------------------------------------------------------------------------------
Christian Lynbech       (R0.33) | Hit the philistines three times over the 
phone: +45 8942 3217            | head with the Elisp reference manual.
email: lynbech@daimi.aau.dk     |       - petonic@hal.com (Michael A. Petonic)
------------------------------------------------------------------------------

From JCMA@ai.mit.edu  Fri Aug 18 16:39:00 1995
Return-Path: <JCMA@ai.mit.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA05120; Fri, 18 Aug 95 16:39:00 CDT
Received: from life.ai.mit.edu by cli.com (4.1/SMI-4.1)
	id AA01397; Fri, 18 Aug 95 15:08:10 CDT
Received: from [128.52.39.15] (relatus.ai.mit.edu) by life.ai.mit.edu (4.1/AI-4.10) for gcl@cli.com id AA17891; Fri, 18 Aug 95 16:07:01 EDT
Message-Id: <v02120d00ac5aa1e6905a@[128.52.39.15]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Fri, 18 Aug 1995 16:07:08 -0400
To: lakin@pgc.com
From: JCMA@ai.mit.edu (John C. Mallery)
Subject: Re: CL-HTTP under GCL yet?
Cc: www-cl@ai.mit.edu, gcl@cli.com

At 8:57 PM 8/17/95, Fred Lakin wrote:
>Any new plans or projects underway to port CL-HTTP to GCL?

Sounds like a fine idea.  I am not aware of any efforts in this regard.

GCL may be missing some things like CLOS, threads, and network interfaces,
or may not be quite up to the full ANSI CL specification yet.

Can someone familiar with GCL update us as to the current status?

Are there some people interested in doing this port?



From clarisse@iexist.att.com  Tue Aug 22 03:58:36 1995
Return-Path: <clarisse@iexist.att.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06630; Tue, 22 Aug 95 03:58:36 CDT
Received: from gw2.att.com by cli.com (4.1/SMI-4.1)
	id AA08286; Tue, 22 Aug 95 02:05:02 CDT
Received: by ig1.att.att.com id AA20665; Tue, 22 Aug 95 02:36:08 EDT
From: clarisse@iexist.att.com
Received: from tenet.lab5523 by iexist.att.com (4.1/SMI-4.1)
	id AA06310; Mon, 21 Aug 95 10:54:10 CDT
Received: by tenet.lab5523 (4.1/SMI-4.0)
	id AA00895; Mon, 21 Aug 95 10:54:10 CDT
Date: Mon, 21 Aug 95 10:54:10 CDT
Message-Id: <9508211554.AA00895@tenet.lab5523>
To: lakin@pgc.com
Subject: Re: CL-HTTP under GCL yet?
Cc: www-cl@ai.mit.edu, gcl@cli.com

Yes, sharing more information about the status of GCL
would be useful here. For a GCL port, a foreign function
interface to sockets and TCP/IP will be required. I bet
such things already exist, but where?


From etokna@etn.ericsson.se  Wed Aug 30 08:07:05 1995
Return-Path: <etokna@etn.ericsson.se>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10798; Wed, 30 Aug 95 08:07:05 CDT
Received: from mailgate.ericsson.se by cli.com (4.1/SMI-4.1)
	id AA04613; Wed, 30 Aug 95 06:15:44 CDT
Received: from hisoy0 (hisoy0.etn.ericsson.se [193.161.188.2]) by mailgate.ericsson.se (8.6.11/1.0) with SMTP id NAA26552; Wed, 30 Aug 1995 13:15:17 +0200
Received: from grolsch.etn.ericsson.se by hisoy0 (5.0/LME-DOM-2.2.3)
	id AA29373; Wed, 30 Aug 1995 13:15:15 +0200
Received: by grolsch.etn.ericsson.se (4.1/client-1.5)
	id AA12481; Wed, 30 Aug 95 13:15:14 +0200
Date: Wed, 30 Aug 95 13:15:14 +0200
Message-Id: <9508301115.AA12481@grolsch.etn.ericsson.se>
From: Knut-Haavard Aksnes <etokna@etn.ericsson.se>
To: Jeff Dalton <jeff@aiai.ed.ac.uk>
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: giving up on [common] lisp....
In-Reply-To: <29428.9507231525@subnode.aiai.ed.ac.uk>
References: <29428.9507231525@subnode.aiai.ed.ac.uk>
Content-Length: 1387


> I used KCL and AKCL for years without having the sort of problem
> you're having.  The main reason you're having it now, I'd say, is
> that the free PC unixes don't agree about a.out formats and the
> like, and because they keep changing in gratuitous or nearly
> gratuitous ways.  Until the operating systems settle down a bit,
> there will keep being cases where GCL is out of sync with the latest
> version of Linux, FreeBSD, or NetBSD.

Not if the configuration of gcl is based on feature testing!

I have written  a preliminary  replacement of gcl-2.2's  configuration
mechanism, based on autoconf, my hack is sent to  WFS and I am waiting
for his  comments. What  I have done   is still not using any  feature
tests not provided by standard  autoconf but this will probably change
if I and/or others continue this conversion.

Obvious candidates for feature test  parameterization are among others
nearly all the functionality in configure.h as well as unexec.

Unexec  should probably be made  a library by FSF   as it is basically
lifted out of emacs.

Another relevant question is: Can libbfd be used?

-- 

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETO/X/I KNA		Phone: +47 37 05 14 81
Email: etokna@etn.ericsson.se (internet)  ETO.ETOKNA (memo)


From orth@skyler.arc.ab.ca  Wed Aug 30 19:02:22 1995
Return-Path: <orth@skyler.arc.ab.ca>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10965; Wed, 30 Aug 95 19:02:22 CDT
Received: from skyler.arc.ab.ca by cli.com (4.1/SMI-4.1)
	id AA06084; Wed, 30 Aug 95 17:28:06 CDT
Received: from capnhook.arc.ab.ca (capnhook.arc.ab.ca [128.144.1.248]) by skyler.arc.ab.ca (8.6.11/8.6.11) with ESMTP id QAA00080 for <gcl@cli.com>; Wed, 30 Aug 1995 16:27:48 -0600
From: Tom Orth <orth@skyler.arc.ab.ca>
Received: (orth@localhost) by capnhook.arc.ab.ca (8.6.11/8.6.5) id QAA05503 for gcl@cli.com; Wed, 30 Aug 1995 16:25:49 -0600
Date: Wed, 30 Aug 1995 16:25:49 -0600
Message-Id: <199508302225.QAA05503@capnhook.arc.ab.ca>
To: gcl@cli.com
Subject: Question about memory allocation
Content-Length: 1464

I don't know if this is the correct address to send this, but....

We're trying out the GCL/PCL combo on some of our LUCID code,
and got the following error:

Error: Invocation history stack overflow.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by COND.
Broken at NULL.  Type :H for Help.
PCL>>

We're running Solaris 2.4 on a Sparc 20.

What I need to know, fairly quickly, is if there's a way to boost
the memory requirements for this stack ?

And, is there a place these error messages are specifically 
explained in nauseating detail ? 8-)

Thanks !

	T.


-------------------------------------------------------------------------------
Thomas Orth, M.Sc.                              Alberta Research Council
Research Officer                                3rd Floor, 6815 8th Street N.E.
Advanced Computing & Engineering                Calgary, Alberta T2E 7H7       
Spatial Information Management and Analysis     Canada                         
-------------------------------------------------------------------------------
Email:              Phone:             Fax:                WWW:                
orth@arc.ab.ca      (403) 297-7571     (403) 297-2339      http://www.arc.ab.ca
-------------------------------------------------------------------------------
    I'd be really surprised if my opinions reflected those of my employers.    
-------------------------------------------------------------------------------


From Chandan.Haldar@blr.sni.de  Thu Aug 31 06:58:36 1995
Return-Path: <Chandan.Haldar@blr.sni.de>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11248; Thu, 31 Aug 95 06:58:36 CDT
Received: from nixpbe.pdb.sni.de (mail.sni.de) by cli.com (4.1/SMI-4.1)
	id AA07289; Thu, 31 Aug 95 04:58:02 CDT
Received: from blr.sni.de (blrsn01.blr.sni.de [149.202.145.3]) by nixpbe.pdb.sni.de (8.6.12/8.6.12) with SMTP id LAA14694; Thu, 31 Aug 1995 11:56:18 +0200
Received: from blrast03.blr.sni.de by blr.sni.de (4.1/SMI-4.1)
	id AA02181; Thu, 31 Aug 95 15:27:56+050
Date: Thu, 31 Aug 95 15:27:55+050
From: Chandan.Haldar@blr.sni.de (Dr. Chandan Haldar)
Message-Id: <9508311027.AA02181@blr.sni.de>
Received: by blrast03.blr.sni.de (5.0/SMI-SVR4)
	id AA01974; Thu, 31 Aug 95 15:49:21 GMT
To: orth@skyler.arc.ab.ca
Cc: gcl@cli.com
In-Reply-To: <199508302225.QAA05503@capnhook.arc.ab.ca> (message from Tom Orth on Wed, 30 Aug 1995 16:25:49 -0600)
Subject: Re: Question about memory allocation
Content-Length: 1191

> Error: Invocation history stack overflow.
> Fast links are on: do (use-fast-links nil) for debugging
> Error signalled by COND.
> Broken at NULL.  Type :H for Help.
> PCL>>

Most likely this is an infinite recursion that fills the IHS.  The IHS
is the Lisp version of the function call stack.  I don't remember this
happening with PCL when GCL was AKCL!  To find more about IHS, read
the original KCL Report.  The kcl-report.tex file should be available
at cli.com.  Still better, look at the GCL-1.1 source code :-).  Start
with h/cmpinclude.h, proceed to h/frame.h, and find ihs_overflow()
definition in c/main.c.  The default IHSSIZE defined in h/frame.h is
1024, you could try increasing that and remaking gcl.

Good luck!

--------------------------------------------------------------------------
Dr. Chandan Haldar
--------------------------------------------------------------------------
Siemens Information Systems Limited
Real Time Systems Division
29 Infantry Road, Bangalore 560 001, India.
Phone:    +91 80 551 1012                       Fax:      +91 80 551 1214
Internet: Chandan.Haldar@blr.sni.de
--------------------------------------------------------------------------

From schelter@posso.ibp.fr  Thu Aug 31 22:13:22 1995
Return-Path: <schelter@posso.ibp.fr>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11522; Thu, 31 Aug 95 22:13:22 CDT
Received: from ibp.ibp.fr by cli.com (4.1/SMI-4.1)
	id AA08970; Thu, 31 Aug 95 20:10:08 CDT
Received: from posso.ibp.fr (posso.ibp.fr [132.227.66.10])
	by ibp.ibp.fr (8.6.12/jtpda-5.0) with ESMTP id DAA03451
	for <gcl@cli.com>; Fri, 1 Sep 1995 03:10:06 +0200
Received: (wfs@localhost)
	by posso.ibp.fr (8.6.11/jtpda-5.0) id DAA19892 ; Fri, 1 Sep 1995 03:12:14 +0200
Date: Fri, 1 Sep 1995 03:12:14 +0200
From: schelter@posso.ibp.fr (William Schelter)
Message-Id: <199509010112.DAA19892@posso.ibp.fr>
To: gcl@cli.com
In-Reply-To: <199508302225.QAA05503@capnhook.arc.ab.ca> (message from Tom Orth on Wed, 30 Aug 1995 16:25:49 -0600)
Subject: Re: Question about memory allocation
Reply-To: wfs@fireant.ma.utexas.edu


To increase the stack sizes by a multiple of 4 (4 can be any integer) at top level
do (setq SYSTEM:*MULTIPLY-STACKS* 4), and top level will be reentered on the newly
grown stacks:

>(setq SYSTEM:*MULTIPLY-STACKS* 4)
4

>GCL (GNU Common Lisp)  Version(2.2) Tue Jul  4 17:05:30 MET DST 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>



From punch@cps.msu.edu  Fri Sep  1 12:51:32 1995
Return-Path: <punch@cps.msu.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11879; Fri, 1 Sep 95 12:51:32 CDT
Received: from moon.cps.msu.edu by cli.com (4.1/SMI-4.1)
	id AA10339; Fri, 1 Sep 95 11:19:13 CDT
Received: from sol.cps.msu.edu by moon.cps.msu.edu (8.6.12/CPS-1.1)
 id QAA25566; Fri, 1 Sep 1995 16:19:11 GMT
From: Bill Punch <punch@cps.msu.edu>
Received: by sol.cps.msu.edu (8.6.12) id MAA08640; Fri, 1 Sep 1995 12:19:11 -0400
Date: Fri, 1 Sep 1995 12:19:11 -0400
Message-Id: <199509011619.MAA08640@sol.cps.msu.edu>
To: gcl@cli.com
Subject: Two questions


1) I'd like to get gcl up on my NeXT Intel box. I read the archives and saw
some discussion of NeXT, but nothing about Intel. How hard is this to do? Any
help appreciated.

2) I built gcl-2.1 on my Sparc-10 running Solaris 2.4, along with pcl. Looked
easy, and I'm especially impressed with the tcl/tk support. However, the lisp
is a little flakey. For example, in a break, if I do a bt followed by a help,
I get a core dump (inconvenient). How stable is gcl? I had used akcl a few
years ago and thgought it looked pretty stable. I really want my lisp class to
play with gcl and learn tck/tk at the same time, but am a little gun shy at
this point. Anyone want to offer an opinion?

					>>>bill punch<<<
					MSU GARAGe (GA Research and App Group)
					punch@cps.msu.edu
					517-353-3541

From andre@mselrt3.ise.vt.edu  Thu Sep  7 18:52:39 1995
Return-Path: <andre@mselrt3.ise.vt.edu>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA14744; Thu, 7 Sep 95 18:52:39 CDT
Received: from mselrt3.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA24492; Thu, 7 Sep 95 17:03:22 CDT
Received: from localhost (andre@localhost) by mselrt3.ise.vt.edu (8.6.4/8.6.4) id RAA15286 for gcl@cli.com; Thu, 7 Sep 1995 17:57:18 -0400
Date: Thu, 7 Sep 1995 17:57:18 -0400
From: andre@mselrt3.ise.vt.edu
Message-Id: <199509072157.RAA15286@mselrt3.ise.vt.edu>
To: gcl@cli.com


Hi,

I'm trying to compile pcl with gcl 2.1 on an RS/6000
running AIX 3.2.5 and the following message appears:


Compiling /home/andre/lisp/compile/pcl-gcl-2.1/defs.lisp.
End of Pass 1.  
;; Note: Tail-recursive call of *NORMALIZE-TYPE was replaced by iteration.
End of Pass 2.  "./defs.h", line 169.15: 1506-195 (S) Integral constant expression with value greater than zero is required.
mv: 0653-401 Cannot rename defs.o to XXXdefs.o:
	     A file or directory in the path name does not exist.
0706-005 ld: Cannot find file: XXXdefs.o
	Check path name and permissions or
	use local problem reporting procedures.

Your C compiler failed to compile the intermediate file.
Loading binary of DEFS...

Error: Cannot open the file /home/andre/lisp/compile/pcl-gcl-2.1/defs.o.
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by OR.
Broken at LOAD.  Type :H for Help.

Would anyone know how to solve this problem?
Any help would be greatly appreciated.

Thanks,

Andre Ramos
Graduate Student
Dept. Industrial and Systems Engineering
Virginia Tech

From punch@cps.msu.edu  Thu Sep  7 21:01:13 1995
Return-Path: <punch@cps.msu.edu>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00153; Thu, 7 Sep 95 21:01:13 CDT
Date: Thu, 7 Sep 95 21:01:13 CDT
From: punch@cps.msu.edu
Message-Id: <9509080201.AA00153@ftp>
Apparently-To: <gcl-archive@ftp>


I've seen some traffic on compiling gcl for NeXT m68k, but none on how to
compile for NeXT Intel. I really need to get this up, so if anyone can offer
some advice I'd really appreciate it. 

					>>>bill<<<

From yonezawa@mcsew10.lsi.tmg.nec.co.jp  Thu Sep  7 21:20:20 1995
Return-Path: <yonezawa@mcsew10.lsi.tmg.nec.co.jp>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00157; Thu, 7 Sep 95 21:20:20 CDT
Date: Thu, 7 Sep 95 21:20:20 CDT
From: yonezawa@mcsew10.lsi.tmg.nec.co.jp
Message-Id: <9509080220.AA00157@ftp>
Apparently-To: <gcl-archive@ftp>

The following patch supports both Motorola and Intel.
To compile gcl on NeXTSTEP 3.2, gcc-2.6.3 (not NeXT's cc)is required.
----------------------------------------------------------------------
#!/bin/sh
# This is a shell archive (produced by GNU sharutils 4.1).
# To extract the files from this archive, save it to some FILE, remove
# everything before the `!/bin/sh' line above, then type `sh FILE'.
#
# Made on 1995-06-12 20:28 JST by <yonezawa@localhost>.
# Source directory was `/usr/local/src/gcl/2.1'.
#
# Existing files will *not* be overwritten unless `-c' is specified.
#
# This shar contains:
# length mode       name
# ------ ---------- ------------------------------------------
#  24463 -rw-r--r-- gcl-2.1-NeXT3-12jun95.diff
#
# ============= gcl-2.1-NeXT3-12jun95.diff ==============
if test -f 'gcl-2.1-NeXT3-12jun95.diff' && test X"$1" != X"-c"; then
  echo 'x - skipping gcl-2.1-NeXT3-12jun95.diff (file already exists)'
else
  echo 'x - extracting gcl-2.1-NeXT3-12jun95.diff (gzipped)'
  sed 's/^X//' << 'SHAR_EOF' | uudecode &&
begin 600 _shargzi.tmp
M'XL(`.@DW"\"`^U<?W?:1K/^&W^*"4G?"".P)'[8QG5.,<8)"08?P$GZMCVJ
M$,*H%A*5A&,WS?WL=V97$A((@A,GM[F-C@UH=W9W=G9F]IG5K@83TX.Q:1F@
M.[:OF;8',\W7)X8'OH-ITQGE7>E602G*,+='A@L=X^V@/VA>0*EX6]P9),A6
M2101TW4L7BV6!-OQ6=Y3#W0]!]BV:_PY-UUC5-S9>>&\`ZSM9&Y:HYWCV+6S
MD\ED?H"KO\P9%$9ZR$[1O_H+_@9?<^'V9@P%3J6/PGQ^S[H#A9D,/X(Z>-'J
MJV>M=E/=^:731^XD&#LNG%</7OU6*#Q#\N*>-AH51L;88XR6I,*T>G`=4"L)
M:D@A5U;)6Z6#ZIK*E8*)F9S/J79M+'X!CH2O6=;.3FL,=\[<!>_.\XTIB8S5
M??L2A)?:3+,-SX`;P_5,Q\Z)*,ZI<V/`WMQS]^P_C+VA:</8=:;P!.4PV1D:
MR)$1#)CF8QF4>\=Q39_:_+G;:?ZW_J8./]XYMO&7]D[[R?+,HC^]*MJ&7M2=
MXA^S9SN%>UT[.R-SC(.CNQTHO(7FK6[-1Y%&%;#I*]/6K+WS>N-%J]/LASE1
MPL[N[NYZ\LR9:\*9,019`FF_5JK6*A+(AX<58G.EKLQ@;L#+N0U0!46J54JU
M2H53[R8OUJ@LB7(5V"W`+DQF!Y)4`W@Q@WU%$O=+4J#L+RXNWX(0C`$<Y(H`
M%X[GF4/K#@L!E@+-\AQ6R533%:SC7---VW>\25!%G6J8V^9M#CC9#/6BADK@
M&Q;@SX"LSW7@-91`,*Y@:NJN,W-<7R1"5]-]\\;([3S""DB]:MP,?6,&9+SG
MCN^XCJ5!]4`J22)^EJ4B:\W6W0UME4&P'(V2O+'F64`V/$+]R/'",T]1-?,6
M*QA.Z28HCDDLVS4=KP8MS'--3X>J)$D+BE*1#1,)^@"8MGR3@@Z<!)<W".0?
M<JN.4%K0*]O0H^,L%;']R'O&W64N7IG)^L`K(V]S_\K^K[5@.Q]!"?[UWM7<
M](J3R+@3J>G>(D&2&4SFJ!=W@'V2E9I2KLF559>Q5"3A-\J'-:FZWF^4Q`/N
M-:B^DB@KH6KCWV/3YIW[T?-'ECDL3IY11AXSQC@OL"'#._]N9M`M#@?,S)'J
M'Q&)8:.<\`>K9VP3@5KO]%MJO?>\K_)4EJCV!Z<-E:7@O6D;<3H!=?_V?A*G
M&6D<`P++Z1NE'A)EWA@C)G=TU8I<(]&OEWM4Z!PMG22/4I0/:UA.V>"QRY)8
MCCQVALVC6)]_K<UO(=MH'/]NZ!,'GKQO-#X@</"0GX(!3U$S"SC9^J8.-:A=
M/0T2"R>QQ-^S?/S"ZM"U/!&>7[:Z?;+$S!.A?:IV>Z>M3KWWL]IHY*)<*#@+
M'IZ\?RO+:KMUTO^`OP>-=O";;EY%Z>'W\P;^^A!KUW-O:A#)''NH:WZ44\29
M/NI3UJOQ"GO(SW%Q-WX7MD4W'VI76?B5#0"77:"I_TC9K9-77*9?7W;;&=)D
MCRR[R*!?J.JQM'0#BA%D^LAN5_=!44"2:Y7]6N60[*"<,)YX`?)R+S5T63)(
MZ*\D_,,"^U(ZU!%+2N"SX#']PYG#YP_HSG#"\TW[*D2@2C$@PK_V2:MSVNH=
M,[QI.3HRC8B3YW7/VO7GQYE"E^AP6/"GA56H'A2L*?#$QC&CQ"K4T^;)Y?-C
M`%X8%2ZCZU`X?=UM']\XA%71_11:J!J--I+G]APHC-\1<!U:!JJ@BQQZO.QC
M&$P,<&8$;U$[C2O+M*^-D>G3G.?-#-T<FSC4G@/^!*7J6B.5IC8A!SK*:VC`
MW*-X!!D\)3:L$8ULHAZZF;DX`ZKJH(DR<M_=LO\]].A[NNM+10="7H;Z="8@
M,A_JSNR.?FCV"(9_&:Z##6H(QC7+-;31'00SPPA_(&,&EWX#L$I7<^^*7&`4
MN_2/`QF1@/N98]0^-)G3YAE:#(JH6-R;<(+S>JL#>!T#ICGH4TV[Z/"L5J<U
M..OVSH\%S_#_#",XMU;;U?5=R*:(?D78V5S0R@5GZHEP?L%&!JLJ#+T1(AP4
M0Y2*_9@2A"IJH60N,7+Q[J9#QT)'0;*E\>O_?'YR7(A&D@3!`R(,1W%<6$3E
M:3?&2+W69RP;!X)LVB4)O6I<'&-ZP39N?689$O=H]S+2R;(]33::YX1-;/7Y
M%2A5D"ID:@I#!TJ:;4[N:YA5.3+,8,YG&*$03>WA+4<'A07$R.(@%"?91-)4
MIV'AB7-66_^LWF\O;E_47S?5>O=R$(Q`T,A%_7GS3>MT\`(G8IZSM\O,;.Q8
MEO..W,.-9B%*&AD(D*=8Q&.#X\YMFS)QD'3#0_,S_S**L+L7J_JD]5Q]T:Q?
MJ/W6?YNHK=*M++$KX"!@LSE0>\UZ6SVOOR5F8A4L9]&$!N\!5<!P;0:A,!B8
MJ%-M9IE3TS\";^A>"U+N"`&P9F'Z[4R[,M!*$F1[5!6Q=`0?DK*@XC"]4^D[
MF5,_/6T-6MT.\G+6K`\N>QC/$C,9S`A3A"Q%HUEL?36'AC(]Y[S!XK4P,[P2
M-/AYTBTTVMT^WFY/66AV7A>HHZ%!A[UIM)OUGMI`;IL9S9L*6=_59O!8P:IC
M5)>=UML^*DV&<4^A%9EG4<\NT9":+6@HAN`TB8%LOE('7;7904!`3@6G9.-:
M]1T5=5ME5IXHD`FD$DMI-9O-LW:W'J@OD)J^,YAC)^]!*AE,8U,-%5>'=Z8_
M<>8^"WS<L>$:MFZPQ%!VENG-P,/0F72$E6'K)DD=/NUV!FJGV3Q%'6RWNXUP
M&@L`>:NCDB^.6^*/8]WV+8+_\43D;8^04Y`>FK0^T5S8Q99&JG%KZ'/FAP4V
M#/$_[.N)<44K/N@D<=H)JV6LQKCE-DY\UA-LJNKSSB7%#9'5J>K)9:L]0/Y?
MUREZ4%N=1B_.6;SM)DYL:UK^5%\<1-9IN"F>M<D_Q^G6^]Y53YTH1^B+0A>%
MR&NE_9I<7A^%2(OHC^$JUFL,W^@_PE71H@#/P+\U6(KE+;!4/@U+Y4,LE5_"
M4JSP)V(I5O:!L%3^,[%4P,N#8:E\#$MQ&6W`4HP@'4NQK(?!4KR5>V.I0#(I
M6"H?8:F`YEY8*I_$4I]BM),U%C79QEPGGV*KDV5#+=5*AUL:*L93H:'&<58^
MB;-BJS`K."N?AK/R29R57\59L1:Z*LZ4_<&I^B(8LS3TQ7(^$WWEMT!?G(,U
MZ"N_"7WE'QA])6210%^)G'3TE5^+OO)KT5=^$_K*;XV^\O=$7XG>K$=?,:+U
MX"N_!?A*M+<-^(H7B,!7/@5\A3JJ>=Y\RB:/&F(H3;^&H>/[SA2'6[HM<T6#
MHR"+M!,SY/,3(=3"7%)9.Y?MMMKMJ=V.VE#[@WKC%2UF"OAQ?"S]_;<@"'/;
M,Z]LYOC]'*;GX!DU51KSIO">\_8YP##_46"8WP0,\['EWA`8YM.`87X-,(RO
M!.<W@;[$^,9!7YR%"/3E-X.^E5;3X5ZBS?/+_D!M="]^IIK:Z-GN-X_P)QNI
MX"^6M7$VB='=:T))E$LN_F.YRK;@KYP$?ZL/9-@#8GKF\A5PX./%HW<8.3A%
MT#.<^+-[W7%=0_<M!I`>PPOGG7%CN)!X9M1]50P@Y=4WC2F_:4AY]=F8$I5[
M]`TARL`<)VO,=+*-#YA\B@.8+#^`0E!9W=+ZJ](#(,KOX/%;!X_T1/[K($<F
M[DP,./Y#D"))X--AHBY]/9PX''.@F,O]?X.)84OMUF#0;M+8M>J=?P&"7+M\
MJ&RY?*A\XO)AHMPR@BP_+((,MW9]!Y'?0>17!)'?W,*DLF9A4MEF85+YE(5)
M9<W"9+56+GU?F/R.+;\O3'Y?F/R^,/D-P4IG^`>BF\04$B:MFSW"_,3&8[F&
M2%`JKVZ`C=''-\Q*-5G:N/1P>"C*4B7:_#HV;^WY-'/6>ONZWC[*9%`NP-,"
MCTPR`?APM-@DG#E'`H%:SV7X5^$9EB_R.G8>1=)#,B#:8$MS4+I/BJ0B<>?R
M'&5ZWAID9$DI$Q'U+^`OW&#ZA?DC\SOGWUMSF;K_2BZ+LK(?B=6;(+H9(Y+T
M,_TSQCDQODC=P+PW7N*]?U9D=<0X]\:`=)QC1&!SW0?+L:]8U6J0\)[XR*#D
M>OW!FV[OE!K)1%29]H*M*'$#5]8R5^VS8GN)*PNYLI)<#=&9X5"M\L(P2R"T
M<*R_N-#8:+.O?Y[H&&_6"F]K!;B=(UK9D;]Y*_[Z/?CRX:H+BJB7CDN5:Y*\
MP0%5T,#ER%*>O&]U<"9LLSW;*D8''Z(S%<&N:Z(JZ).I,P(M3QN\MRH@Z*,-
MI"-CZGA`&.<1TK(MZT_9P17(8GSD7UM%)YL3!J]JM>?-0:%^.>@B+#CM@S`R
M*6IUW#O([A9I!LWF<D_A;VSJHM=$=\%;P1B:6J*AS!`CICUVL#46NQPE#NX%
MHZU;AF;7N`/D\@F-XA\@GW^,>+;3>6<OB1,C?5W.2+>!9:I,'S6;XC@%30"G
MUU)-459M8:54W";D6@7-XF##$4)1+H<6L4<?L`L$>2$X2S7W*`IR+5J7&`<[
MPQ@5#@^2OL%HW#=L&-[!XI!F<#03!#JD^=.-/C+>*95B_*!FHUM\>9$+6C.&
M[ES#<4.?S#<E4\TLCSP:N:H(RU&@0SCNT1*^X\PNYR#7P>FE^+$FS>6)BQ0;
MU85O:&3A[.*DWT,))#RU*JP_M;I1&,`_SYT17S.Z?^6\/+E5D>L"2T`M,:"R
MDE(-4M8.P5[:.%!:P5DS%$'FO4<D564/1>4@U-G@%$\4O-"T"!R?JA05B=&-
MK[G^43C#K19"=C$TUD8C%\-]=3RW=8'*LW'!*]D`ORB?:GQ/LL/+-?PY!NY"
MO$6,RH1$V1R+=U0ZS#[$']="C%DD9FWFJ-8/"5YO''/$]%,I14NN7[[W(DP,
M&DY/W4X6^=7\3+R&CTN+O#[EWEMHD$_RNDZ&J><A2:CH9`.=HFN*TY![5WBF
MCT=%_%\,)M_IG%N6*UTWGCJ;>Q.!EV4,!'U=VIS.@@F:63`$1,,PN)G1I6-'
M5=,V?<&P?70#A<0`B@%;(I"K5T>:KXE2+AA6NLPQ"'PM4V6H4/#:=3)(]<9P
MAXYGU'/PZ!@:MHG3&SO[J1R*I5*$@Q^VXT&4''_:QZ412SDB.AX<?W4!I)[/
M1$TH_QLUH5R2Q7+I\-^I"?=%=WRE,`6!\8R/H3M.Q7#:J:$33I-E%KN45P],
MKI2*XJ-]0G<EN29M6*8OHW5'NKP+)ZXVLHP[&&AW%D(78>BS'S^Q<U^-[CE[
MY4`<A2@'#`I(/'D3"DE@/H9"=*\X-^=ZT1C-`W#S<FY%5<KWK/(>,+(:(*<0
MOD1K<_U!K]48J"?]4W;R?/FPN^DLPY#%"?A'R53-O4I#.)NA*2SE4`";EAXN
M5L;3D0U]@9S"=>YFJRW<BG_.-=N?3VDU5Q#"Q=N\$"87Y-Q__D>(W[+0AAV(
M"1XU!!&_A];%EF&O#)]^#^]L;6H$YBX&9WQR1_S,3%`4IV3/_T@%=%8L(.1U
M>,8598B0DJ/[E,5/#BW>(I!XUA(302(]LW@"`]$!(/)M8DF*'-L7M8)5+/[9
M5O`IL4-H`7E6>?XS*\\OQPY?RK"V#RW^6:;T`&JZ?F4WBG12L.PCG/Q\S5(Q
M:+LU],!0,2B=:C@_%HO%7`"W,S>:2A$5:+-@1J84-H\*VDP$7H3-GIGQS,6.
MCP4<(L-U1<CRRFM`ARJIX#)!V)XV6U/!KS8_CTEM8F^%@##9'RP2K,S2BD04
MX-ROTQ3GLOY^K!/I?4C/"_A_A+P\(M&MYT41PN@%(#$6R\DX?<B+M&B4/HUK
ME#Q6]U'>83/OI?OPGI:HQ#OTB"\;?TZ'V*>R4:72="@5!95*#-L&AL1Z3U$J
MTY^=Z$DS[XHS]\F;B`%"C=)-.W@O!\1'#9FCY_28.>)/%LKE0[%<B5:0/J>M
M6#*U`:/Y='HGIZ8JJ:FEC=RF2JJ,DBI'DN(%QB,$_<[,L(6`+^BJO=-NI_VS
M"!QR9PAL,\(?,84K,PU;W$ZSNF;33BRJ"#F8S7W^5K_??_">9D7@5?/:,L8M
MHGZ9W]`09[AHJXI8KA[$WE7T4,PIG\E=JB@K^\AMA+XS--81K_YT%C+[ID?,
M_MU5![W+3@._&[UF?8#,[U<J"_YYZ:`#Q(1N80S#NL5-:8.PL;%$9X+&U_6&
MFGO$ZU%'#F92(R(P#G+4/!N+_:I8/HC>&_55>Z=\V>ZE#N:^));W%P]9.7^\
M3-0+UV!H-^I]8-VY>,?F-NTP$Q8\KATZ7AOK%&TZ2W9N47EZ+S^$S[3+!^B.
M#J.P_@LR7GI`SJ,=%N$FG<0&L=@^'0Z>M@W?=>O6<_1KPT_$[K'4=8%[C"2^
M14*JUBK5Z*Q5,FJ/%XF'[%*M<E@K;SCRJTBB4EWLKJ/;R.4M0.Q;6=Y[2WL_
M5Z`U3I"VDX:%34=?;(Z);=-+K+L;_HA@.2R$NP"WD]G\=ID:P:V_Y^NSH,'[
MC0>?[A.#$2:M&XDPGRV>L&%0:(NCK$2[%9/#$-&O[E39\%!LOR3NQ]Z01[<+
M$^(S['CJJS/-U:9\=8GK;P!@>`;M)SSBVKR<O"C]"T8"OQ'5"LEN1#.+/=.'
ML_.!>E'OU<]!6!#DUFX.J51$N;IXY$V<ZSB=B6`SCH>.0_NA+<=&N.73@CM+
MY@MM<,M0^Q;,9Q:LX!P0W02K<6R)TYE;(S!H@Z*M^7S3F.WP'6+N?.;3<MT4
MHSO*X'%`I<HXO\<+.9R]*U<;JK2?/:%3L=1U:A4C"33+!4!K56HEI59)?>@:
M+[*J7!L,?%\6%S/)>Z9,^D34)S)?0V4(<#@?_Z)PV0*\F]#L)I2.CVF+MNHY
MZ*N10"R)3W^UGXIT%(2!O_>L6/DWVB$8KL?R95#?I>W?5"9[VCS+YN#X6,HM
MP.%["/`UXNH?O*R(A-PA\Z8%>;EE&5O./A4I_&7VP7H4V,?#]ZCT=7NTK;*Q
MC>QQ/>,)ZU2,Y_(W<<U<5`]Z&W`97==^FG8%U+$]V:182DW:7Z]8E8HL5BH+
MD,*F5OI0=6?$Y]O(I]/TW6L.+GL=0:97QHH1G1@/K'35=S7=$/@XAPV$GO`3
M&["/[?0VMI?\TM8BYR.;BYP-VXM*4KK\T]_N6:TI\J;W,1^(\F(_1>:)4._E
MJ%9:[-+@R?MZ\,['S)/WO7J';J+<Q5X3E)P[A<(8G@C=DY?]7%@.;.-=@1Z(
M%!W8Q>HB#\3E.$9<Y!I>T:GQ`R!LG8NJS;#7C\<3%[3!VXTYV]'&GP=G6WUH
MMK=5%8[!DO-!E+9.62*"I?VPI1(_2+&B+8L"*S-!6=KP&MZ*6)9C+^+%VU($
M]2`%E"TOK2*J\\VIL03J8D<AXM1SV_3\46(7-*3MG:9M+[$V$!-HE!YL!?E?
(&%K!`8]?``"J
`
end
SHAR_EOF
  echo 'gunzipping file gcl-2.1-NeXT3-12jun95.diff' &&
  gzip -d < _shargzi.tmp > 'gcl-2.1-NeXT3-12jun95.diff' && rm -f _shargzi.tmp &&
  chmod 0644 'gcl-2.1-NeXT3-12jun95.diff' ||
  echo 'restore of gcl-2.1-NeXT3-12jun95.diff failed'
  shar_count="`wc -c < 'gcl-2.1-NeXT3-12jun95.diff'`"
  test 24463 -eq "$shar_count" ||
    echo "gcl-2.1-NeXT3-12jun95.diff: original size 24463, current size $shar_count"
fi
exit 0

From starback@Minsk.DoCS.UU.SE  Fri Sep  8 07:16:41 1995
Return-Path: <starback@Minsk.DoCS.UU.SE>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00422; Fri, 8 Sep 95 07:16:41 CDT
Received: from sunic.sunet.se by cli.com (4.1/SMI-4.1)
	id AA01203; Fri, 8 Sep 95 05:16:03 CDT
Received: from Minsk.DoCS.UU.SE by sunic.sunet.se (8.6.8/2.03)
	id MAA12582; Fri, 8 Sep 1995 12:15:58 +0200
Received: by Minsk.DoCS.UU.SE (Sun-4/630, SunOS 4.1.2)
 with sendmail 5.61-bind 1.5+ida/ICU/DoCS id AA12237; Fri, 8 Sep 95 12:15:14 +0200
Date: Fri, 8 Sep 95 12:15:14 +0200
Message-Id: <9509081015.AA12237@Minsk.DoCS.UU.SE>
From: Per Starback <starback@Minsk.DoCS.UU.SE>
To: gcl@cli.com
Subject: gcl 2.1 with sockets on AIX

I've been using a precompiled gcl-2.1 for AIX/rs6000 as I had problems
compiling it myself.

I need the socket functions defined in run_process.c though (in
particular MAKE-SOCKET-STREAM).  The contents of run_process.c are
dependent on RUN_PROCESS being #defined, and it's not defined for
AIX.  Would it work for AIX or is there a good reason it's not defined
then?

I'd like to try it out, so I've been trying to compile gcl myself
again.
--       "
Per Starback, Uppsala, Sweden.  email: starback@minsk.docs.uu.se
 "Life is but a gamble!  Let flipism chart your ramble!"

From owner-gcl@cli.com  Wed Oct 11 14:57:25 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA06827; Wed, 11 Oct 95 14:57:25 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA19905; Wed, 11 Oct 95 14:55:24 CDT
Received: from  ccrma.Stanford.EDU  (ccrma.Stanford.EDU) by cli.com (4.1/SMI-4.1)
	id AA19899; Wed, 11 Oct 95 14:55:21 CDT
Received: from cmsgia by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA08697; Wed, 11 Oct 95 12:55:19 -0700
Received: by cmsgia.stanford.edu (950215.SGI.8.6.10/940406.SGI.AUTO)
	 id MAA27788; Wed, 11 Oct 1995 12:52:37 -0700
From: "Tobias Kunze" <tkunze@cmsgia.Stanford.EDU>
Message-Id: <9510111252.ZM27786@cmsgia.stanford.edu>
Date: Wed, 11 Oct 1995 12:52:05 -0700
In-Reply-To: Raymond Toy <toy@rtp.ericsson.se>
        "gcl 2.1:  bit-vectors broken" (Oct 11,  8:43am)
References: <199510111246.IAA10905@screamer.rtp.ericsson.se>
X-Mailer: Z-Mail (3.2.1 6apr95 MediaMail)
To: Raymond Toy <toy@rtp.ericsson.se>, GCL Mailing List <gcl@cli.com>
Subject: Re: gcl 2.1:  bit-vectors broken
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-gcl@cli.com
Precedence: bulk



almost the same here on an sig indy running gcl-2.1 under irix5,
but (dotimes (k 8) (print (bit b k))) fails (!!) and
(dotimes (k 8) (print (bit a k))) works...


GCL (GNU Common Lisp)  Version(2.1) Wed Oct  4 11:59:36 PDT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(setf a #*11111111)
#*11111111

>(bit a 1)
16842755

>(bit a 0)

Error: unknown array type
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at BIT.  Type :H for Help.
>>:q

Top level.
>(setf a #*11111111)
#*11111111

>(setf b #*00000000)
#*00000000

>(dotimes (k 8) (print (bit b k)))

#<OBJNULL>

Error: Caught fatal error [memory may be damaged]
Fast links are on: do (use-fast-links nil) for debugging
Error signalled by DOTIMES.
Broken at PRINT.  Type :H for Help.
>>(dotimes (k 8) (print (bit a k)))

-16777216
16842755
16777219
1
1107296256
0
1258291200
16842755
NIL
>>

From owner-gcl@cli.com  Thu Oct 12 04:46:50 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07398; Thu, 12 Oct 95 04:46:50 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA21709; Thu, 12 Oct 95 04:45:02 CDT
Received: from itd0.dsto.gov.au by cli.com (4.1/SMI-4.1)
	id AA21703; Thu, 12 Oct 95 04:44:56 CDT
Received: from hci-sun2.itd (hci-sun2.dsto.gov.au) by itd0.dsto.gov.au (4.1/SMI-4.1)
	id AA23038; Thu, 12 Oct 95 19:14:43 CST
From: cvc@itd.dsto.gov.au (Conn Copas)
Message-Id: <9510120944.AA23038@itd0.dsto.gov.au>
Subject: CLIM interfacing?
To: gcl@cli.com
Date: Thu, 12 Oct 1995 19:16:31 +0930 (CST)
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 435       
Sender: owner-gcl@cli.com
Precedence: bulk

All

I have found myself using a public-domain planner (ucpop40) which makes extensive
use of CLIM for its I/O. I now face the dilemma of whether I would be better off
re-writing the CLIM calls in tcl/tk, or maybe trying to persuade gcl to talk to
CLIM. Worse, I have almost no knowledge of interfacing Lisp to external systems. Any
opinions or, better still, experience or even issues to consider?

		Conn V Copas	cvc@itd.dsto.gov.au

From owner-gcl@cli.com  Thu Oct 12 04:49:29 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07403; Thu, 12 Oct 95 04:49:29 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA21720; Thu, 12 Oct 95 04:48:06 CDT
Received: from mailserver.di.unipi.it (apollo.di.unipi.it) by cli.com (4.1/SMI-4.1)
	id AA21714; Thu, 12 Oct 95 04:47:47 CDT
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.6.12/8.6.12) with ESMTP id FAA01938; Thu, 12 Oct 1995 05:46:47 -0400
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id KAA07029; Thu, 12 Oct 1995 10:46:45 +0100
Date: Thu, 12 Oct 1995 10:46:45 +0100
Message-Id: <199510120946.KAA07029@omega.di.unipi.it>
To: jeff@aiai.ed.ac.uk
Cc: gcl@cli.com
In-Reply-To: <9376.9510111615@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Wed, 11 Oct 95 17:15:49 BST)
Subject: Re: Need Sun4 SunOS 4.1.3 GCL
Sender: owner-gcl@cli.com
Precedence: bulk


You may want to try ECL (Embeddable Common Lisp), also a derivative
of KCL.
It comes with autoconf, determines by itself the proper architecture,
and you can select various options, including CLOS, CLX, MultiThread and TK.
There are now versions for Linux and DOS with either EMX or DJGPP.

You can find it at:

	ftp.icsi.berkeley.edu:/pub/ai/ecl
	ftp.di.unipi.it:/pub/lang/lisp

-- Beppe

From owner-gcl@cli.com  Sun Oct 15 12:42:10 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA09598; Sun, 15 Oct 95 12:42:10 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA00587; Sun, 15 Oct 95 12:39:08 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA00581; Sun, 15 Oct 95 12:39:02 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id SAA01077; Sun, 15 Oct 1995 18:38:46 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Sun, 15 Oct 95 18:36:57 BST
Date: Sun, 15 Oct 95 18:36:57 BST
Message-Id: <20017.9510151736@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: Need Sun4 SunOS 4.1.3 GCL
To: Giuseppe Attardi <attardi@di.unipi.it>
In-Reply-To: Giuseppe Attardi's message of Thu, 12 Oct 1995 10:46:45 +0100
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

> 
> You may want to try ECL (Embeddable Common Lisp), also a derivative
> of KCL.

> It comes with autoconf, determines by itself the proper architecture,
> and you can select various options, including CLOS, CLX, MultiThread and TK.
> There are now versions for Linux and DOS with either EMX or DJGPP.

Thanks!  It sounds interesting, whether or not it meets my current
needs.  I'll check it out if I can find some time.

-- jeff

From owner-gcl@cli.com  Mon Oct 16 12:02:06 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10023; Mon, 16 Oct 95 12:02:06 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA02999; Mon, 16 Oct 95 12:00:50 CDT
Received: from hollywood.cinenet.net by cli.com (4.1/SMI-4.1)
	id AA02993; Mon, 16 Oct 95 12:00:47 CDT
Received:  by hollywood.cinenet.net (8.6.12/25-eef)
	id QAA01214; Mon, 16 Oct 1995 16:58:06 GMT
From: Ingemar Hulthage <hulthage@hollywood.cinenet.net>
Message-Id: <199510161658.QAA01214@hollywood.cinenet.net>
Subject: Hi, my name is Ingemar ...
To: gcl@cli.com
Date: Mon, 16 Oct 1995 09:58:05 -0700 (PDT)
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 659       
Sender: owner-gcl@cli.com
Precedence: bulk


Hi,

I'm writing this to introduce myself to the GCL developer community.
I have ten years of Lisp programming experience in the field of AI.
In an earlier life I was a theoretical physicist.

Presently my interest is focused on numerical computations in Lisp.

I would like to help with the development of GCL, if I can in some
small way.  Please, note that I'm not a C programmer.  At a minimum I
should be able to do some testing on my AMD 486DX4 100Mhz 16Mb
computer, running Linux 1.2.13.

Sincerely,

Ingemar Hulthage

16920 Dulce Ynez Ln.
Pacific Palisades, CA 90272
(310) 459-3089 (voice & fax)
Email: hulthage@usc.edu or
       hulthage@cinenet.net

From owner-gcl@cli.com  Tue Oct 17 19:08:55 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10654; Tue, 17 Oct 95 19:08:55 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA07914; Tue, 17 Oct 95 19:05:32 CDT
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA07908; Tue, 17 Oct 95 19:05:30 CDT
Date: Tue, 17 Oct 1995 19:09:58 -0500
From: wfs@math.utexas.edu
Posted-Date: Tue, 17 Oct 1995 19:09:58 -0500
Message-Id: <199510180009.TAA01294@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id TAA01294; Tue, 17 Oct 1995 19:09:58 -0500
To: gcl@cli.com
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


I have put a new beta release of gcl 2.2, with all the bugs I know about
corrected.  Tests have been done on sparc: sunos 4.1.3 and solaris
5.4, linux a.out, linux elf, dec alpha OSF 1, hp800 .  Please let me
know of any problems as soon as possible so that i can release this.

Thanks,

Bill

ftp.ma.utexas.edu:pub/gcl/gcl-2.2-beta-3.tgz




From owner-gcl@cli.com  Tue Oct 17 21:35:56 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10666; Tue, 17 Oct 95 21:35:56 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA08119; Tue, 17 Oct 95 21:34:16 CDT
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA08113; Tue, 17 Oct 95 21:34:12 CDT
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.6.10/8.6.10) with ESMTP id TAA01363; Tue, 17 Oct 1995 19:33:57 -0700
Received: from atlantis.rand.org (atlantis.rand.org [130.154.8.194]) by monty.rand.org (8.6.10/8.6.10) with ESMTP id TAA18091; Tue, 17 Oct 1995 19:33:56 -0700
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.6.10/8.6.10) with SMTP id TAA24949; Tue, 17 Oct 1995 19:33:54 -0700
Message-Id: <199510180233.TAA24949@atlantis.rand.org>
To: wfs@fireant.ma.utexas.edu
Cc: gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
In-Reply-To: Your message of Tue, 17 Oct 95 19:09:58 EST.
             <199510180009.TAA01294@jany.ma.utexas.edu> 
Date: Tue, 17 Oct 95 19:33:52 PDT
From: Brian Leverich <leverich@rand.org>
Sender: owner-gcl@cli.com
Precedence: bulk




Hi -

Is 2.2 CLX-compatible?

If so, I'll do a thorough job of exercising it with Garnet ...

Tnx, B.



-- Your message was:   (from "wfs@fireant.ma.utexas.edu")
  
  I have put a new beta release of gcl 2.2, with all the bugs I know about
  corrected.  Tests have been done on sparc: sunos 4.1.3 and solaris
  5.4, linux a.out, linux elf, dec alpha OSF 1, hp800 .  Please let me
  know of any problems as soon as possible so that i can release this.

  Thanks,

  Bill

  ftp.ma.utexas.edu:pub/gcl/gcl-2.2-beta-3.tgz



  ------------------

From owner-gcl@cli.com  Tue Oct 17 23:27:02 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10718; Tue, 17 Oct 95 23:27:02 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA08332; Tue, 17 Oct 95 23:26:22 CDT
Received: from amber.ccs.neu.edu by cli.com (4.1/SMI-4.1)
	id AA08326; Tue, 17 Oct 95 23:26:18 CDT
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.80])
	by amber.ccs.neu.edu (8.6.12/8.6.4) with ESMTP id AAA13653; Wed, 18 Oct 1995 00:25:50 -0400
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.12/8.6.4) id AAA12157; Wed, 18 Oct 1995 00:25:49 -0400
Date: Wed, 18 Oct 1995 00:25:49 -0400
Message-Id: <199510180425.AAA12157@highpoint.ccs.neu.edu>
To: gcl@cli.com, wfs@fireant.ma.utexas.edu
Subject: small bug (X11_INCLUDE)
Sender: owner-gcl@cli.com
Precedence: bulk

This is a minor bug, but since you asked for them ....

If add_defs can't find X11, it sets X11_INCLUDE to "unknown"
Unfortunately, make then fails, when it tries to compile o/clxsocket.c
This can be fixed, of course, by simply having make omit clxsocket.

===
For your own curiosity, our systems people here like to do things in
non-standard ways.  The include directory is in:  /local/apps/X11/include/X11/
according to their stated intentions.  However, on some machines, it
can also be found in /usr/X11R6/include, and on those particular machines,
gcl can get it right (but not on other machines).		- Gene

From owner-gcl@cli.com  Wed Oct 18 01:18:24 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10870; Wed, 18 Oct 95 01:18:24 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA08795; Wed, 18 Oct 95 01:16:17 CDT
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA08789; Wed, 18 Oct 95 01:16:14 CDT
Date: Wed, 18 Oct 1995 01:20:46 -0500
From: wfs@math.utexas.edu
Posted-Date: Wed, 18 Oct 1995 01:20:46 -0500
Message-Id: <199510180620.BAA09720@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id BAA09720; Wed, 18 Oct 1995 01:20:46 -0500
To: Brian_Leverich@rand.org
Cc: gcl@cli.com, Brian_Leverich@rand.org
In-Reply-To: <199510180233.TAA24949@atlantis.rand.org> (message from Brian Leverich on Tue, 17 Oct 95 19:33:52 PDT)
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


There is now a ftp.ma.utexas.edu:pub/gcl/gcl-2.2-beta-4.tgz,
correcting another bitvector problem (caused by the 64 bit port to
alphas but affecting other ports), and some othe minor problems
pointed out since gcl-2.2-beta-3.tgz

[i have put diffs there too]

I have compiled CLX-5.02-gcl-2.1.tgz with 2.2-beta-4, and run some demos.
I did this on a sun os 4.1.3



Bill


From owner-gcl@cli.com  Wed Oct 18 06:49:53 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10916; Wed, 18 Oct 95 06:49:53 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA09224; Wed, 18 Oct 95 06:48:58 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA09218; Wed, 18 Oct 95 06:48:35 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id MAA16444; Wed, 18 Oct 1995 12:46:46 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Wed, 18 Oct 95 12:44:55 BST
Date: Wed, 18 Oct 95 12:44:55 BST
Message-Id: <22627.9510181144@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: beta rel 2.2
To: wfs@fireant.ma.utexas.edu
In-Reply-To: Brian Leverich's message of Tue, 17 Oct 95 19:33:52 PDT
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

>   I have put a new beta release of gcl 2.2, with all the bugs I know about
>   corrected.  Tests have been done on sparc: sunos 4.1.3 and solaris
>   5.4, linux a.out, linux elf, dec alpha OSF 1, hp800 .  Please let me
>   know of any problems as soon as possible so that i can release this.

Since I am desparate for a KCL/AKCL/GCL that works with SunOS 4.1.3,
I will test this.  I still can't quite believe that GCL 1.1 doesn't
work (I can build it, but get weird problems later on, including
bus errors).  Surely _someone_ out there has been using it
successfully.

-- jeff


From owner-gcl@cli.com  Wed Oct 18 08:23:06 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10979; Wed, 18 Oct 95 08:23:06 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA09402; Wed, 18 Oct 95 08:22:12 CDT
Received: from Rincewind (ossian.arch.su.EDU.AU) by cli.com (4.1/SMI-4.1)
	id AA09396; Wed, 18 Oct 95 08:21:37 CDT
Received: (from thorsten@localhost) by Rincewind (8.6.11/8.6.9) id XAA01908; Wed, 18 Oct 1995 23:06:25 +1000
Date: Wed, 18 Oct 1995 23:06:25 +1000
From: Thorsten Schnier <thorsten@arch.su.edu.au>
Message-Id: <199510181306.XAA01908@Rincewind>
To: wfs@fireant.ma.utexas.edu
Cc: Brian_Leverich@rand.org, gcl@cli.com
In-Reply-To: <199510180620.BAA09720@jany.ma.utexas.edu>
References: <199510180233.TAA24949@atlantis.rand.org>
	<199510180620.BAA09720@jany.ma.utexas.edu>
Sender: owner-gcl@cli.com
Precedence: bulk

wfs@fireant.ma.utexas.edu writes:
 > 
 > There is now a ftp.ma.utexas.edu:pub/gcl/gcl-2.2-beta-4.tgz,
 > correcting another bitvector problem (caused by the 64 bit port to
 > alphas but affecting other ports), and some othe minor problems
 > pointed out since gcl-2.2-beta-3.tgz
 > 
 > [i have put diffs there too]
 > 
 > I have compiled CLX-5.02-gcl-2.1.tgz with 2.2-beta-4, and run some demos.
 > I did this on a sun os 4.1.3
 > 
 > 
 > 
 > Bill
 > 

It didn't compile (or better link)  on solaris, even after copying
unexelf.19-29.c to unexelf.c:

ld: fatal: file ../cmpnew/cmptype.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file ../cmpnew/cmpmulti.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file ../cmpnew/cmpspecial.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file ../cmpnew/cmptag.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file ../cmpnew/cmptop.o: unknown type, unable to process using elf(3E) libraries

ld: fatal: file ../cmpnew/cmpvs.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file ../cmpnew/cmpwt.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: file sys_gcl.o: unknown type, unable to process using elf(3E) libraries
ld: fatal: File processing errors.  No output written to raw_gcl
*** Error code 1
make: Fatal error: Command failed for target `raw_gcl'
Current working directory /people/phd1/thorsten/tmp/import/gcl-2.2/unixport
*** Error code 1
make: Fatal error: Command failed for target `all'


thorsten


From owner-gcl@cli.com  Wed Oct 18 11:35:15 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11010; Wed, 18 Oct 95 11:35:15 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA09878; Wed, 18 Oct 95 11:33:57 CDT
Received: from hollywood.cinenet.net by cli.com (4.1/SMI-4.1)
	id AA09872; Wed, 18 Oct 95 11:33:55 CDT
Received:  by hollywood.cinenet.net (8.6.12/25-eef)
	id QAA19513; Wed, 18 Oct 1995 16:31:19 GMT
From: Ingemar Hulthage <hulthage@hollywood.cinenet.net>
Message-Id: <199510181631.QAA19513@hollywood.cinenet.net>
Subject: Minor GCL 2.1 bug in FORMAT
To: gcl@cli.com
Date: Wed, 18 Oct 1995 09:31:18 -0700 (PDT)
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 414       
Sender: owner-gcl@cli.com
Precedence: bulk


Hi,

The following FORMAT statement gives an error in GCL 2.1. (I haven't
tried it in any other version.)

(FORMAT NIL "~5,,X" 10)

It works in Lucid and Clisp.

Now, if there is ever a vote on scrapping the FORMAT statement
altogether, you can count me in ;-)

Ingemar Hulthage

16920 Dulce Ynez Ln.
Pacific Palisades, CA 90272
(310) 459-3089 (voice & fax)
Email: hulthage@usc.edu or
       hulthage@cinenet.net

From owner-gcl@cli.com  Wed Oct 18 15:36:17 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA11096; Wed, 18 Oct 95 15:36:17 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA10430; Wed, 18 Oct 95 15:35:16 CDT
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA10424; Wed, 18 Oct 95 15:35:14 CDT
Date: Wed, 18 Oct 1995 15:40:04 -0500
From: wfs@math.utexas.edu
Posted-Date: Wed, 18 Oct 1995 15:40:04 -0500
Message-Id: <199510182040.PAA10332@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id PAA10332; Wed, 18 Oct 1995 15:40:04 -0500
To: gcl@cli.com
In-Reply-To: <199510181306.XAA01908@Rincewind> (message from Thorsten Schnier on Wed, 18 Oct 1995 23:06:25 +1000)
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


In moving things back to the main source tree, i inadvertently left the
following two new defines out of the object.h

#define BV_OFFSET(x) ((type_of(x)==t_bitvector ? x->bv.bv_offset : \
		       type_of(x)== t_array ? x->a.a_offset : abort()))

#define SET_BV_OFFSET(x,val) ((type_of(x)==t_bitvector ? x->bv.bv_offset = val : \
		       type_of(x)== t_array ? x->a.a_offset=val : abort()))


Please add these if you compile gcl-2.2-beta-4.tgz, or you will get an
undefined function reference.

==============

Please send me the bugs... i dont think cc'ing the whole list is
necessary for all of them--especially if you are not sure if it is an
error you are making--eg possibly using a sun os 4.1 gcc on a solaris
machine...

And please try to be specific about how to create the
error.

C compiler:
hardware:
os level:
gcl version (beta-?):
what you type to make the error happen.

Bill
















From owner-gcl@cli.com  Mon Oct 23 20:41:36 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13840; Mon, 23 Oct 95 20:41:36 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA24937; Mon, 23 Oct 95 20:36:35 CDT
Received: from moon.cps.msu.edu by cli.com (4.1/SMI-4.1)
	id AA24931; Mon, 23 Oct 95 20:36:29 CDT
Received: from sol.cps.msu.edu by moon.cps.msu.edu (8.6.12/CPS-1.1)
 id BAA01746; Tue, 24 Oct 1995 01:36:25 GMT
Received: by sol.cps.msu.edu (8.6.12) id VAA07731; Mon, 23 Oct 1995 21:36:24 -0400
Date: Mon, 23 Oct 1995 21:36:24 -0400
Message-Id: <199510240136.VAA07731@sol.cps.msu.edu>
From: Bill Punch <punch@cps.msu.edu>
To: gcl@cli.com
Subject: building gcl under:Solaris2.4, gcc 2.7, tcl 7.4, tk 4.0
Sender: owner-gcl@cli.com
Precedence: bulk


This is for the 2.2-beta-6 stuff.

Thought maybe some folks would be interested. It pretty much built and ran
except for a couple of things:

1) add-defs had to be modified, as we use the /opt/* for /usr/local/*, in the
tradition (such as it is) for solaris.

2) unexec.c and unexelf.c in /o were copied in as unexec-19.29.c and
unexelf-19.29 (which is my emacs version). Just changed the names.

3) in gcl-tk, tkMain.c has a variable:

	char *tcl_RcFileName = NULL;

which I got a loader error on (multiply defined with the library libtk.a.). I
commented the above out of the file and that worked, since the comment seemed
to support that it wasn't necessary.

4) the makefile in gcl_tk had the tcl libs before the tk libs. I got a loader
error with some tk files not being able to find some tcl calls, so I switched
the order as listed below, and it worked also.

gcltkaux:  $(GUIOS)
	$(LD_ORDINARY_CC) $(GUIOS) -o gcltkaux ${X11_LIBS} ${TK_LIBS} ${TCL_LIBS} ${LIBS} ${GCLIB}

All in all, not bad. If I can do it, it must be easy :-).

Any chance that Noritake YONEZAWA  (<yonezawa@lsi.tmg.nec.co.jp>) NeXTStep
i386 diffs from his gcl-2.1 stuff can be included as one of the MACHINES. Not
many folks working on NS M68K's?

Seems to be working, I'll push it around more tomorrow. All the "simple"
things that were broke before seem to work now. Thanks a lot for all the
effort. 

					>>>bill<<<
					punch@cps.msu.edu
					517-353-3541




From owner-gcl@cli.com  Tue Oct 24 21:39:06 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA14247; Tue, 24 Oct 95 21:39:06 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA28307; Tue, 24 Oct 95 21:36:19 CDT
Received: from arch.su.EDU.AU by cli.com (4.1/SMI-4.1)
	id AA28301; Tue, 24 Oct 95 21:36:15 CDT
Received: from coulin (coulin.arch.su.EDU.AU) by arch.su.EDU.AU (4.1/SMI-4.1)
	id AA07933; Wed, 25 Oct 95 12:35:49 EST
From: thorsten@arch.su.EDU.AU (Thorsten Schnier)
Received: by coulin (5.x) id AA07056; Wed, 25 Oct 1995 12:31:45 +1000
Date: Wed, 25 Oct 1995 12:31:45 +1000
Message-Id: <9510250231.AA07056@coulin>
To: gcl@cli.com
Subject: profiler
X-Sun-Charset: US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk



With the patches to the profile function (in 2.2 beta 4), the profiler
seems to work. However, I don't quite understand the parameters to
(si::prof start scale). What is start ? It seems to work with 0, 
is it an offset to the start of the profile array ? Then why would I want
to set it to anyhing else than 0 ?

And is there a way to get the size of the code to calculate scale ?
Other than reducing scale until all my functions appear in the profile?


The way it looks, the profiler seems to count ticks only for the 
currently executed function. As a result, the built-in functions 
collect nearly all of the ticks, and I can't find out in what of 
my functions they are called.

Is it possible to make it count ticks for all functions that are
currently in the invocation stack? That is, the first function
called would get 100%, all functions below get a smaller number. 
(Care would have to be taken to make sure recoursively called functions
are counted only once per tick).

I am running a genetic algorithm with 14 fitness functions, that
way I could find out what function uses what part of the execution
time (and therefore where it makes sense to try improvements).


thanks for all the work with gcl (I wouldn't be using LISP without
it)  !


thorsten

----------------------------------------------------------------------- 
       \    C                                       
        \   O                                          Thorsten Schnier
         \  M                       
     /\   \ P                            Key Centre of Design Computing
    /     / U                                      University of Sydney
    \    /  T                                                  NSW 2006
     \  /   I                      
      \/    N                                   thorsten@arch.su.edu.au 
    DESIGN  G                      http://www.arch.su.edu.au/~thorsten/
  key centre








  

From owner-gcl@cli.com  Wed Oct 25 11:10:54 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA14566; Wed, 25 Oct 95 11:10:54 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA00170; Wed, 25 Oct 95 11:07:33 CDT
Received: from aurora.os.dhhs.gov by cli.com (4.1/SMI-4.1)
	id AA00164; Wed, 25 Oct 95 11:07:30 CDT
Received: by aurora.os.dhhs.gov
	(1.37.109.15/16.2) id AA287867677; Wed, 25 Oct 1995 12:14:37 -0400
Date: Wed, 25 Oct 1995 12:14:37 -0400 (EDT)
From: Cameron Bowes <csb@aurora.os.dhhs.gov>
To: gcl@cli.com
Subject: HP-UX gcl-tk problem
Message-Id: <Pine.HPP.3.91.951025121234.28651B-100000@aurora.os.dhhs.gov>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

Hello folks -

I've been working with the beta 2.2 versions of gcl on an HP 9000/I70 
running HP-UX 9.04. Most things seem to have settled down fairly well 
(I'm using the beta 7), except for the gcl-tk portion, which dumps with 
an illegal instruction during an (si::tkconnect). It gets as far as 
getting the wish window up and then dies. The problem seems to be in the 
tk interface, as I can compile CLX just fine.

I'm using the stock tcl 7.3 and tk 3.6 packages compiled with the native
compiler. Both packages completely pass their test suites. I've also tried
creating the libraries using gcc (I'm using v2.6.3), but gcl still has the
same problem. I've also tried with and without optimization, to no avail. 

As for the gcl compile, using cc (rather than gcc) provides the cleanest 
compile, allowing me to load .o files without getting a bunch of 
undefined label messages (which I get with gcc compiles). Essentially 
things are fine, except for executing the tkl.o module.  

Any folks out there have any ideas? The performance of the later releases 
has been quite nice. Great work!

Thanks in advance for any assistance.

                                 Cam Bowes
                                 US Dept. of Health and Human Services
                                 csb@aurora.os.dhhs.gov




From owner-gcl@cli.com  Fri Oct 27 11:36:45 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA15411; Fri, 27 Oct 95 11:36:45 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA06984; Fri, 27 Oct 95 11:31:09 CDT
Received: from aurora.os.dhhs.gov by cli.com (4.1/SMI-4.1)
	id AA06978; Fri, 27 Oct 95 11:31:06 CDT
Received: by aurora.os.dhhs.gov
	(1.37.109.15/16.2) id AA247291899; Fri, 27 Oct 1995 12:38:19 -0400
Date: Fri, 27 Oct 1995 12:38:19 -0400 (EDT)
From: Cameron Bowes <csb@aurora.os.dhhs.gov>
To: gcl@cli.com
Subject: More on gcl-tk with HP/UX
Message-Id: <Pine.HPP.3.91.951027122321.24616A-100000@aurora.os.dhhs.gov>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

I finally located my problem with running the gcl-tk module on an HP 
9000/I70 with HP-UX 9.04. The tkl.o file generates and illegal 
instruction core dump when it is loaded. However, if I load the tkl.lisp 
file, rather than the object module everything works fine. My temporary 
workaround is to just put tkl.lisp in the lib/gcl-2.2/gcl-tk directory.

I've taken a look at tkl.c and don't see anything obvious that's breaking 
it, however, I'm just becoming familiar with how gcl does things so I 
could be missing about anything. I'm still stumped, but it's definitely 
tkl.o, and not the tkl.lisp functionality directly.

I'm working with the 2.2-beta-7 release. If anyone has any ideas/guidance 
I'd appreciated it.

				Thanks,    Cam Bowes
					   US Dept. of Health & Human Svcs
					   csb@aurora.os.dhhs.gov


From owner-gcl@cli.com  Fri Oct 27 12:12:25 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA15417; Fri, 27 Oct 95 12:12:25 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA07087; Fri, 27 Oct 95 12:08:55 CDT
Received: from deacon.cogsci.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA07072; Fri, 27 Oct 95 12:08:05 CDT
Received: from macbeth.cogsci.ed.ac.uk (macbeth.cogsci.ed.ac.uk [129.215.110.33]) by deacon.cogsci.ed.ac.uk (8.6.10/8.6.12) with SMTP id SAA15768; Fri, 27 Oct 1995 18:05:52 +0100
From: jeff@cogsci.ed.ac.uk
Date: Fri, 27 Oct 95 17:05:49 GMT
Message-Id: <9285.9510271705@macbeth.cogsci.ed.ac.uk>
To: tschung@candy.snu.ac.kr
Subject: Re: Calling C++ functions in LISP is possible?
Newsgroups: comp.lang.lisp
References: <46ps22$47n@sun330.snu.ac.kr>
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

In comp.lang.lisp you write:

>Hi!

>I am graduate student and I am using AKCL(Austin Kyoto Common Lisp).
>My task is binding of ODBMS and CLOS. Say, I want to contect lisp to 
>ODBMS. But I have many difficulties in trying it.

>I want to know the possibility of using C++ library in lisp environment.
>As all ODBMS's componets (i.e. storage system,schema menager ..) were
>constructed in C++ language I first want to know how to load C++ library 
>in lisp environment. Is it possible to use C++ libraries in AKlisp? 

This something I want to know too.  It's not only that OODBMs tend
to be written in C or C++ (or something along those lines), they
usually usually have a very good C++ "binding" and nothing nearly
as good for other languages.  For instance, objects will be cached
in the application even though it's a separate process from the OODBM.

So I'm going to cc this to the GCL mailing list (GCL is what AKCL
is now called) to see if anyone knows whether C++ can be used in
the same sort of ways as C.

-- jeff

From owner-gcl@cli.com  Sat Oct 28 06:36:11 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA15866; Sat, 28 Oct 95 06:36:11 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA09727; Sat, 28 Oct 95 06:31:22 CDT
Received: from mail.soc.staffs.ac.uk by cli.com (4.1/SMI-4.1)
	id AA09721; Sat, 28 Oct 95 06:31:15 CDT
Received: by mail.soc.staffs.ac.uk (5.65/DEC-Ultrix/4.3)
	id AA11436; Sat, 28 Oct 1995 12:31:27 +0100
Date: Sat, 28 Oct 1995 11:31:04 +0000 (GMT)
From: "D.T.Olsson" <cmrdto@soc.staffs.ac.uk>
To: gcl@cli.com
Subject: Running GCL on Dec Alpha...
In-Reply-To: <Pine.HPP.3.91.951027122321.24616A-100000@aurora.os.dhhs.gov>
Message-Id: <Pine.OSF.3.91.951028112933.902A-100000@sable.soc.staffs.ac.uk>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

Hello fellow LISP users,

   I have a problem which some of you may be able to help me with.  We 
have been trying to build gcl on our DEC Alpha (2100) workstations, with 
little or no luck.  Has anyone succesfully built this?  Also, has anyone 
out there tried xgcl?

Any responds are highly appreciated,

Very Best Regards,
-----
Thomas

--======================================================================-
| Thomas Olsson, Researcher     |  email : D.T.Olsson@soc.staffs.ac.uk  |
| School Of Computing           |                                       |
| Staffordshire University      |  url : http://www.soc.staffs.ac.uk/   |
| Beaconside                    |                                       |
| Stafford, UK  ST18 0DG        |  Phone : +44 (0)1785 353255           |
|                               |  Fax   : +44 (0)1785 353497           |
|                                                                       |
|    ... The moon is smaller than the earth, but further away ...       |
-=======================================================================-


From owner-gcl@cli.com  Mon Nov  6 12:23:34 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA03335; Mon, 6 Nov 95 12:23:34 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA19058; Mon, 6 Nov 95 12:13:33 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA19048; Mon, 6 Nov 95 12:13:28 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id MAA10857 for <gcl@cli.com>; Mon, 6 Nov 1995 12:13:25 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id MAA02421 for <gcl@cli.com>; Mon, 6 Nov 1995 12:13:24 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id NAA14524 for <gcl@cli.com>; Mon, 6 Nov 1995 13:14:43 -0500
To: GCL Mailing List <gcl@cli.com>
Subject: Report on gcl 2.2 beta-8 on solaris2.4
Date: Mon, 06 Nov 1995 13:11:56 -0500
Message-Id: <7559.815681516@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk

Grabbed gcl 2.2 beta-8 today and compiled it with gcc 2.7.0 on a
Solaris 2.4 machine.  It went just fine except for the bug mentioned
by Bill Punch about tcl_RcFileName being multiply defined.  I just
commented it out as Bill did.

Everything seems to work fine.  However, I did run into a couple of
problems in some of my apps.  First, reduce does not take the :key
keyword, and map-into does not exist.  I have a patch that adds this,
if anyone wants it.

Also, I was trying to get an ANSI loop macro to work using ansi-loop
from the CMU Lisp archives.  It works just fine except I had to
comment out one line (containing "special-operator-p").  gcl and
ansi-loop passes all of the tests except for the hash tests since
with-hash-table-iterator doesn't exist.

During the tests, though, I received many warnings from ansi-loop.  I
tracked some of them down to the fact that

	(subtypep 'fixnum 'real)

returns NIL NIL.  Shouldn't this be T T?

Ray


From owner-gcl@cli.com  Mon Nov  6 22:51:19 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA03487; Mon, 6 Nov 95 22:51:19 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA20420; Mon, 6 Nov 95 22:49:01 CST
Received: from huon.itd.adelaide.edu.au by cli.com (4.1/SMI-4.1)
	id AA20414; Mon, 6 Nov 95 22:48:56 CST
Received: from tellus.roseworthy.adelaide.edu.au by huon.itd.adelaide.edu.au with SMTP (5.61+IDA+MU+NF/UA-5.28B)
	id AA03980; Tue, 7 Nov 1995 15:18:53 +1030 (from bglaetze@roseworthy.adelaide.edu.au for gcl@cli.com)
Received: by tellus.roseworthy.adelaide.edu.au (5.57/ITD-AdelaideUni-FMA-921107)
	id AA18270; Tue, 7 Nov 95 15:19:24 +1030
Received: by newtellus.roseworthy.adelaide.edu.au; (5.65/1.1.8.2/06Jul95-1106PM)
	id AA21406; Tue, 7 Nov 1995 15:17:43 +1030
Date: Tue, 7 Nov 1995 15:17:43 +1030 (CST)
From: Brian Glaetzer <bglaetze@roseworthy.adelaide.edu.au>
Reply-To: Brian Glaetzer <bglaetze@roseworthy.adelaide.edu.au>
Subject: gcl-2.1 under Digital Unix 3.2b
To: gcl@cli.com
Message-Id: <Pine.3.89.9511071201.A18974-0100000@newtellus.roseworthy.adelaide.edu.au>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; CHARSET=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

Would be interested in a machine definition for compiling gcl-2.1 under 
Digital Unix 3.2b.

The closest that I could get was to use:

~> add-defs vax
~> make

which produced the following warning and error.

(cd o; make all)
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  main.c
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  alloc.c
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  gbc.c
/usr/lib/cmplrs/cc/cfe: Warning: gbc.c, line 746: & before array or 
function: ig
nored
    { c_stack_where = (int *) (void *) &env;}
 --------------------------------------^
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  bitop.c
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  typespec.c
cc -DVOL=  -I/usr/local/src/gcl-2.1/o  -c  -I../gcl-tk -I../h/  eval.c
/usr/lib/cmplrs/cc/cfe: Error: eval.c, line 1153: Improper cast of 
non-scalar type expression
   {new = (object *) (ap);
 ---------------------^
*** Exit 1
Stop.
*** Exit 1
Stop.



Brian Glaetzer  -  Roseworthy Computing Officer, University of Adelaide

PHONE: (+61 08) 30 37914     E-MAIL: bglaetzer@roseworthy.adelaide.edu.au
FAX:   (+61 08) 30 37965     POST:   Roseworthy Campus, ROSEWORTHY 5371



From owner-gcl@cli.com  Wed Nov  8 06:31:01 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04098; Wed, 8 Nov 95 06:31:01 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA15980; Wed, 8 Nov 95 06:24:52 CST
Received: from nexus.datawave.net by cli.com (4.1/SMI-4.1)
	id AA15974; Wed, 8 Nov 95 06:24:49 CST
Received: from merlin.datawave.net (merlin.datawave.net [198.70.55.19]) by nexus.datawave.net (8.6.12/8.6.5) with ESMTP id EAA27735; Wed, 8 Nov 1995 04:25:03 -0800
Received: (hqm@localhost) by merlin.datawave.net (8.6.12/8.6.5) id EAA10289; Wed, 8 Nov 1995 04:25:24 -0800
Date: Wed, 8 Nov 1995 04:25:24 -0800
Message-Id: <199511081225.EAA10289@merlin.datawave.net>
From: Henry Minsky <hqm@ua.com>
To: gcl@cli.com
Subject: GCL 2.1 under BSDI BSD/OS (formerly known as BSD.386)
Sender: owner-gcl@cli.com
Precedence: bulk


Hi,

I just compiled GCL under BSD/OS v 1.1. I used the NetBSD defs
file, and commented out the assembly language arithmetic routines
and used the mpi.c instead, and that seemed to work.


I would like to add a machine .defs file for bsdi, to make it
easier for other people to compile.


From owner-gcl@cli.com  Wed Nov  8 06:36:38 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04102; Wed, 8 Nov 95 06:36:38 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA16007; Wed, 8 Nov 95 06:32:30 CST
Received: from nexus.datawave.net by cli.com (4.1/SMI-4.1)
	id AA16001; Wed, 8 Nov 95 06:32:27 CST
Received: from merlin.datawave.net (merlin.datawave.net [198.70.55.19]) by nexus.datawave.net (8.6.12/8.6.5) with ESMTP id EAA27872; Wed, 8 Nov 1995 04:32:41 -0800
Received: (hqm@localhost) by merlin.datawave.net (8.6.12/8.6.5) id EAA10306; Wed, 8 Nov 1995 04:33:02 -0800
Date: Wed, 8 Nov 1995 04:33:02 -0800
Message-Id: <199511081233.EAA10306@merlin.datawave.net>
From: Henry Minsky <hqm@ua.com>
To: gcl@cli.com
Subject: GCL 2.1 under BSDI BSD/OS (formerly known as BSD.386)
Sender: owner-gcl@cli.com
Precedence: bulk


I may be misunderstanding something, but is there any way to separate
out the GCL sockets support from the tk/tcl and X code in GCL? I want
to make a lighter weight image for doing CGI scripts, and I would like
to have socket streams working, but I don't need X or tk.

Thanks,

Henry


From owner-gcl@cli.com  Wed Nov  8 15:04:30 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04262; Wed, 8 Nov 95 15:04:30 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA17042; Wed, 8 Nov 95 14:51:28 CST
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA17036; Wed, 8 Nov 95 14:51:26 CST
Date: Wed, 8 Nov 1995 14:52:05 -0600
From: wfs@math.utexas.edu
Posted-Date: Wed, 8 Nov 1995 14:52:05 -0600
Message-Id: <199511082052.OAA03963@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id OAA03963; Wed, 8 Nov 1995 14:52:05 -0600
To: gcl@cli.com
In-Reply-To: <199511081233.EAA10306@merlin.datawave.net> (message from Henry Minsky on Wed, 8 Nov 1995 04:33:02 -0800)Subject: Re: GCL 2.1 under BSDI BSD/OS (formerly known as BSD.386)
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


I think you will find that there is virtualy no tk code in the
base gcl itself, most is in the gcl-tk subdirectory in
a separate server process, and in the autoloading tkl.o file.  

Again with X there is basically nothing in the base GCL image.  I only put
in the code to perform the connection [size is 600 bytes on my linux
machine], so that people want to load clx would not have to rebuild
an image, or depend on the si::faslink which is not available on many machines.

The -lX11 -ltcl -ltk are not on the link line for example.

The X11_LIBS definition in the unixport/makefile is for the
convenience of people who want to link in Xlib stuff.   There are
basically three ways of having windowing for gcl that i know of:

1) the tcl/tk stuff [in the distribution]
2) CLX the common lisp version of Xlib [ftp.ma.utexas.edu:pub/gcl/CLX-5.02-gcl-2.1.tgz]
3) a system which links in the C xlib, and gives a lisp interface.
      [ftp.ma.utexas.edu:pub/gcl/xgcl-2.tgz by novak@cs.utexas.edu et al]


Bill

From owner-gcl@cli.com  Thu Nov  9 08:14:36 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04601; Thu, 9 Nov 95 08:14:36 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA01422; Thu, 9 Nov 95 08:07:35 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA01416; Thu, 9 Nov 95 08:07:32 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id IAA06301 for <gcl@cli.com>; Thu, 9 Nov 1995 08:07:31 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id IAA23891 for <gcl@cli.com>; Thu, 9 Nov 1995 08:07:30 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id JAA02099 for <gcl@cli.com>; Thu, 9 Nov 1995 09:08:50 -0500
To: GCL Mailing List <gcl@cli.com>
Subject: svref and making simple arrays
Date: Thu, 09 Nov 1995 09:05:59 -0500
Message-Id: <20373.815925959@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk

This is gcl 2.2 beta 8 on solaris 2.4 (and linux) compiled with gcc.

I had some code that used svref, but gcl produced incorrect results.
For example:

	>(setf x (make-array 4 :element-type 'fixnum 
                 :initial-contents '(1 2 3 4)))

	>(svref x 0)

	Error: 0 is an illegal index to #(1 2 3 ...).
	Fast links are on: do (si::use-fast-links nil) for debugging
	Error signalled by SVREF.
	Broken at SVREF.  Type :H for Help.

	>(type-of x)
	VECTOR

I guess I have two questions:  Is svref broken?  If not, how do I make
a simple-vector so that svref will work?

Ray

From owner-gcl@cli.com  Thu Nov  9 14:36:57 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04689; Thu, 9 Nov 95 14:36:57 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02687; Thu, 9 Nov 95 14:29:53 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA02681; Thu, 9 Nov 95 14:29:49 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id OAA23123 for <gcl@cli.com>; Thu, 9 Nov 1995 14:29:47 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id OAA28433 for <gcl@cli.com>; Thu, 9 Nov 1995 14:29:46 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id PAA03716 for <gcl@cli.com>; Thu, 9 Nov 1995 15:31:07 -0500
To: GCL Mailing List <gcl@cli.com>
References: <20373.815925959@rtp.ericsson.se> 
Subject: Re: svref and making simple arrays 
In-Reply-To: (Your message of Thu, 09 Nov 1995 09:05:59 EST.)
             <20373.815925959@rtp.ericsson.se> 
Date: Thu, 09 Nov 1995 15:28:16 -0500
Message-Id: <20741.815948896@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk

>>>>> "Raymond" == Raymond Toy <toy@rtp.ericsson.se> writes:


    Raymond> This is gcl 2.2 beta 8 on solaris 2.4 (and linux)
    Raymond> compiled with gcc.  I had some code that used svref, but
    Raymond> gcl produced incorrect results.  For example:

    >> (setf x (make-array 4 :element-type 'fixnum
    Raymond>                  :initial-contents '(1 2 3 4)))

    >> (svref x 0)

    Raymond> 	Error: 0 is an illegal index to #(1 2 3 ...).  Fast
    Raymond> links are on: do (si::use-fast-links nil) for debugging
    Raymond> Error signalled by SVREF.  Broken at SVREF.  Type :H for
    Raymond> Help.

    >> (type-of x)
    Raymond> 	VECTOR

As a couple of people have kindly pointed out, a simple-vector is a
(vector t).  I always forget this!  To me, a simple-vector should be a
vector the type of whose elements I know, not T.  Plus, I tried the
sample code above on clisp and cmulisp, and both said x was a
simple-vector. 

Anyway, if I remove the :element-type in the above make-array,
everything works.

However, I think this points out a slight deficiency in type-of.  It
would be nice if type-of would say simple-vector for those things that
are.  Obviously, svref can tell, so type-of should be able to say so.

Thanks for the correction,

Ray

From owner-gcl@cli.com  Sun Nov 12 08:21:46 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA06452; Sun, 12 Nov 95 08:21:46 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA16536; Sun, 12 Nov 95 08:18:27 CST
Received: from ciistr1.ist.utl.pt by cli.com (4.1/SMI-4.1)
	id AA16530; Sun, 12 Nov 95 08:18:19 CST
Received: from poirot.ist.utl.pt by ciistr1.ist.utl.pt; (5.65v3.0/1.1.8.2/24Jul95-0207PM)
	id AA21040; Sun, 12 Nov 1995 15:17:36 GMT
Received: from marte.gia.ist.utl.pt by poirot.gia.ist.utl.pt (4.1/SMI-4.1)
	id AA21615; Sun, 12 Nov 95 15:19:22 +0100
Date: Sun, 12 Nov 95 15:19:22 +0100
From: jcachopo@gia.ist.utl.pt (Joao Cachopo)
Message-Id: <9511121419.AA21615@poirot.gia.ist.utl.pt>
Received: by marte.gia.ist.utl.pt (4.1/SMI-4.1)
	id AA04261; Sun, 12 Nov 95 15:19:22 +0100
To: gcl@cli.com
Subject: Compiling gcl-2.2beta on DOS machines
Sender: owner-gcl@cli.com
Precedence: bulk

Hi!

I've been reading the mail-archive before I sent this message.

As far as I could tell, there have been some other people trying to do
what I want: compiling GCL on DOS machines.

However, all the messages had no answers :-(

I know that DOS is not a *supported* OS for this distribution of GCL,
though KCL has been...

I am using GCL as the suggested compiler for my students on Artificial
Intelligence.

For their work at the university, I had successfully compiled GCL on
Suns (SunOS4.1.3 and Solaris 2.3), and DEC-Alphas (OSF 3.0).

But I would like to provide them with binaries for DOS, so that they
can use it at home.

Therefore, I would like to try and compile GCL under DOS, using DJGPP
1.12m4.

As I am (an almost completely) stranger to DOS-based machines, I would
like to know whether some kind soul could give me some directions on
what needs to be done in order to accomplish this.

Thanks in advance,

--
Joao Cachopo


From owner-gcl@cli.com  Mon Nov 13 03:21:51 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA06856; Mon, 13 Nov 95 03:21:51 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA18535; Mon, 13 Nov 95 03:19:09 CST
Received: from asterix.stsn.dga.fr by cli.com (4.1/SMI-4.1)
	id AA18529; Mon, 13 Nov 95 03:19:02 CST
Received: by asterix.stsn.dga.fr (S.T.S.N. SMTP GATEWAY) with id KAA27313; Mon, 13 Nov 1995 10:18:16 +0100 (MET)
Date: Mon, 13 Nov 1995 10:18:16 +0100 (MET)
From: LIGNON Marc  <lnm@stsn.dga.fr>
Message-Id: <199511130918.KAA27313@asterix.stsn.dga.fr>
To: jcachopo@gia.ist.utl.pt
Cc: gcl@cli.com
In-Reply-To: <9511121419.AA21615@poirot.gia.ist.utl.pt> (jcachopo@gia.ist.utl.pt)
Subject: Re: Compiling gcl-2.2beta on DOS machines
Sender: owner-gcl@cli.com
Precedence: bulk

> Hi!

> I've been reading the mail-archive before I sent this message.

> As far as I could tell, there have been some other people trying to do
> what I want: compiling GCL on DOS machines.

> However, all the messages had no answers :-(

> I know that DOS is not a *supported* OS for this distribution of GCL,
> though KCL has been...

> I am using GCL as the suggested compiler for my students on Artificial
> Intelligence.

> For their work at the university, I had successfully compiled GCL on
> Suns (SunOS4.1.3 and Solaris 2.3), and DEC-Alphas (OSF 3.0).

> But I would like to provide them with binaries for DOS, so that they
> can use it at home.

> Therefore, I would like to try and compile GCL under DOS, using DJGPP
> 1.12m4.

> As I am (an almost completely) stranger to DOS-based machines, I would
> like to know whether some kind soul could give me some directions on
> what needs to be done in order to accomplish this.

I don't propose any solution for gcl on DOS.
Nevertheless, you've got emacs under DOS, on which you can load the
common-lisp package (require 'cl) ... and you can do a lot of things.
Ok! one has dynamic scoping rather than lexical scoping, etc. etc. etc.
You'll lose completely the C (mix) linking capability, but there's already a
certain degree of compatibility. For many things it's already great to have
that on a PC.
If you'll find or adapt GCL on a DOS based machine, let me know, I'll take it :-)
Cheers,

			Marc LIGNON
DGA/DCN/ST/DA/S/ES			lignon@stsn.dga.fr
8, boulevard Victor			tel: (33)(1) 40.59.13.14
75015 - PARIS - FRANCE			fax: (33)(1) 40.59.20.40



From owner-gcl@cli.com  Thu Nov 16 16:24:44 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA09221; Thu, 16 Nov 95 16:24:44 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA15834; Thu, 16 Nov 95 16:18:25 CST
Received: from salk.edu (helmholtz.salk.edu) by cli.com (4.1/SMI-4.1)
	id AA15828; Thu, 16 Nov 95 16:18:22 CST
Received: from bayes.salk.edu by salk.edu (4.1/SMI-4.1)
	id AA10699; Thu, 16 Nov 95 14:18:21 PST
From: viola@salk.edu (Paul Viola)
Received: (viola@localhost) by bayes.salk.edu (8.6.12/8.6.9) id OAA14316; Thu, 16 Nov 1995 14:18:18 -0800
Date: Thu, 16 Nov 1995 14:18:18 -0800
Message-Id: <199511162218.OAA14316@bayes.salk.edu>
To: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk


I've been trying to get GCL-2.2 beta working on a linux machine (I
built and have been using 1.1 for some time).  Here are the vitals:

    Linux 1.3.37.
    gcc version 2.7.0

The build went fine until the very end.

    ... 

    Warning: LISP-IMPLEMENTATION-VERSION is being redefined.
    Can't mmap (saved_gcl): errno 22
    make[1]: *** [saved_gcl] Error 1
    make[1]: Leaving directory `/a/tesla-e3/usr/export/tesla1/src/lisp/gcl-2.2/unixport'
    make: *** [all] Error 2

Any advice??  Anyone built it recently?  What versions of the OS were
you running?

I had a problem with sigcontext.h being missing from one of the older
versions of linux I was running.  I went to a new version and it
turned up.

I'd be happy to move to the "right" version of the Linux.

Thanks,
Paul


From owner-gcl@cli.com  Fri Nov 17 00:15:59 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA09466; Fri, 17 Nov 95 00:15:59 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA17519; Fri, 17 Nov 95 00:11:57 CST
Received: from euler.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA17509; Fri, 17 Nov 95 00:11:52 CST
Received: (billm@localhost) by euler.maths.monash.edu.au (8.6.8/8.6.4) id QAA00707 for gcl@cli.com; Fri, 17 Nov 1995 16:20:48 +1100
Date: Fri, 17 Nov 1995 16:20:48 +1100
From: WE Metzenthen <billm@euler.maths.monash.edu.au>
Message-Id: <199511170520.QAA00707@euler.maths.monash.edu.au>
To: gcl@cli.com
Subject: Re a gcl-2.2 beta problem
Sender: owner-gcl@cli.com
Precedence: bulk


viola@salk.edu (Paul Viola) wrote:

> I've been trying to get GCL-2.2 beta working on a linux machine (I
> built and have been using 1.1 for some time).  Here are the vitals:

Which beta version?  Do you have unexelf-19.29.c in the gcl-2.2/o
directory (with unexelf.c a link to it) ?  If not, then you should
try a later version of gcl-2.2.

Otherwise, you might try adding #define UNEXEC_USE_MAP_PRIVATE to
h/386-linux.h, run ./add-defs again, and make.  However, I think that
this should not be needed with linux-1.3.37.

Please let us know your result...


--Bill



From owner-gcl@cli.com  Fri Nov 17 17:45:01 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA09690; Fri, 17 Nov 95 17:45:01 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08326; Fri, 17 Nov 95 17:39:50 CST
Received: from salk.edu (helmholtz.salk.edu) by cli.com (4.1/SMI-4.1)
	id AA08320; Fri, 17 Nov 95 17:39:18 CST
Received: from bayes.salk.edu by salk.edu (4.1/SMI-4.1)
	id AA19906; Fri, 17 Nov 95 15:39:18 PST
From: viola@salk.edu (Paul Viola)
Received: (viola@localhost) by bayes.salk.edu (8.6.12/8.6.9) id PAA18930; Fri, 17 Nov 1995 15:39:14 -0800
Date: Fri, 17 Nov 1995 15:39:14 -0800
Message-Id: <199511172339.PAA18930@bayes.salk.edu>
To: gcl@cli.com
Subject: Linux GCL-2.2 update	
Sender: owner-gcl@cli.com
Precedence: bulk


Responding to my own message...

    I've been trying to get GCL-2.2 beta working on a linux machine (I
    built and have been using 1.1 for some time).  Here are the vitals:

	Linux 1.3.37.
	gcc version 2.7.0

    The build went fine until the very end.

I moved to the new gcl-2.2 (non-beta) and incorporated the fix
suggested by WE Metzenthen <billm@euler.maths.monash.edu.au>:

    Otherwise, you might try adding #define UNEXEC_USE_MAP_PRIVATE to
    h/386-linux.h, run ./add-defs again, and make.  However, I think that
    this should not be needed with linux-1.3.37.
	
This was in fact necessary to avoid the mmap error in the final
construction of saved_gcl.

During the subsequent compile of clx (as taken from
ftp.cli.com:/pub/clx/CLX-5.02-gcl-2.1.tgz) the loading of sockcl.o
seems to fail to find the fdopen symbol:

    ...
    ;;; cc -c socket.c -o socket.o -DUNIXCONN

    "included in image as clxsocket.c" 
    Loading sockcl.l
    Finished loading sockcl.l
    Compiling sockcl.l.
    End of Pass 1.  
    End of Pass 2.  
    OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
    Finished compiling sockcl.o.
    Loading sockcl.o
    symbol "fdopen" is not in base imagestart address -T 8266800 Finished loading sockcl.o

Though compilaton does proceed, eventually it will die an awful death
when run.  I had an older version of clx that uses faslink to load
sockcl.o.  It fails because faslink is not supported for ELF:

    ;;; cc -c /usr/local/src/lisp/clx/clx/socket.c -o /usr/local/src/lisp/clx/clx/socket.o -DUNIXCONN
    Loading /usr/local/src/lisp/clx/clx/sockcl.lsp
    Finished loading /usr/local/src/lisp/clx/clx/sockcl.lsp
    Compiling /usr/local/src/lisp/clx/clx/sockcl.lsp.
    End of Pass 1.  
    End of Pass 2.  
    OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
    Finished compiling /usr/local/src/lisp/clx/clx/sockcl.
    Faslinking #/usr/local/src/lisp/clx/clx/sockcl.o with /usr/local/src/lisp/clx/clx/socket.o -lc.

    Error: faslink() not supported for ELF yet
    Fast links are on: do (si::use-fast-links nil) for debugging
    Error signalled by LET.
    Broken at SYSTEM:FASLINK.  Type :H for Help.
    >>

Anyone compiled a version of clx for 2.2 under linux using ELF?

Thanks,
Paul

From owner-gcl@cli.com  Fri Nov 17 20:52:15 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA09708; Fri, 17 Nov 95 20:52:15 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08597; Fri, 17 Nov 95 20:46:20 CST
Received: from rand.org by cli.com (4.1/SMI-4.1)
	id AA08591; Fri, 17 Nov 95 20:46:16 CST
Received: from monty.rand.org (monty-cc.rand.org [130.154.8.173]) by rand.org (8.7.1/8.7.1) with ESMTP id SAA27454; Fri, 17 Nov 1995 18:46:12 -0800 (PST)
Received: from atlantis.rand.org (atlantis.rand.org [130.154.8.194]) by monty.rand.org (8.7.1/8.7.1) with ESMTP id SAA06529; Fri, 17 Nov 1995 18:46:16 -0800 (PST)
Received: from localhost.rand.org (localhost.rand.org [127.0.0.1]) by atlantis.rand.org (8.7.1/8.7.1) with SMTP id SAA06074; Fri, 17 Nov 1995 18:46:15 -0800 (PST)
Message-Id: <199511180246.SAA06074@atlantis.rand.org>
To: viola@salk.edu (Paul Viola)
Cc: gcl@cli.com, Brian_Leverich@rand.org
Reply-To: Brian_Leverich@rand.org
Subject: Re: Linux GCL-2.2 update 
In-Reply-To: Your message of Fri, 17 Nov 95 15:39:14 PST.
             <199511172339.PAA18930@bayes.salk.edu> 
Date: Fri, 17 Nov 95 18:46:14 PST
From: Brian Leverich <leverich@rand.org>
Sender: owner-gcl@cli.com
Precedence: bulk



-- Your message was:   (from "viola@salk.edu")
  
  Anyone compiled a version of clx for 2.2 under linux using ELF?

  Thanks, Paul

  ------------------


wfs will probably thwack me (-8, but 1.1 is the last version of GCL
which I'm sure is able to compile and run a fully working CLX.

If you want to use CLX, you might save yourself time by "upgrading"
to 1.1 and forgetting about ELF.  -B


--
Dr. Brian Leverich
Information Systems Scientist, The RAND Corporation
leverich@rand.org

From owner-gcl@cli.com  Fri Nov 17 23:44:54 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA09765; Fri, 17 Nov 95 23:44:54 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08894; Fri, 17 Nov 95 23:39:56 CST
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA08888; Fri, 17 Nov 95 23:39:54 CST
Date: Fri, 17 Nov 1995 23:44:41 -0600
From: wfs@math.utexas.edu
Posted-Date: Fri, 17 Nov 1995 23:44:41 -0600
Message-Id: <199511180544.XAA14156@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id XAA14156; Fri, 17 Nov 1995 23:44:41 -0600
To: gcl@cli.com
Cc: billm@euler.maths.monash.edu.au, viola@salk.edu
In-Reply-To: <199511172050.MAA18299@bayes.salk.edu> (viola@salk.edu)
Subject: linux 1.2.13 and gcl-2.2 (elf format)
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


Below is a patch necessary to compile gcl-2.2.tgz under LINUX 1.2.13
(elf) (slackware 3.0).

Incidentally from timing an nqthm proveall on this dell 133mhz machine
it was good..

OS               Run Time      Machine type
======           ======        ================ 
linux   133mhz   106 sec.         pentium dell xpm
solaris 133mhz   138 sec.         pentium  
linux    90mhz   165 sec.         pentium dec xl590
sparc20 100Mhz   149 sec.         ross hypersparc processor
sparc20  50Mhz   270 sec.        TI,TMS390Z50 sparc


Also the gcl-tk stuff appears to be ok linked with tk4.0.  All the tk lisp
calling code in gcl-tk/demos/widget.lisp, the gc-monitor etc work ok.
There are some references in widget.lisp to actual 'tcl' functions
in the tk3.6/demos/*.tcl  directory which of course dont work since
they arent there...

finally there were some messages about CLX.  The version of CLX
ftp.ma.utexas.edu:pub/gcl/CLX-5.02-gcl-2.2.tgz does compile with
gcl-2.2.  It does not use the faslink option since there is a call
the the socket stuff in the base image, and so normal loading will
work.   However on machines which dont define RUN_PROCESS (and linux
did not), then 'fdopen' was also undefined...   the diffs below
correct these things.   The other thing missing for some systems was
a CLX little endian declaration for these machines.   I have added
this to o/main.c so that machines defining little endian will add
this feature.

It does work for the little 'menu.l demo' that is in the CLX distribution.
I dont use CLX so i dont know if other things work... at least it
makes a connection and brings up a menu and responds to clicks.

========== patch for gcl-2.2 needed for linux 1.2.13 elf =========


Inserting file ~/gcl-2.2/foo-patch-gcl-2.2a
---Begin File ~/gcl-2.2/foo-patch-gcl-2.2a---
*** /home/wfs/gcl-2.2/h/386-linux.h	Sun Oct 15 00:11:07 1995
--- h/386-linux.h	Fri Nov 17 20:59:21 1995
***************
*** 42,48 ****
        sigaction(SIGSEGV,&action,0); \
        sigaction(SIGBUS,&action,0);} while (0)
  
! #include <asm/sigcontext.h>
  #define GET_FAULT_ADDR(sig,code,sv,a) \
      ((void *)(((struct sigcontext_struct *)(&code))->cr2))
  #endif
--- 42,50 ----
        sigaction(SIGSEGV,&action,0); \
        sigaction(SIGBUS,&action,0);} while (0)
  
! /* #include <asm/sigcontext.h> */
! #include <asm/signal.h>
! 
  #define GET_FAULT_ADDR(sig,code,sv,a) \
      ((void *)(((struct sigcontext_struct *)(&code))->cr2))
  #endif
***************
*** 62,67 ****
--- 64,70 ----
  #define SPECIAL_RSYM "rsym_elf.c"
  #define SEPARATE_SFASL_FILE "sfaslelf.c"
  
+ #define UNEXEC_USE_MAP_PRIVATE
  #define UNIXSAVE "unexelf.c"
  /* end ELF */
  #else
***************
*** 76,82 ****
    unexec_text_start = N_TXTADDR(ohdr) + A_TEXT_OFFSET(ohdr)
  
  #endif
- 
  
  /* 7 Mbytes were not enough with gcl-2.1, but 8 Mbytes will allow gcl to be
     built.
--- 79,84 ----
*** /home/wfs/gcl-2.2/o/main.c	Thu Nov  9 02:03:12 1995
--- o/main.c	Fri Nov 17 23:16:47 1995
***************
*** 857,862 ****
--- 857,865 ----
  	ADD_FEATURE("BSD");
  #endif
  
+ #ifdef LITTLE_ENDIAN	 
+ 	 ADD_FEATURE("CLX-LITTLE-ENDIAN");
+ #endif
  
  #ifndef PECULIAR_MACHINE
  #define BIGM    (int)((((unsigned int)(-1))/2))	 
*** /home/wfs/gcl-2.2/unixport/rsym_elf.c	Thu Nov  9 02:00:31 1995
--- unixport/rsym_elf.c	Fri Nov 17 23:11:04 1995
***************
*** 182,188 ****
  
  struct lsymbol_table tab;
  
! #define EXT_and_TEXT_BSS_DAT(p) ((ELF32_ST_BIND(p->st_info) == STB_GLOBAL) \
  				 && \
  				 (p->st_shndx == text_index \
  				  || p->st_shndx == data_index\
--- 182,190 ----
  
  struct lsymbol_table tab;
  
! #define EXT_and_TEXT_BSS_DAT(p) (((ELF32_ST_BIND(p->st_info) == STB_GLOBAL) \
! 				  || (ELF32_ST_BIND(p->st_info) == STB_WEAK) \
! 				  ) \
  				 && \
  				 (p->st_shndx == text_index \
  				  || p->st_shndx == data_index\
---End File ~/gcl-2.2/foo-patch-gcl-2.2a---








From owner-gcl@cli.com  Sat Nov 18 20:19:51 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA10440; Sat, 18 Nov 95 20:19:51 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA19912; Sat, 18 Nov 95 20:01:40 CST
Received: from euler.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA19903; Sat, 18 Nov 95 20:01:00 CST
Received: (billm@localhost) by euler.maths.monash.edu.au (8.6.8/8.6.4) id NAA04414; Sun, 19 Nov 1995 13:00:52 +1100
From: WE Metzenthen <billm@euler.maths.monash.edu.au>
Message-Id: <199511190200.NAA04414@euler.maths.monash.edu.au>
Subject: Re gcl-2.2 on Linux ELF
To: gcl@cli.com
Date: Sun, 19 Nov 1995 13:00:51 +1100 (EST)
Cc: wfs@fireant.ma.utexas.edu, viola@salk.edu
X-Mailer: ELM [version 2.4 PL21]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 2136      
Sender: owner-gcl@cli.com
Precedence: bulk


In a message to gcl@cli.com, viola@salk.edu (Paul Viola) wrote:

>     Otherwise, you might try adding #define UNEXEC_USE_MAP_PRIVATE to
>     h/386-linux.h, run ./add-defs again, and make.  However, I think that
>     this should not be needed with linux-1.3.37.
> 	
> This was in fact necessary to avoid the mmap error in the final
> construction of saved_gcl.


Whoops!, this is unfortunate.

A little background: the unexelf in gcl-2.1 was badly broken for
Linux.  I found the way to fix it, which subsequently turned out to be
almost identical to the changes made for emacs-19.29.  At that time,
it was essential to #define UNEXEC_USE_MAP_PRIVATE because the Linux
kernel code did not support the otherwise required operations.  When
Bill Schelter adopted my patches for gcl-2.2-beta-x, a small problem
with applying the patch caused the part which defined
UNEXEC_USE_MAP_PRIVATE to be rejected (there is still a file
gcl-2.2/h/386-linux.defs.rej in the latest version of gcl-2.2).  In
the meantime, Linus had been modifying the relevant parts of the
kernel.  To my surprise (for a reason which I won't go into here), I
found that the beta gcl worked without the symbol being defined!  I
was using linux-1.3.37 (or perhaps 1.3.35) at the time.  I chose not
to raise the matter with Bill Schelter at the time because I felt that
it would be more desirable to steer people towards an unbroken kernel
rather than assume that all Linux kernels were broken.

So, the question remains.  Why does it work on my system but not on
others?  There are two main possibilities which occur to me now:
1) It is somehow necessary to compile the kernel in a particular
   way.  e.g. my kernel is compiled as an ELF object (CONFIG_KERNEL_ELF=y),
   but I don't think that this should be crucial.
2) The version of libc is important.  I am using libc-5.2.9.  mmap.c
   is very simple and it does not look likely that any existing version
   would be the cause of the problem.

And a question to all: is there anyone else watching the gcl list who
has been able to use gcl-2.2 on a Linux ELF system without defining
UNEXEC_USE_MAP_PRIVATE ?


--Bill

From owner-gcl@cli.com  Tue Nov 21 05:27:54 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA12128; Tue, 21 Nov 95 05:27:54 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA24087; Tue, 21 Nov 95 05:23:58 CST
Received: from mailserver.di.unipi.it (apollo.di.unipi.it) by cli.com (4.1/SMI-4.1)
	id AA24081; Tue, 21 Nov 95 05:21:32 CST
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.6.12/8.6.12) with ESMTP id MAA01363; Tue, 21 Nov 1995 12:20:19 +0100
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id MAA29152; Tue, 21 Nov 1995 12:20:18 +0100
Date: Tue, 21 Nov 1995 12:20:18 +0100
Message-Id: <199511211120.MAA29152@omega.di.unipi.it>
To: jcachopo@gia.ist.utl.pt
Cc: gcl@cli.com
In-Reply-To: <9511121419.AA21615@poirot.gia.ist.utl.pt> (jcachopo@gia.ist.utl.pt)
Subject: Re: Compiling gcl-2.2beta on DOS machines
Sender: owner-gcl@cli.com
Precedence: bulk


If you want a ready to use (A)KCL-derivative Lisp runing on DOS (either with
DJGPP or, even better, with EMX), look for ECL (ECoLisp) in:

 - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl
 - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp

Enjoy.

-- Beppe

From owner-gcl@cli.com  Tue Nov 21 11:31:15 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA12248; Tue, 21 Nov 95 11:31:15 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA25061; Tue, 21 Nov 95 11:27:14 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA25055; Tue, 21 Nov 95 11:27:10 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id LAA05050 for <gcl@cli.com>; Tue, 21 Nov 1995 11:27:09 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id LAA01136 for <gcl@cli.com>; Tue, 21 Nov 1995 11:27:07 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id MAA23706 for <gcl@cli.com>; Tue, 21 Nov 1995 12:28:33 -0500
To: GCL Mailing List <gcl@cli.com>
Subject: gcl 2.2 on solaris 2.4 with gcc 2.7.0
Date: Tue, 21 Nov 1995 12:25:30 -0500
Message-Id: <12064.816974730@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk

Perhaps this is too late since gcl 2.2 seems to be released already.
For what it's worth, here are a few problems I found when building gcl
2.2 on Solaris 2.4 using gcc 2.7.0

gbc.c fails to compile because the result of a void function (error) is
assigned to a variable. This occurs here in memprotect_handler in sgbc.c:

	faddr=GET_FAULT_ADDR(sig,code,scp,addr); 

My solution was to replace this line with

	 if (code) {
	     faddr = ((siginfo_t *) code)->si_addr;
	 } else {
	     error("no address info");
	 }

The second problem occurs in SET-SIGIO-FOR-FD in sockets.c.  With
Solaris 2.4, FASYNC is defined in <sys/file.h>, which is not
#include'd anywhere for some reason.  To get sockets.c compiled, I
#added the include line.

Also, with tcl/tk 4, I needed to comment out the initializer for
tcl_RcFileName in gcl-tk/tkMain.c.

With these 3 changes, I was able to get gcl 2.2 built and running.  It
works just fine now!

Ray

From owner-gcl@cli.com  Tue Nov 21 17:24:43 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA12330; Tue, 21 Nov 95 17:24:43 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA26293; Tue, 21 Nov 95 17:17:42 CST
Received: from aaron.music.qc.edu by cli.com (4.1/SMI-4.1)
	id AA26287; Tue, 21 Nov 95 17:17:38 CST
Received: from igor by aaron.music.qc.edu (NX5.67d/NX3.0M)
	id AA08197; Tue, 21 Nov 95 18:14:57 -0500
Received: by igor.music.qc.edu (NX5.67d/NX3.0X)
	id AA06194; Tue, 21 Nov 95 18:14:57 -0500
Date: Tue, 21 Nov 1995 18:14:54 -0500 (EST)
From: "David N. Richards" <richards@igor.music.qc.edu>
To: Gcl Mailing List <gcl@cli.com>
Subject: undefined symbols - gcl-2.2
Message-Id: <Pine.NXT.3.91.951121181058.5681A-100000@igor>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

Hi - I'm trying to build gcl-2.2 on a NeXT m68k
running 3.2 using gcc-2.7.1 - ld complains:

ld: Undefined symbols:
_fSstaticp

I've grep-ed everything in sight and have found various
references to it such as : EXTER  object   fSstaticp ();
in some headers but can't find the definition for it
Any clues???
Dave

***********************************
         David Richards
The Aaron Copland School of Music
        at Queens College
      Voice: (718) 997-3874
***********************************

From owner-gcl@cli.com  Wed Nov 22 10:55:09 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA12641; Wed, 22 Nov 95 10:55:09 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA13104; Wed, 22 Nov 95 10:46:05 CST
Received: from relay.mod.uk by cli.com (4.1/SMI-4.1)
	id AA13098; Wed, 22 Nov 95 10:45:31 CST
Received: from hermes.dra.hmg.gb by relay.mod.uk with local SMTP id <g.02305-0@relay.mod.uk>; Wed, 22 Nov 1995 16:45:41 +0000
Received: from sun05. (vision.dra.hmg.gb) by hermes.dra.hmg.gb (MX V4.1 VAX)
          with SMTP; Wed, 22 Nov 1995 16:45:14 GMT
Received: from  (ms5c03) by sun05. (4.1/SMI-4.1) id AA17875; Wed, 22 Nov 95
          15:23:45 GMT
Received: from ms5c03.dra.hmg.gb (teeder@localhost [127.0.0.1]) by
          (8.6.12/8.6.9) with ESMTP id PAA01497 for <gcl@cli.com>; Wed, 22 Nov
          1995 15:22:47 GMT
Message-Id: <199511221522.PAA01497@>
X-Mailer: exmh version 1.6.2 7/18/95
To: gcl@cli.com
Subject: gcl2.2 and clx
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Wed, 22 Nov 1995 15:22:44 +0000
From: A J Teeder <teeder@ms5c03.dra.hmg.gb>
Sender: owner-gcl@cli.com
Precedence: bulk

On my sun (4.1) and linux (1.2.13), the "char-info stuff" max(and 
min)-char-****  is broken. My fix, on both machines, is as follows:-

In fonts.l
replace (deftype char-info-vec () '(simple-array int16 (6)))
with    (deftype char-info-vec () '(vector int16 6))

The clx demo programs "hello" and "menu" now run on both machines.

The real problem may be to do with "the" having problems associating vectors 
and simple arrays, but that is beyond my limited understanding of lisp.

Finally, have you received my "please subscribe" request sent to 
gcl-request@cli.com ?


Alan Teeder.



From owner-gcl@cli.com  Wed Nov 22 17:59:32 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA12718; Wed, 22 Nov 95 17:59:32 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA14332; Wed, 22 Nov 95 17:52:38 CST
Received: from jany.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA14326; Wed, 22 Nov 95 17:52:35 CST
Date: Wed, 22 Nov 1995 17:59:25 -0600
From: wfs@math.utexas.edu
Posted-Date: Wed, 22 Nov 1995 17:59:25 -0600
Message-Id: <199511222359.RAA18301@jany.ma.utexas.edu>
Received: by jany.ma.utexas.edu (8.6.11/5.51)
	id RAA18301; Wed, 22 Nov 1995 17:59:25 -0600
To: teeder@ms5c03.dra.hmg.gb
Cc: gcl@cli.com
In-Reply-To: <199511221522.PAA01497@> (message from A J Teeder on Wed, 22 Nov 1995 15:22:44 +0000)
Subject: Re: gcl2.2 and clx
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk



   In fonts.l
   replace (deftype char-info-vec () '(simple-array int16 (6)))
   with    (deftype char-info-vec () '(vector int16 6))


It would apppear that the culprit is our function

(defun si::simple-array-p (x)
  (and (arrayp x)
       (not (adjustable-array-p x))
       (not (array-has-fill-pointer-p x))
       (not (si:displaced-array-p x))))


ansi doc:
=======
simple-vector

   The type of a vector that is not displaced to another array, has no fill
   pointer, is not expressly adjustable and is able to hold elements of any
   type is a subtype of type simple-vector.
===========

The difference would appear to be between 'not expressly adjustable'
and not 'actually adjustable'.

In the ansi examples on adjustable-array-p:

      (adjustable-array-p (make-array 4)) =>  implementation-dependent

and in gcl it specifically will always be true.

=======
Ansi doc:

`adjustable-array-p'  array =>  generalized-boolean:

Returns true if and only if adjust-array could return a value which is
identical to array when given that array as its first argument.
=======

in make-array:

If adjustable is non-nil, the array is expressly adjustable (and so
actually adjustable); otherwise, the array is not expressly adjustable
(and it is implementation-dependent whether the array is actually
adjustable).

========

gcl at the moment does not support the notion of 'expressly
adjustable', which seems to be a pretty weak notion--perhaps expressly
put in by manufacturers who want to sell you more memory for a bigger
lisp system than gcl.  It is explicitly not tied to actual ability to
adjust the array, and indeed all arrays are 'actually adjustable' in
gcl.

I think I favor removing the   (not (adjustable-array-p x))
line from the simple-array-p test,  until some day we add another
function to test 'expressly-adjustable-p'! 

(typep x 'simple-array) ==> nil for anything...


bill



From owner-gcl@cli.com  Sun Dec  3 22:00:29 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04014; Sun, 3 Dec 95 22:00:29 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA19523; Sun, 3 Dec 95 21:55:28 CST
Received: from europe.std.com by cli.com (4.1/SMI-4.1)
	id AA19517; Sun, 3 Dec 95 21:55:25 CST
Received: from world.std.com by europe.std.com (8.6.12/Spike-8-1.0)
	id WAA02287; Sun, 3 Dec 1995 22:55:24 -0500
Received: by world.std.com (5.65c/Spike-2.0)
	id AA18997; Sun, 3 Dec 1995 22:50:41 -0500
From: rsg@world.std.com (roy s giacchino)
Message-Id: <199512040350.AA18997@world.std.com>
Subject: user interface questions ( newbie )
To: gcl@cli.com
Date: Sun, 3 Dec 1995 22:50:40 -0500 (EST)
X-Mailer: ELM [version 2.4 PL24]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 723       
Sender: owner-gcl@cli.com
Precedence: bulk



   Hello


      I just started using gcl and it seems to be a really great lisp
   system, my questions are 

      1) has anyone tried to interface the GNU readline package to 
         gcl ? I am certain that the patch would be less than 30 lines 
         long. ( or am I missing something ? ) 


      2) If someone wanted to tie readline into GCL, I have found where 
         to call readlines init but I can't find out where the main loop 
         is to read input from the user. Where can I find this ? 

      3) What is the status of the "latest and greatest" compiler that is 
         listed in the documentation, but not yet shipped.

   Thanks for any and all advice.

                            -- roy 

From owner-gcl@cli.com  Mon Dec  4 14:26:33 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04289; Mon, 4 Dec 95 14:26:33 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA21401; Mon, 4 Dec 95 14:14:49 CST
Received: from mselrt3.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA21395; Mon, 4 Dec 95 14:14:46 CST
Received: from localhost (andreltr@localhost) by mselrt3.ise.vt.edu (8.6.4/8.6.4) id PAA17448 for gcl@cli.com; Mon, 4 Dec 1995 15:17:20 -0500
Date: Mon, 4 Dec 1995 15:17:20 -0500
From: andreltr@mselrt3.ise.vt.edu
Message-Id: <199512042017.PAA17448@mselrt3.ise.vt.edu>
To: gcl@cli.com
Subject: Problems compiling gcl-2.2 on RS/6OOO w/ AIX 3.2.5
Sender: owner-gcl@cli.com
Precedence: bulk


Hi,

I'm trying to compile CLX with gcl-2.2 on RS/6OOO w/ AIX 3.2.5
using the cc compiler. The following error appears:

"included in image as clxsocket.c" 
Loading sockcl.l
Finished loading sockcl.l
Compiling sockcl.l.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling sockcl.o.
Loading sockcl.o
undefined .connect_to_server symbol26: unsupported relocation type.
Error: The relocation type was unknown
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by CLX-FOREIGN-FILES.
Broken at LOAD.  Type :H for Help.
>>Compiling gcl_dep.l.
Error: Cannot expand the SETF form (BUFFER-REQUEST-NUMBER BUFFER).
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by FUNCALL.

Would anyone be able to help? Thanks in advance,

Andre

From owner-gcl@cli.com  Tue Dec  5 17:19:02 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04845; Tue, 5 Dec 95 17:19:02 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07966; Tue, 5 Dec 95 16:59:20 CST
Received: from lonestar.jsc.nasa.gov by cli.com (4.1/SMI-4.1)
	id AA07960; Tue, 5 Dec 95 16:58:37 CST
Received: from mickey.jsc.nasa.gov by lonestar.jsc.nasa.gov; Tue, 5 Dec 95 17:01:35 -0600
Received: from janus.jsc.nasa.gov by mickey.jsc.nasa.gov (5.65c/ISL-ser-1.2)
	id AA02276; Tue, 5 Dec 1995 16:58:12 -0600
Received: by janus.jsc.nasa.gov (5.65c/ISL-cli-1.1)
	id AA17598; Tue, 5 Dec 1995 16:57:54 -0600
Received: from gadget.jsc.nasa.gov(139.169.132.13) by janus.jsc.nasa.gov via smap (V1.3)
	id sma017596; Tue Dec  5 16:57:48 1995
Received: by gadget.jsc.nasa.gov (5.65c/ISL-cli-1.1)
	id AA00885; Tue, 5 Dec 1995 16:57:24 -0600
Date: Tue, 5 Dec 1995 16:57:24 -0600
From: dryan@mickey.jsc.nasa.gov
Message-Id: <199512052257.AA00885@gadget.jsc.nasa.gov>
To: gcl@cli.com
Subject: pcl object printing prob
Cc: dryan@mickey.jsc.nasa.gov
Sender: owner-gcl@cli.com
Precedence: bulk


gcl 2.2 and pcl 2.2 (really pcl 2.1)

I'm having trouble printing out CLOS objects
as follows:

>(pcl:find-class 'pcl:standard-object)
#<Standard-Class PCL:STANDARD-OBJECT 6634064>
Error: Caught fatal error [memory may be damaged]
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by SYSTEM:TOP-LEVEL.
Broken at PRIN1.  Type :H for Help.
>>:ihs
  IHS[4]: #<compiled-function FUNCALL> ---> VS[14]
  IHS[5]: #<compiled-function SYSTEM:TOP-LEVEL> ---> VS[28]
    FRS[2]: (CATCH '(NIL) ***) ---> IHS[5],VS[8],BDS[9]
@ IHS[6]: #<compiled-function PRIN1> ---> VS[26]
NIL

Any ideas?

Thanks in advance,

***********************************************************************
** Dan Ryan			  | Net:   dryan@mickey.jsc.nasa.gov **
** Metrica, Inc. 		  | Phone: (713) 244-6135 (office)   ** 
** Automation and Robotics Group  |	   (713) 483-2054 (lab)	     **
** NASA Johnson Space Center/ER21 |	   (713) 756-9192 (mesg)     **
** Houston, TX 77058		  | FAX:   (713) 483-3204	     ** 
***********************************************************************

From owner-gcl@cli.com  Wed Dec  6 02:38:21 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA05063; Wed, 6 Dec 95 02:38:21 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA21193; Wed, 6 Dec 95 02:34:42 CST
Received: from itd0.dsto.gov.au by cli.com (4.1/SMI-4.1)
	id AA21172; Wed, 6 Dec 95 02:34:27 CST
Received: from hci-sun2.dsto.defence.gov.au (hci-sun2.dsto.gov.au) by itd0.dsto.gov.au (4.1/SMI-4.1)
	id AA17746; Wed, 6 Dec 95 19:04:19 CST
From: cvc@itd.dsto.gov.au (Conn Copas)
Message-Id: <9512060834.AA17746@itd0.dsto.gov.au>
Subject: Operating system calls
To: gcl@cli.com
Date: Wed, 6 Dec 1995 19:06:18 +1030 (GMT+10:30)
X-Mailer: ELM [version 2.4 PL23]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 547       
Sender: owner-gcl@cli.com
Precedence: bulk

All

I have what I suspect is a fairly ignorant question, which is that I wish to
call Unix from gcl. The docs for the system package refer to a whole lot of 
functions which do things like file management and grabbing environment vars, 
but not to a general purpose command-submission facility. At this point, I am
not concerned about returning the output of these commands to Lisp. Do I
possibly have to take the convoluted route and talk to tcl, or to some C 
process, in order to do this and, if so, how?
 
		Conn V Copas  cvc@itd.dsto.gov.au

From owner-gcl@cli.com  Thu Dec  7 09:28:34 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA05504; Thu, 7 Dec 95 09:28:34 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA10958; Thu, 7 Dec 95 09:21:53 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA10952; Thu, 7 Dec 95 09:21:49 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id JAA07418 for <gcl@cli.com>; Thu, 7 Dec 1995 09:21:48 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id JAA23978 for <gcl@cli.com>; Thu, 7 Dec 1995 09:21:47 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id KAA21123 for <gcl@cli.com>; Thu, 7 Dec 1995 10:23:19 -0500
To: GCL Mailing List <gcl@cli.com>
Subject: Any place for contributions?
Date: Thu, 07 Dec 1995 10:20:05 -0500
Message-Id: <3375.818349605@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk

Is there any site for placing contributions to gcl?  I have a couple
of contributions that people might like to see.  (Not written by me,
but modified to work with GCL.)

In particular, I have

	1.  ANSI LOOP macro (from CMU Lisp archives).
	2.  DEFPACKAGE (also from the CMU Lisp archives).  Requires
	    the ANSI LOOP macros.

Of course, the changes I made were all very minor, and anyone who
knows anything about lisp could make the same changes.   This just
saves you the trouble.

Any pointers?

Ray

From owner-gcl@cli.com  Fri Dec  8 01:25:14 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA05899; Fri, 8 Dec 95 01:25:14 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA19541; Fri, 8 Dec 95 01:18:13 CST
Received: from mselrt3.ise.vt.edu by cli.com (4.1/SMI-4.1)
	id AA19535; Fri, 8 Dec 95 01:18:10 CST
Received: from localhost (andreltr@localhost) by mselrt3.ise.vt.edu (8.6.4/8.6.4) id OAA19803; Thu, 7 Dec 1995 14:29:43 -0500
Date: Thu, 7 Dec 1995 14:29:43 -0500
From: andreltr@mselrt3.ise.vt.edu
Message-Id: <199512071929.OAA19803@mselrt3.ise.vt.edu>
To: gcl@cli.com
Subject: Running CLX and compiling CLUE 
Sender: owner-gcl@cli.com
Precedence: bulk

Hi,
1) I was able to compile CLX 5.02 with glc-2.2 on AIX 3.2.5. However, when
running the examples I get the following error for the demo:

>(load "demo/menu.l")
Loading demo/menu.l
Finished loading demo/menu.l
T

>(xlib::just-say-lisp "mselrt3:0.0")

Error: NIL is not of type STREAM.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by XLIB:OPEN-DISPLAY.
Broken at XLIB:OPEN-DISPLAY.  Type :H for Help.
>>:q

Top level.
>



2) Was anyone able to compile CLUE v7.2 with gcl-2.2? The compiling procedure
tries to find tcl/tcpinit.l but this file is nowhere to be found. any pointers
to a complete distribution?

Thanks in advance,

Andre
Virginia Tech


From owner-gcl@cli.com  Mon Dec 11 14:35:57 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07573; Mon, 11 Dec 95 14:35:57 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA19779; Mon, 11 Dec 95 14:28:22 CST
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA19773; Mon, 11 Dec 95 14:28:12 CST
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id UAA23424; Mon, 11 Dec 1995 20:26:54 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 11 Dec 95 20:24:20 GMT
Date: Mon, 11 Dec 95 20:24:21 GMT
Message-Id: <13871.9512112024@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Problems with version 2.2 -- how about 1.1?
To: wfs@fireant.ma.utexas.edu
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

I tried the most recent version I could find, which was just
called 2.2 w/o any modifiers, and I'm still having problems.

I wonder whether it's something about the machines here, or cc,
or something, because surely it works for _some_ people w/ SunOS
4.1.3.

What problems, you say?  Well, from time to time I see a message
like this:

  no buffer? 16bce8

There's a place in the code that does this, and I'm not sure
why it's being called at all.

And there's something I do that gives me this:

  Unrecoverable error: Segmentation violation..
  IOT trap

Unfortunately, I don't have time to track down just what it
is that leads to these things.

I use GCL 1.1 successfully, for the same purpose, on a 386 PC running
FreeBSD, but I have similar problems with 1.1 on the Suns.  This leads
me to suspect that the problems were not introduced by 2.2 -- and to
hope that maybe someone else has run into the same problems and
fixed them.

I'm using ordinary cc to compile.

-- jeff




From owner-gcl@cli.com  Mon Dec 11 19:25:04 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07640; Mon, 11 Dec 95 19:25:04 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA20547; Mon, 11 Dec 95 19:21:56 CST
Received: from piglet.ix.netcom.com (ix-grn-sc1-11.ix.netcom.com) by cli.com (4.1/SMI-4.1)
	id AA20541; Mon, 11 Dec 95 19:21:52 CST
Received:  
	from piglet.ix.netcom.com by piglet.ix.netcom.com  
		 with smtp 
Sender: owner-gcl@cli.com
Precedence: bulk
		
	(Linux Smail3.1.28.1 #1)  
	id m0tPJQ6-00105mC; Mon, 11 Dec 95 20:22 EST
Message-Id: <m0tPJQ6-00105mC@piglet.ix.netcom.com>
X-Mailer: exmh version 1.6.1 5/23/95
To: gcl@cli.com
Reply-To: WizRad@ix.netcom.com
Subject: ELF Build problems (and solution) w/ Linux 1.2.9 and gcc 2.7.0
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Mon, 11 Dec 1995 20:22:02 -0500
From: Tomy Hudson <wizrad@piglet.ix.netcom.com>


I just successfully compiled gcl-2.2 on Linux (ELF) 1.2.9 and gcc 2.7.0.
However I had a problem when trying to create saved_gcl

"Can't mmap(saved_gcl...) errno=22"

After finding the location of the failure in the source code
(o/unexelf.c), I noticed an "#ifdef UNEXEC_USE_MAP_PRIVATE". After
setting this macro, the build completed successfully. I assume this
should be in the 386-linux.h file, possibly within the #ifdef __ELF__
section. 

Hope this helps...

Tomy





From owner-gcl@cli.com  Mon Dec 11 21:16:19 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07657; Mon, 11 Dec 95 21:16:19 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA20723; Mon, 11 Dec 95 21:14:29 CST
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA20689; Mon, 11 Dec 95 21:07:30 CST
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id BAA01876; Tue, 12 Dec 1995 01:54:58 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Tue, 12 Dec 95 01:52:25 GMT
Date: Tue, 12 Dec 95 01:52:23 GMT
Message-Id: <16795.9512120152@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Longstanding AKCL and GCL bug
To: wfs@fireant.ma.utexas.edu
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

I've found another problem in GCL 2.2.

It's also in AKCL 1.505 on SunOS 4.1.3 Sun4 and GCL 1.1 on
a FreeBSD 2.0.5 386 PC.

The symptom: (values (parse-integer x)) returns both values
from parse-integer in compiled code.

The symptom doesn't occur if parse-integer is replaced by
a call to a function that calls parse-integer, or if it's
replaced by floor.  But presumably it's not only parse-integer
that causes the problem.  (Parse-integer is called by calling
the built-in C function Lparse_integer, or whatever it's
called -- so maybe all fns called that way have the problem).

Some evidence:

GCL (GNU Common Lisp)  Version(2.2) Mon Dec 11 04:24:45 GMT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(defun f (x) (values (parse-integer x)))
F

>(f "12")
12

>(compile 'f)
Compiling gazonk0.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 288174 Finished loading gazonk0.o
#<compiled-function F>

>(f "12")
12
2

-- jeff

From owner-gcl@cli.com  Tue Dec 12 09:11:33 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07925; Tue, 12 Dec 95 09:11:33 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA06958; Tue, 12 Dec 95 09:06:57 CST
Received: from mimsy.cs.UMD.EDU by cli.com (4.1/SMI-4.1)
	id AA06948; Tue, 12 Dec 95 09:05:32 CST
Received: by mimsy.cs.UMD.EDU (8.6.11/UMIACS-0.9/04-05-88)
	id KAA13518; Tue, 12 Dec 1995 10:01:08 -0500
Received: (from pcolsen@localhost) by n2ell.columbia.md.us (8.6.12/8.6.9) id JAA05567; Tue, 12 Dec 1995 09:43:56 -0500
Date: Tue, 12 Dec 1995 09:43:56 -0500
From: "Peter C. Olsen" <pcolsen@n2ell.columbia.md.us>
Message-Id: <199512121443.JAA05567@n2ell.columbia.md.us>
To: stat-lisp-news@umnstat.stat.umn.edu, gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

genetic-programming@cs.stanford.edu, informatik.uni-stuttgart.de!snns
Subject: Call For Entries: Mathematical Contest in Modelling
Reply-To: pcolsen@acm.org

The the annual national undergraduate Mathematical Contest in
Modelling is soliciting entries.

The is the LaTeX2e for a brief announcement.

%%%%%%%%%%%%%%%%%%%%%%%%%% cut here %%%%%%%%%%%%%%%%%%%%%%%%%
\documentclass[12pt]{article}

\begin{document}
\title{Mathematical Contest in Modelling}
\author{}
\date{November 14, 1995}
\maketitle{}

The Mathematical Contest in Modelling (MCM), a national contest for
college undergraduates, will hold its twelfth competition in February
1996.  The MCM is designed to stimulate and improve problem-solving
and writing skills in a team setting.

Last year, more than 320 teams submitted solution papers, representing
199 schools in 9 countries.  Outstanding solution papers will be
published in October 1996 in a special issue of \emph{The UMAP
  Journal}.

You can be part of the MCM effort by serving as a faculty advisor.
The advisor helps to organize the team, distribute contest materials,
and return solution papers to COMAP. 

Further information is available from Clarice Callahan at The
Consortium for Mathematics and its 
Applications (COMAP), via 
\begin{itemize}
\item email: \texttt{mcm@comap.com}
\item U.~.S.~Mail: COMAP, Suite 210, 57 Bedford Street, Lexington, MA
02173.  
\item Telephone: 617-862-7878 (ext 37)
\item FAX: 617-863-1202 
\end{itemize}
\end{document}

\centerline{\textbf{Applications must be received by 6 Jan 1996}}
%%% Local Variables: 
%%% mode: latex
%%% TeX-master: t
%%% End: 

From owner-gcl@cli.com  Tue Dec 12 10:57:21 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07934; Tue, 12 Dec 95 10:57:21 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07221; Tue, 12 Dec 95 10:54:24 CST
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA07215; Tue, 12 Dec 95 10:54:15 CST
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id QAA15183; Tue, 12 Dec 1995 16:52:02 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Tue, 12 Dec 95 16:49:27 GMT
Date: Tue, 12 Dec 95 16:49:27 GMT
Message-Id: <26271.9512121649@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: Longstanding AKCL and GCL bug
To: wfs@fireant.ma.utexas.edu
In-Reply-To: William Schelter's message of Tue, 12 Dec 1995 15:59:03 +0100
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk

>     The symptom: (values (parse-integer x)) returns both values
>     from parse-integer in compiled code.
> 
> 
> The declaration for parse-integer in cmpnew/lfun_list.lsp was incorrect
> claiming that it only returned one value.  Hence the compiler turned
> (values (parse-integer x)) into a noop.   I have corrected the
> declaration.
> 
> (DEFSYSFUN 'PARSE-INTEGER "Lparse_integer" '(T *) '(VALUES T T) NIL NIL)
> 
> not
> 
> (DEFSYSFUN 'PARSE-INTEGER "Lparse_integer" '(T *) 'T NIL NIL) 

Thanks!  BTW, to mailing list readers: loading the correct form
into the COMPILER package does the trick.

> I was not able to find other errors in the number of values returned
> in the lfun_list.lsp file, but would be happy to hear of any!

I'll keep an eye out for them.

-- jeff


From owner-gcl@cli.com  Tue Dec 12 12:32:27 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07939; Tue, 12 Dec 95 12:32:27 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07451; Tue, 12 Dec 95 12:30:28 CST
Received: from super.super.org by cli.com (4.1/SMI-4.1)
	id AA07445; Tue, 12 Dec 95 12:30:11 CST
Received: from gotham.super.org (gotham [192.239.79.2]) by super.super.org (8.7.1/8.6.12.1) with ESMTP id NAA08657; Tue, 12 Dec 1995 13:00:35 -0500 (EST)
Received: from hume.super.org (hume [192.239.79.11]) by gotham.super.org (8.6.12/8.6.12.1) with ESMTP id NAA04520; Tue, 12 Dec 1995 13:03:34 -0500
From: pcolsen@super.org (Peter C Olsen)
Received: (pcolsen@localhost) by hume.super.org (8.6.12/8.6.12.client) id NAA07568; Tue, 12 Dec 1995 13:03:34 -0500
Date: Tue, 12 Dec 1995 13:03:34 -0500
Message-Id: <199512121803.NAA07568@hume.super.org>
To: stat-lisp-news@umnstat.stat.umn.edu, gcl@cli.com,
        genetic-programming@cs.stanford.edu,
        informatik.uni-stuttgart.de!snns@super.org
Subject: Call For Entries: Mathematical Contest in Modelling 
Cc: fgiordan@carroll.edu, mcm@comap.org
X-Disclaimer: These opinions are mine, alone.
Reply-To: pcolsen@acm.org
Sender: owner-gcl@cli.com
Precedence: bulk


The the annual national undergraduate Mathematical Contest in
Modelling is soliciting entries.

The is the LaTeX for a brief announcement.

%%%%%%%%%%%%%%%%%%%%%%%%%% cut here %%%%%%%%%%%%%%%%%%%%%%%%%
\documentstyle[12pt]{article}

\title{Mathematical Contest in Modelling}
\author{}
\date{November 14, 1995}

\begin{document}
\maketitle{}
\pagestyle{empty}

The Mathematical Contest in Modelling (MCM), a national contest for
college undergraduates, will hold its twelfth competition in February
1996.  The MCM is designed to stimulate and improve problem-solving
and writing skills in a team setting.

Last year, more than 320 teams submitted solution papers, representing
199 schools in 9 countries.  Outstanding solution papers will be
published in October 1996 in a special issue of {\em The UMAP
  Journal}.

You can be part of the MCM effort by serving as a faculty advisor.
The advisor helps to organize the team, distribute contest materials,
and return solution papers to COMAP. 

Further information is available from Clarice Callahan at The
Consortium for Mathematics and its 
Applications (COMAP), via 
\begin{itemize}
 \item email: {\tt mcm@comap.com}
 \item U.~.S.~Mail: COMAP, Suite 210, 57 Bedford Street, Lexington, MA
02173.  
 \item Telephone: 617-862-7878 (ext 37)
 \item FAX: 617-863-1202 
\end{itemize}

\centerline{\bf Applications must be received by 6 Jan 1996}

\end{document}
%%% Local Variables: 
%%% mode: latex
%%% TeX-master: t
%%% End: 


From owner-gcl@cli.com  Wed Dec 13 18:27:03 1995
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA08487; Wed, 13 Dec 95 18:27:03 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA26761; Wed, 13 Dec 95 18:18:29 CST
Received: from ibp.ibp.fr by cli.com (4.1/SMI-4.1)
	id AA26755; Wed, 13 Dec 95 18:17:02 CST
Received: from posso.ibp.fr (posso.ibp.fr [132.227.66.10])
	by ibp.ibp.fr (8.6.12/jtpda-5.0) with ESMTP id PAA15335
	; Tue, 12 Dec 1995 15:56:55 +0100
Received: from triade.ibp.fr (triade.ibp.fr [132.227.66.8])
	by posso.ibp.fr (8.6.11/jtpda-5.0)
	with ESMTP id PAA13907 ; Tue, 12 Dec 1995 15:59:12 +0100
From: schelter@posso.ibp.fr (William Schelter)
Received: (wfs@localhost)
	by triade.ibp.fr (8.6.11/jtpda-5.0) id PAA11119 ; Tue, 12 Dec 1995 15:59:03 +0100
Date: Tue, 12 Dec 1995 15:59:03 +0100
Message-Id: <199512121459.PAA11119@triade.ibp.fr>
To: jeff@aiai.ed.ac.uk
Cc: gcl@cli.com
In-Reply-To: <16795.9512120152@subnode.aiai.ed.ac.uk> (message from Jeff Dalton on Tue, 12 Dec 95 01:52:23 GMT)
Subject: Re: Longstanding AKCL and GCL bug
Reply-To: wfs@fireant.ma.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk



    The symptom: (values (parse-integer x)) returns both values
    from parse-integer in compiled code.


The declaration for parse-integer in cmpnew/lfun_list.lsp was incorrect
claiming that it only returned one value.  Hence the compiler turned
(values (parse-integer x)) into a noop.   I have corrected the
declaration.

(DEFSYSFUN 'PARSE-INTEGER "Lparse_integer" '(T *) '(VALUES T T) NIL NIL)

not

(DEFSYSFUN 'PARSE-INTEGER "Lparse_integer" '(T *) 'T NIL NIL) 


I was not able to find other errors in the number of values returned
in the lfun_list.lsp file, but would be happy to hear of any!


Bill





From owner-gcl@cli.com  Fri Jan  5 08:41:21 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA17537; Fri, 5 Jan 96 08:41:21 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA04035; Fri, 5 Jan 96 08:37:13 CST
Received: from rs2.hrz.th-darmstadt.de by cli.com (4.1/SMI-4.1)
	id AA04029; Fri, 5 Jan 96 08:37:08 CST
Received: from mailhost.rs.E-Technik.TH-Darmstadt.DE (clyde.rs.e-technik.th-darmstadt.de [130.83.34.38]) by rs2.hrz.th-darmstadt.de (8.6.12/8.6.12.1ms) with SMTP id PAA40189 for <gcl@cli.com>; Fri, 5 Jan 1996 15:37:05 +0100
Received: from magnum.rs.E-Technik.TH-Darmstadt.DE by mailhost.rs.E-Technik.TH-Darmstadt.DE (5.x/SMI-SVR4)
	id AA03897; Fri, 5 Jan 1996 15:34:35 +0100
Received: by magnum.rs.E-Technik.TH-Darmstadt.DE (5.x/SMI-SVR4)
	id AA02395; Fri, 5 Jan 1996 15:34:20 +0100
Date: Fri, 5 Jan 1996 15:34:20 +0100
From: sth@magnum.rs.E-Technik.TH-Darmstadt.DE (Stefan Hoereth)
Message-Id: <9601051434.AA02395@magnum.rs.E-Technik.TH-Darmstadt.DE>
To: gcl@cli.com
Subject: faslink & solaris
X-Sun-Charset: US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk


Hi netters,

  is anyone in the gcl community using the SUN incremental
linker (ild) on solaris (SunOS 5.x, SYSV) together with gcl?

As a consequence it should be possible to use (si:faslink ..)
just as in SunOS 4.x (BSD) ?!

Where can we obtain necessary patches for gcl?

Thanks a lot for your kind help!

Stefan Hoereth

--

                  www                    
                 (o o)                    Technical University Darmstadt
    +------oOO----(_)----------------+    Fg. Rechnersysteme
    | Stefan Hoereth                 |    
    |                                |    Merckstr. 25
    |sth@rs.E-Technik.TH-Darmstadt.DE|    64283 Darmstadt / Germany
    +--------------------oOO---------+    
                |__|__|                   Tel: +49 6151 16-2075
                 || ||                    Fax: +49 6151 16-4976
                ooO Ooo


From owner-gcl@cli.com  Mon Jan 29 14:25:09 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA07014; Mon, 29 Jan 96 14:25:09 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA12803; Mon, 29 Jan 96 14:20:06 CST
Received: from scrooge.ee.swin.oz.au by cli.com (4.1/SMI-4.1)
	id AA12797; Mon, 29 Jan 96 14:18:59 CST
Received: (from dtc@localhost) by scrooge.ee.swin.oz.au (8.6.9/8.6.9) id GAA05387; Tue, 30 Jan 1996 06:43:37 +1100
From: Douglas Thomas Crosher  <dtc@scrooge.ee.swin.oz.au>
Message-Id: <199601291943.GAA05387@scrooge.ee.swin.oz.au>
Subject: Gcl 2.2 : bad length messages.
To: wfs@fireant.ma.utexas.edu
Date: Tue, 30 Jan 1996 06:43:37 +1100 (EST)
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Content-Length: 2291      
Sender: owner-gcl@cli.com
Precedence: bulk


	I've noticed what may be a bug with gcl-2.2. While I've been
able to work around it I thought it may be of interest to some.

	I had a program start printing "bad length 0x......."
messages. The address ... was always the same, and I noticed it
occurred during a garbage collect.  I suspect it is produced in gbc.c

	I tried to narrow it down and find a simple function that
could generate the message, my example is included below. It needs to
be compiled to generate the message.

	I tried this on FreeBSD-current, and a sun solaris sparc, both
produce the message. I also tried compiling without optimisation in
case the compiler was tickling it - but it made no difference.

	In order to get the message on the sun I had to manually type
(comb2 50 6) then (gbc t), it wouldn't produce it from (tst)?

	I had a look at the generated C code and the difference is
that one uses general objects to store integers, while the other seems
to try and allocate space locally.

Regards
Douglas Crosher

-=-=-=-=-=-	

(declaim (optimize (speed 3) (safety 0)))

;;; First version without integer declarations - works OK.
;;;
(declaim (ftype (function (fixnum fixnum) integer) comb1))
;;;
(defun comb1 (n j)
  (declare (fixnum n j))

  (do ((i n (1- i))
       (k j (1- k))
       (c1 1)
       (c2 1))
      ((<= k 0) (/ c1 c2))
      (declare (fixnum i k))
      
      (setf c1 (* c1 i))
      (setf c2 (* c2 k))
      )
  )

;;; Second version using integer declarations - produces a "bad
;;; length" message on subsequent (gbc t).
(declaim (ftype (function (fixnum fixnum) integer) comb2))
;;;
(defun comb2 (n j)
  (declare (fixnum n j))

  (do ((i n (1- i))
       (k j (1- k))
       (c1 1)
       (c2 1))
      ((<= k 0) (/ c1 c2))
      (declare (fixnum i k)
	       (integer c1 c2))

      (setf c1 (* c1 i))
      (setf c2 (* c2 k))
      )
  )


;;; The following function should produce the bad length message.
(defun tst ()

  ;; Big enough args are needed to generate the message.

  ;; First, the version which works.
  (format t "First version:~%")
  (comb1 50 6)
  (gbc t)


  ;; Secondly, after this version (gbc t) produces a bad length message.
  (format t "Second version:~%")
  (comb2 50 6)
  ;; The bad length message is produce during the garbage collect.
  (gbc t)
  
  )

From owner-gcl@cli.com  Tue Feb  6 14:40:42 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA10942; Tue, 6 Feb 96 14:40:42 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA13643; Tue, 6 Feb 96 14:36:18 CST
Received: from scrooge.ee.swin.oz.au ([136.186.4.20]) by cli.com (4.1/SMI-4.1)
	id AA13636; Tue, 6 Feb 96 14:36:12 CST
Received: (from dtc@localhost) by scrooge.ee.swin.oz.au (8.6.9/8.6.9) id HAA09945; Wed, 7 Feb 1996 07:37:11 +1100
From: Douglas Thomas Crosher  <dtc@scrooge.ee.swin.oz.au>
Message-Id: <199602062037.HAA09945@scrooge.ee.swin.oz.au>
Subject: Re: gcl2.2 and clx - simple-array, added support for change.
To: wfs@fireant.ma.utexas.edu
Date: Wed, 7 Feb 1996 07:37:10 +1100 (EST)
Cc: gcl@cli.com
In-Reply-To: <199511222359.RAA18301@jany.ma.utexas.edu> from "wfs@fireant.ma.utexas.edu" at Nov 22, 95 05:59:25 pm
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Content-Length: 3908      
Sender: owner-gcl@cli.com
Precedence: bulk


	This is an old thread, but I recently came across the same
problem and feel I can add support to a change to simple-array-p to
remove the test (not (adjustable-array-p x)).

>    In fonts.l
>    replace (deftype char-info-vec () '(simple-array int16 (6)))
>    with    (deftype char-info-vec () '(vector int16 6))
> 
> 
> It would apppear that the culprit is our function
> 
> (defun si::simple-array-p (x)
>   (and (arrayp x)
>        (not (adjustable-array-p x))
>        (not (array-has-fill-pointer-p x))
>        (not (si:displaced-array-p x))))
> 
> 
> ansi doc:
> =======
> simple-vector
> 
>    The type of a vector that is not displaced to another array, has no fill
>    pointer, is not expressly adjustable and is able to hold elements of any
>    type is a subtype of type simple-vector.
> ===========
> 
> The difference would appear to be between 'not expressly adjustable'
> and not 'actually adjustable'.
> 
> In the ansi examples on adjustable-array-p:
> 
>       (adjustable-array-p (make-array 4)) =>  implementation-dependent
> 
> and in gcl it specifically will always be true.
> 
> =======
> Ansi doc:
> 
> `adjustable-array-p'  array =>  generalized-boolean:
> 
> Returns true if and only if adjust-array could return a value which is
> identical to array when given that array as its first argument.
> =======
> 
> in make-array:
> 
> If adjustable is non-nil, the array is expressly adjustable (and so
> actually adjustable); otherwise, the array is not expressly adjustable
> (and it is implementation-dependent whether the array is actually
> adjustable).
> 
> ========
> 
> gcl at the moment does not support the notion of 'expressly
> adjustable', which seems to be a pretty weak notion--perhaps expressly
> put in by manufacturers who want to sell you more memory for a bigger
> lisp system than gcl.  It is explicitly not tied to actual ability to
> adjust the array, and indeed all arrays are 'actually adjustable' in
> gcl.
> 
> I think I favor removing the   (not (adjustable-array-p x))
> line from the simple-array-p test,  until some day we add another
> function to test 'expressly-adjustable-p'! 
> 
> (typep x 'simple-array) ==> nil for anything...
> 
> 
> bill

	I encountered trouble in an program I was using on gcl and CMU
CL. CMU CL can produce move efficient code if it is told that an array
is a simple-array, so I started using a (the (simple-array fixnum) ..)
to help its compiler.

	However when I ran the program under gcl the (the
(simple-array fixnum) ..) test failed.  I think this example shows a
real reason for the way the ANSI doc specifies the behaviour.

	 I don't think it's necessary for gcl to have a notion of
expressly-adjustable. If all arrays in gcl are adjustable then if
simple-array-p is changed to not fail if they are, then I think it
will conform to the ANSI document.

ANSI doc
==========
It is implementation-dependent whether displaced arrays, vectors with fill
pointers, or arrays that are actually adjustable are simple arrays.
==========

	Thus it would be OK for gcl to treat adjustable arrays as
simple arrays.

	Quoting from CLTL 2:

"X3J13 voted in June 1989 (3) to clarify that if one or more of the
:adjustable, :fill-pointer, and :displaced-to arguments is true when
make-array is called, then whether the resulting array is simple is
unspecified; but if all three arguments are false, then the resulting
array is guaranteed to be simple." p32.

	Note that if all three ... are false then the resulting array
is *guaranteed* to be simple, but currently under gcl *no* arrays are
simple, so gcl fails to meet the ANSI spec.

	e.g. Currently under gcl
(typep (make-array 1 :element-type 'fixnum)
       'simple-array) ==> nil

	But the above should be guaranteed to return t.

	By simply removing the (not (adjustable-array-p x)) test from
simple-array-p I think gcl will confirm to the ANSI doc.

Regards
Douglas Crosher

From owner-gcl@cli.com  Mon Feb 12 10:18:45 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA13669; Mon, 12 Feb 96 10:18:45 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA04371; Mon, 12 Feb 96 10:13:43 CST
Received: from net.nrl.navy.mil ([132.250.1.131]) by cli.com (4.1/SMI-4.1)
	id AA04365; Mon, 12 Feb 96 10:13:40 CST
Received: by airborne.nrl.navy.mil (4.1/SMI-4.1)
	id AA19125; Mon, 12 Feb 96 11:13:47 EST
Date: Mon, 12 Feb 96 11:13:47 EST
Message-Id: <9602121613.AA19125@airborne.nrl.navy.mil>
From: "S. Musman" <musman@airborne.nrl.navy.mil>
To: gcl@cli.com
Subject: *standard-output* stream bug...
Sender: owner-gcl@cli.com
Precedence: bulk


Does anyone have a fix for the following problem in GCL?


(let ((*standard-output* 'something-irrelevent))
	    (print 'hello *terminal-io*))


			-- Scott

-- 


                                 Scott Musman
  _______________________        Director, Intelligent Systems
  |    o                |        Integrated Management Services, Inc
  |     \o|             |        2101 Wilson Blvd, Suite 416
  |       \_            |        Arlington, Va, 22201
  |       \ \           |        (IMSI)703-528-0334 (NRL)202-404-1997
                                 musman@airborne.nrl.navy.mil
                                 http://airborne.nrl.navy.mil/~musman/


From owner-gcl@cli.com  Fri Feb 16 09:38:24 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA16070; Fri, 16 Feb 96 09:38:24 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA09110; Fri, 16 Feb 96 09:31:48 CST
Received: from rhea.as.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA09104; Fri, 16 Feb 96 09:31:46 CST
Received: from rhea (rhea.as.utexas.edu) by rhea.as.utexas.edu (5.x/SMI-SVR4)
	id AA03605; Fri, 16 Feb 1996 09:31:59 -0600
Message-Id: <3124A36F.3F5E@rhea.as.utexas.edu>
Date: Fri, 16 Feb 1996 09:31:59 -0600
From: Niall Gaffney <niall@rhea.as.utexas.edu>
Organization: Hobby Eberly Telescope
X-Mailer: Mozilla 2.0 (X11; I; SunOS 5.4 sun4m)
Mime-Version: 1.0
To: gcl@cli.com
Subject: compiling gcl under Solaris 2.4
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk

Hi,

Well the subject lists the task.  Trying to do it with the /usr/ucb/cc
instead of the solaris version (but not gcc...).  I have managed to get
everything working up to linking raw-gcl where it gives me the
following:

ld: warning: symbol `shifts' has differing types:
        (file ../mp/libmport.a(mp2.o) type=FUNC; file /usr/lib/libnsl.so
type=OBJT);
        ../mp/libmport.a(mp2.o) definition taken
Undefined                       first referenced
 symbol                             in file
pagetochar                          ../o/fat_string.o
ld: fatal: Symbol referencing errors. No output written to raw_gcl
*** Error code 1
make: Fatal error: Command failed for target `raw_gcl'

Any clues as to where to find pagetochar?  Also how do I make sure I get
the right shifts without rewriting the code?  Any
clues/hints/suggestions would be appreciated.

Thanks
Niall

-- 
==============================================================
Niall Gaffney                 niall@rhea.as.utexas.edu
HET Operations                http://rhea.as.utexas.edu/~niall

From owner-gcl@cli.com  Tue Feb 20 02:27:50 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA17916; Tue, 20 Feb 96 02:27:50 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA12740; Tue, 20 Feb 96 02:23:43 CST
Received: from espresso.hampshire.edu by cli.com (4.1/SMI-4.1)
	id AA12721; Tue, 20 Feb 96 02:23:39 CST
Received: from espresso.hampshire.edu (gzenie@localhost [127.0.0.1]) by espresso.hampshire.edu (8.7.3/8.6.9) with ESMTP id DAA29672; Tue, 20 Feb 1996 03:22:03 -0500
Message-Id: <199602200822.DAA29672@espresso.hampshire.edu>
To: gcl@cli.com
Subject: gcl's optimizing abilities?
Cc: gzenie@hampshire.edu
Reply-To: gzenie@hampshire.edu
X-Mailer: MH 6.8.3
Date: Tue, 20 Feb 1996 03:22:03 -0500
From: garth zenie <gzenie@espresso.hampshire.edu>
Sender: owner-gcl@cli.com
Precedence: bulk


first of all, I would like to extend my thanks to the people who have
spent time developing GNU lisp.  there is a great need for a GPL'd
common lisp and the gcl crew seems to be the only group of people who
are dedicated to that end.

now, I have a question regarding GCL's optimization abilities.   I ran
a little test which I always run on new lisps that I am trying out to
compare the abilities of the compilers.  

attached to the bottom of this file is a mandelbrot set generator.  it
doesn't actually save any of the values it computes otherwise this
code would be a benchmark of consing and not of number crunching.
there is a counter in the outer loop which counts the number of pixels
computed and returns it (to avoid any tricky dead code removal (not
that I think that there are that many compilers that are that
sophisticated as to figure out that they should completely remove all
of the code - I could be wrong though)).

here are the results from running the code:

machine - sparc 20/51 w/128mb RAM (uniprocessor)
to load - (compile-file "mandel.lisp" :load t)
to run - (time (make-mandel 500 500))

the results: CMU Common LISP 17f * 3.38 seconds
             GCL 2.2 * 381.13 seconds (!!!!)

I have a haunting intuition that GCL isn't inlining the code.  I can't
seem to get GCL to disassemble on a compiled function so I can't
check.  

thanks for any tips,
-- garth

[...all of the general disclaimers about how I wasn't planning on ever
showing anybody this code and how it is poorly written, not commented,
blah blah blah...]

*** the code ***

(declaim (optimize (speed 3) (safety 0) (space 0)))
(declaim (inline mandel-iterate))

(defun mandel-iterate (real imag maxiter p)
  "iterate on the given point with periodicity checking"
  (declare (single-float real imag)
           (fixnum maxiter p))
  (let ((set 0) (dec 0) (cnt 0)
        (treal 0.0) (timag 0.0)
        (t1 0.0) (t2 0.0)
        (zreal real) (zimag imag)
        (creal real) (cimag imag))

    (declare (fixnum set dec cnt)
             (single-float treal timag)
             (single-float zreal zimag creal cimag)
             (single-float t1 t2))
            
    (when (< p 0)
      (setq treal 0.0)
      (setq timag 0.0)
      (setq set 2)
      (setq dec 2)
      (setq cnt -2))

         (dotimes (n maxiter -1)
           (declare (fixnum n))
           (when (> (+ (setq t1 (* zreal zreal))
                       (setq t2 (* zimag zimag)))
                    4)
             (return n))
           (setq zimag (+ (* 2.0 zreal zimag) cimag))
           (setq zreal (+ (- t1 t2) creal))
           (when (< p 0)
             (when (and (= zreal treal) (= zimag timag))
               (return cnt))
             (when (not (= (decf cnt) 1))
               (setq dec (setq set (* set 2)))
               (decf cnt)
               (setq treal zreal)
               (setq timag zimag))))))

(defun make-mandel (width height &optional (maxiter 128) (x1 -2.50) 
                   (y1 1.50) (x2 1.50) (y2 -1.50))
  "make a mandelbrot set"
  (declare (fixnum width height maxiter)
           (single-float x1 y1 x2 y2))
  (let ((xs 0.0) (ys 0.0) (value 0) 
        (zimag 0.0) (zreal 0.0) 
        x1-bigger y1-bigger (count 0))
    
    (declare (fixnum value count)
             (single-float xs ys zimag zreal))

    (setq xs (/ (abs (- x1 x2)) width))
    (setq ys (/ (abs (- y1 y2)) height))
    (setq zimag y1)
    (setq zreal x1)
    (setq x1-bigger (> x1 x2))
    (setq y1-bigger (> y1 y2))
    (setq value 0)

    (dotimes (y height)
      (declare (fixnum y))
      (dotimes (x width)
        (declare (fixnum x))

        (setq value (mandel-iterate zreal zimag maxiter value))
        (incf count)

        (if x1-bigger
            (decf zreal xs)
          (incf zreal xs)))
      (setq zreal x1)
      (if y1-bigger
          (decf zimag ys)
        (incf zimag ys)))

    count))

*** end of the code ***

From owner-gcl@cli.com  Tue Feb 20 07:27:59 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA17998; Tue, 20 Feb 96 07:27:59 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA14952; Tue, 20 Feb 96 07:25:15 CST
Received: from red.ariel.cs.yorku.ca by cli.com (4.1/SMI-4.1)
	id AA14946; Tue, 20 Feb 96 07:25:11 CST
Received: by ariel.cs.yorku.ca (8.6.12/YU_CS_869.1.2.Ariel)
	id IAA22615; Tue, 20 Feb 1996 08:24:55 -0500
Received: from blue by red with SMTPD id <22614>; Tue, 20 February 1996 08:24:55 -0500
Received: by blue (5.x/YUCS_Sun_sub)
	id AA23311; Tue, 20 Feb 1996 08:24:54 -0500
Date: Tue, 20 Feb 1996 08:24:53 -0500 (EST)
From: "Daniel C. Stoica" <cs942002@ariel.cs.yorku.ca>
X-Sender: cs942002@blue
To: gzenie@hampshire.edu
Cc: gcl@cli.com
Subject: Re: gcl's optimizing abilities?
Message-Id: <Pine.SOL.3.91.960220081927.23105A@blue>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk


On Tue, 20 Feb 1996, garth zenie wrote:

        [ ...... ]

>
> here are the results from running the code:
>
> machine - sparc 20/51 w/128mb RAM (uniprocessor)
> to load - (compile-file "mandel.lisp" :load t)
> to run - (time (make-mandel 500 500))
>
> the results: CMU Common LISP 17f * 3.38 seconds
>              GCL 2.2 * 381.13 seconds (!!!!)

Since I am not very much versed in (Lisp) compilation (more for C), I can
only provide you with my results for a comparison. Here is the time on
an Intel 486DX4/100 machine with 32mb RAM (my home machine with no load)
running GCL 2.1:

        GCL (GNU Common Lisp)  Version(2.1) Sun Aug 13 18:51:58 CDT 1995
        Licensed under GNU Public Library License
        Contains Enhancements by W. Schelter

        >(compile-file "mandel.lisp" :load t)
        Compiling mandel.lisp.
        End of Pass 1.
        End of Pass 2.
        Loading mandel.o
        start address -T 81f6400 Finished loading mandel.o
        OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
        Finished compiling mandel.lisp.
        #"mandel.o"

        >(time (make-mandel 500 500))
        real time : 176.310 secs
        run time  : 175.600 secs
        250000

> I have a haunting intuition that GCL isn't inlining the code.  I can't
> seem to get GCL to disassemble on a compiled function so I can't
> check.

Again, I am no (Lisp) compiler writer (for example I am not sure I fully
understand what inlining means in this case), but from what I know, CMU CL
has native code generation, while (I am sure of this) GCL compiles to C
and uses GCC afterwards. This could explain part of the difference. What
amazes me, is the difference between a SPARC and a poor-man's PC (was it
under a normal network load? that could explain).

> thanks for any tips,
> -- garth
>

All the best,

Daniel.

        [ ..... ]

From owner-gcl@cli.com  Tue Feb 20 09:52:32 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18022; Tue, 20 Feb 96 09:52:32 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA15318; Tue, 20 Feb 96 09:49:58 CST
Received: from scrooge.ee.swin.oz.au by cli.com (4.1/SMI-4.1)
	id AA15312; Tue, 20 Feb 96 09:49:53 CST
Received: (from dtc@localhost) by scrooge.ee.swin.oz.au (8.6.9/8.6.9) id CAA01522; Wed, 21 Feb 1996 02:50:08 +1100
From: Douglas Thomas Crosher  <dtc@scrooge.ee.swin.oz.au>
Message-Id: <199602201550.CAA01522@scrooge.ee.swin.oz.au>
Subject: Re: gcl's optimizing abilities?
To: gzenie@hampshire.edu
Date: Wed, 21 Feb 1996 02:50:08 +1100 (EST)
Cc: gcl@cli.com
In-Reply-To: <199602200822.DAA29672@espresso.hampshire.edu> from "garth zenie" at Feb 20, 96 03:22:03 am
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Content-Length: 1408      
Sender: owner-gcl@cli.com
Precedence: bulk


> now, I have a question regarding GCL's optimization abilities.   I ran
> a little test which I always run on new lisps that I am trying out to
> compare the abilities of the compilers.  
> 

> the results: CMU Common LISP 17f * 3.38 seconds
>              GCL 2.2 * 381.13 seconds (!!!!)

> I have a haunting intuition that GCL isn't inlining the code.  I can't
> seem to get GCL to disassemble on a compiled function so I can't
> check.  

	The problem in this case is with the following piece of code:

>            (setq zimag (+ (* 2.0 zreal zimag) cimag))

Changing this to (* 2.0f0 (* zreal zimag)) will give a significant
improvement.

These problems can be found using the warn-slow code in the gcl
distribution.

It also shows that the dotimes loop comparisons are slow; try using:

;;; GCL has trouble with the type of temporary variables and uses
;;; a generic comparison by default.
#+gcl 
(defmacro dotimes ((v n &optional (val nil)) . body)
  (let ((temp (gensym)))
   `(do* ((,temp ,n) (,v 0 (1+ ,v)))
	 ((>= ,v ,temp) ,val)
	 (declare (fixnum ,temp ,v))
	 ,@body)))

CMU CL has a type inference ability and seems to pick up cases such as
the above.

The results:

	On a P90 16M : 	GCL 3.58sec
			CMUCL 2sec user time

Note: gcl considers the single floats as 'C' double floats, so you
achieve more accuracy, but do more work - it's not the fairest of
comparisons.

Regards
Douglas Crosher

From owner-gcl@cli.com  Tue Feb 20 13:00:55 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18062; Tue, 20 Feb 96 13:00:55 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA15978; Tue, 20 Feb 96 12:58:27 CST
Received: from espresso.hampshire.edu by cli.com (4.1/SMI-4.1)
	id AA15972; Tue, 20 Feb 96 12:58:23 CST
Received: from espresso.hampshire.edu (gzenie@localhost [127.0.0.1]) by espresso.hampshire.edu (8.7.3/8.6.9) with ESMTP id NAA32486; Tue, 20 Feb 1996 13:58:46 -0500
Message-Id: <199602201858.NAA32486@espresso.hampshire.edu>
To: gcl@cli.com
Cc: gzenie@hampshire.edu
Subject: Re: gcl's optimizing abilities? 
In-Reply-To: Message from Douglas Thomas Crosher <dtc@scrooge.ee.swin.oz.au> 
 of "Wed, 21 Feb 1996 02:50:08 +1100." <199602201550.CAA01522@scrooge.ee.swin.oz.au> 
Reply-To: gzenie@hampshire.edu
X-Mailer: MH 6.8.3
Date: Tue, 20 Feb 1996 13:58:45 -0500
From: garth zenie <gzenie@espresso.hampshire.edu>
Sender: owner-gcl@cli.com
Precedence: bulk

On Wed, 21 Feb 1996 02:50:08 +1100 (EST)  Douglas Thomas Crosher wrote:

> >            (setq zimag (+ (* 2.0 zreal zimag) cimag))
> 
> Changing this to (* 2.0f0 (* zreal zimag)) will give a significant
> improvement.

you are quite right.  the most amazing part (to me) is that:

(* 2.0f0 zreal zimag)

...provides no optimization.  time to go back to the info pages and
cltl2.  by the way, "warn-slow" is definetly a valuable piece of lisp
code.

> 	On a P90 16M : 	GCL 3.58sec
> 			CMUCL 2sec user time

here are my new results:

GCL run time  : 11.500 secs
CMU run time  : 3.38 secs

GCL on my P166 (linux/32mb) : 2.170 secs

thats a lot better.  I will try adding more defines.  is there a way
to force GCL to use single floats?

how is it that you have CMUCL running on a P90?  is there a PC UNIX
port available?  I would like to benchmark on my PC instead of having
to use the sparc (I am not fond of sunos).

thanks,
-- garth

From owner-gcl@cli.com  Tue Feb 20 17:56:58 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18124; Tue, 20 Feb 96 17:56:58 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA16992; Tue, 20 Feb 96 17:54:25 CST
Received: from hawaii.cli.com by cli.com (4.1/SMI-4.1)
	id AA16986; Tue, 20 Feb 96 17:54:23 CST
From: sandel@cli.com (Charles Sandel)
Received: by hawaii.cli.com (4.1) id AA03842; Tue, 20 Feb 96 17:54:23 CST
Date: Tue, 20 Feb 96 17:54:23 CST
Message-Id: <9602202354.AA03842@hawaii.cli.com>
To: gcl@cli.com
Subject: BOUNCE gcl: Non-member submission from [wfs@math.utexas.edu]
Sender: owner-gcl@cli.com
Precedence: bulk



----- Begin Included Message -----

From owner-gcl Tue Feb 20 14:25:58 1996
Date: Tue, 20 Feb 96 14:25:58 CST
From: owner-gcl
To: owner-gcl
Subject: BOUNCE gcl: Non-member submission from [wfs@math.utexas.edu]
Content-Length: 4001

>From wfs@math.utexas.edu (wfs@math.utexas.edu)  Tue Feb 20 14:25:43 1996
Return-Path: <wfs@math.utexas.edu>
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA16460; Tue, 20 Feb 96 14:25:43 CST
Date: Tue, 20 Feb 96 14:25:20 CST
From: wfs@math.utexas.edu
Posted-Date: Tue, 20 Feb 96 14:25:20 CST
Message-Id: <9602202025.AA00682@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA00682; Tue, 20 Feb 96 14:25:20 CST
To: gcl@cli.com
Cc: gzenie@hampshire.edu
In-Reply-To: <199602200822.DAA29672@espresso.hampshire.edu> (message from garth zenie on Tue, 20 Feb 1996 03:22:03 -0500)
Subject: Re: gcl's optimizing abilities?
Reply-To: wfs@math.utexas.edu


I agree the compiler can be improved for dealing with floating point.
for instance
(+ a b c) is not handled well (+ (+ a b) c)
is ..!

Also there could be an optimizer for 'abs' when dealing with floating
point type... where you can deduce that the abs will still be of the
same type.   Also a type declaration for the mandel-iterate is helpful.

Making the changes above, and adding a macro for abs (called float-abs)
resulted in

(time (make-mandel 500 500))
real time : 1.783 secs
run time  : 1.783 secs

on a sun sparc20 (100mhz ross).


Inserting file /tmp/foo.lisp
---Begin File /tmp/foo.lisp---

(declaim (optimize (speed 3) (safety 0) (space 0)))
(declaim (inline mandel-iterate))
(eval-when (compile eval)
   (proclaim '(function mandel-iterate (single-float single-float fixnum fixnum) fixnum)))

(defmacro float-abs (a)
      `(the single-float (let ((.a ,a))
          (declare (single-float .a))
          (cond ((< .a 0.0)
                 (the single-float (- .a)))
                (t .a)))))

(defun mandel-iterate (real imag maxiter p)
  "iterate on the given point with periodicity checking"
  (declare (single-float real imag)
           (fixnum maxiter p))
  (let ((set 0) (dec 0) (cnt 0)
        (treal 0.0) (timag 0.0)
        (t1 0.0) (t2 0.0)
        (zreal real) (zimag imag)
        (creal real) (cimag imag))

    (declare (fixnum set dec cnt)
             (single-float treal timag)
             (single-float zreal zimag creal cimag)
             (single-float t1 t2))
            
    (when (< p 0)
      (setq treal 0.0)
      (setq timag 0.0)
      (setq set 2)
      (setq dec 2)
      (setq cnt -2))

         (sloop::sloop for n below maxiter finally (return -1)
            do
           (when (> (+ (setq t1 ( * zreal zreal))
                       (setq t2 ( * zimag zimag)))
                    4)
             (return n))
           (setq zimag (+ (* (* 2.0 zreal) zimag) cimag))
           (setq zreal ( + ( - t1 t2) creal))
           (when (< p 0)
             (when (and (= zreal treal) (= zimag timag))
               (return cnt))
             (when (not (= (decf cnt) 1))
               (setq dec (setq set (* set 2)))
               (decf cnt)
               (setq treal zreal)
               (setq timag zimag))))))

(defun make-mandel (width height &optional (maxiter 128) (x1 -2.50) 
                   (y1 1.50) (x2 1.50) (y2 -1.50))
  "make a mandelbrot set"
  (declare (fixnum width height maxiter)
           (single-float x1 y1 x2 y2))
  (let ((xs 0.0) (ys 0.0) (value 0) 
        (zimag 0.0) (zreal 0.0) 
        x1-bigger y1-bigger (count 0))
    
    (declare (fixnum value count)
             (single-float xs ys zimag zreal))

    (setq xs (/ (float-abs (- x1 x2)) width))
    (setq ys (/ (float-abs  (- y1 y2)) height))
    (setq zimag y1)
    (setq zreal x1)
    (setq x1-bigger (> x1 x2))
    (setq y1-bigger (> y1 y2))
    (setq value 0)

    (dotimes (y height)
      (declare (fixnum y))
      (dotimes (x width)
        (declare (fixnum x))

        (setq value (mandel-iterate zreal zimag maxiter value))
        (incf count)

        (if x1-bigger
            (decf zreal xs)
          (incf zreal xs)))
      (setq zreal x1)
      (if y1-bigger
          (decf zimag ys)
        (incf zimag ys)))

    count))
---End File /tmp/foo.lisp---








----- End Included Message -----


From owner-gcl@cli.com  Tue Feb 20 19:35:46 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18134; Tue, 20 Feb 96 19:35:46 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA17277; Tue, 20 Feb 96 19:33:48 CST
Received: from katura.ylab.tutics.tut.ac.jp by cli.com (4.1/SMI-4.1)
	id AA17271; Tue, 20 Feb 96 19:33:44 CST
Received: (from yuasa@localhost) by katura.ylab.tutics.tut.ac.jp (8.6.12+2.4W/3.4W2) id KAA13491 for gcl@cli.com; Wed, 21 Feb 1996 10:26:38 +0900
Date: Wed, 21 Feb 1996 10:26:38 +0900
From: Taiichi Yuasa <yuasa@ylab.tutics.tut.ac.jp>
Message-Id: <199602210126.KAA13491@katura.ylab.tutics.tut.ac.jp>
To: gcl@cli.com
Subject: RE: Re: gcl's optimizing abilities?
Sender: owner-gcl@cli.com
Precedence: bulk

>> It also shows that the dotimes loop comparisons are slow; try using:
>> ;;; GCL has trouble with the type of temporary variables and uses
>> ;;; a generic comparison by default.
>> #+gcl 
>> (defmacro dotimes ((v n &optional (val nil)) . body)
>>   (let ((temp (gensym)))
>>    `(do* ((,temp ,n) (,v 0 (1+ ,v)))
>> 	 ((>= ,v ,temp) ,val)
>> 	 (declare (fixnum ,temp ,v))
>> 	 ,@body)))

The original KCL has macros like above, such as dotimes*, dotimes**, dolist*,
dolist**, all defined in file cmpnew/cmputil.lsp (though I am not sure this
file is included in the GCL distribution kit as well).  These macros are
heavily used by the KCL compiler, and you can find how to used them by looking
at the compiler sources.

>> CMU CL has a type inference ability and seems to pick up cases such as
>> the above.

It's hard to infer that the control variable like v above always holds fixnums,
but never bignums.  That's why we defined additional macros with type
declarations.

-- Taiichi

From owner-gcl@cli.com  Wed Feb 21 02:00:44 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA18339; Wed, 21 Feb 96 02:00:44 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA27315; Wed, 21 Feb 96 01:59:08 CST
Received: from ki1.chemie.fu-berlin.de by cli.com (4.1/SMI-4.1)
	id AA27296; Wed, 21 Feb 96 01:59:02 CST
Received: by ki1.chemie.fu-berlin.de (Smail3.1.28.1)
	  from mail.hanse.de (193.174.9.9) with smtp
	  id <m0tp9Rh-0000cNC>; Wed, 21 Feb 96 08:58 MET
Received: from wavehh.UUCP by mail.hanse.de with UUCP
	  for gcl@cli.com id <m0tp9Rf-0004f7C@mail.hanse.de>; Wed, 21 Feb 96 08:58 MET
Received: by wavehh.hanse.de (4.1/SMI-4.1)
	id AA24200; Wed, 21 Feb 96 08:49:59 +0100
Date: Wed, 21 Feb 96 08:49:59 +0100
Message-Id: <9602210749.AA24200@wavehh.hanse.de>
From: Martin Cracauer <cracauer@wavehh.hanse.de>
To: gzenie@hampshire.edu
Cc: gcl@cli.com, sent@wavehh.hanse.de
Subject: Re: gcl's optimizing abilities? 
In-Reply-To: <199602201858.NAA32486@espresso.hampshire.edu>
References: <dtc@scrooge.ee.swin.oz.au>
	<199602201550.CAA01522@scrooge.ee.swin.oz.au>
	<199602201858.NAA32486@espresso.hampshire.edu>
Sender: owner-gcl@cli.com
Precedence: bulk

garth zenie writes:
 > how is it that you have CMUCL running on a P90?  is there a PC UNIX
 > port available?  I would like to benchmark on my PC instead of having
 > to use the sparc (I am not fond of sunos).

I just posted this to comp.lang.lisp. Hope it is useful. 

This thread, BTW, makes me wonder if GCL is capable of better code than
I previously expected...

Happy Hacking 
	Martin

> Newsgroups: comp.lang.lisp
> Path: wavehh.hanse.de!cracauer
> From: cracauer@wavehh.hanse.de (Martin Cracauer)
> Subject: Re: CMU Lisp on Linux
> Message-ID: <1996Feb19.081738.29931@wavehh.hanse.de>
> Keywords: CMU Linux compiling port
> Organization: BSD User Group Hamburg
> References: <4g2lc6$68h@park.interport.net>
> Date: Mon, 19 Feb 96 08:17:38 GMT
> Lines: 35
> 
> danj@port.net (Dan Janowski) writes:
> 
> >Is there a port or Config and linux_os.[ch] files to
> >get CMU Lisp to compile for Linux?
> 
> Yes, but...
> 
> they're not of much use. CMU CL is a complete system with it's own
> compiler (to native machine code) and it's own loader. Recompiling the
> startup code (that is what you can do with the above files) is the
> least of the problems.
> 
> There is a mailinglist seamew-l@dircon.co.uk that was opened for a
> Linux/Intel port but is quite inactive in the moment.
> 
> pw@mv.mv.com (Paul Werkowski) did a port to FreeBSD based on some
> material collected by the above which is in Beta. See
>  http://www.mv.com/users/pw/lisp/index.html
> for details. Last I looked (before Beta), it ran, but had GC problems
> and couldn't execute long programs. The performance numbers I got from
> my Pentium 90 scale to those of my workstations as the larger tests of
> SPECint (gcc, compress) do.
> 
> This FreeBSD binary runs on NetBSD/i386 without changes. It should be
> doable to compile the system for Linux (but not *on* Linux, you have
> to crosscompile from a working system). One problem is to get the idea
> how to recompile the CMUCL system in general. I'm preparing a document
> for that.
> 
> Martin
> -- 
> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
> Martin Cracauer <cracauer@wavehh.hanse.de>  -  Fax +49 40 522 85 36
>  BSD User Group Hamburg, Germany   -   No NeXTMail anymore, please.
>  Copyright 1995. Redistribution via Microsoft Network is prohibited

From owner-gcl@cli.com  Mon Feb 26 12:57:30 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA20564; Mon, 26 Feb 96 12:57:30 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07994; Mon, 26 Feb 96 12:51:23 CST
Received: from ee.technion.ac.il by cli.com (4.1/SMI-4.1)
	id AA07988; Mon, 26 Feb 96 12:51:12 CST
Received: (from qobi@localhost) by ee.technion.ac.il (8.6.12/8.6.6) id UAA10366; Mon, 26 Feb 1996 20:51:38 +0200
Date: Mon, 26 Feb 1996 20:51:38 +0200
From: Jeffrey Mark Siskind <qobi@ee.technion.ac.il>
Message-Id: <199602261851.UAA10366@ee.technion.ac.il>
To: gcl@cli.com
Subject: problems making GCL 2.2 on Solaris/SPARC 2.5
Reply-To: Qobi@EE.Technion.AC.IL
Sender: owner-gcl@cli.com
Precedence: bulk

I get the following error when trying to make GCL 2.2 on Solaris/SPARC 2.5:

   qobi@eesun>make
   (cd bin; make all)
   (cd mp ; make all)
   make all1 "MPFILES=./mpi-sol-sparc.o ./sparcdivul3.o ./libmport.a"
   rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
   (cd o; make all)
   gcc -I/dumps/qobi/lisps/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 gbc.c  
   sgbc.c: In function `sgc_quit':
   In file included from gbc.c:1321:
   sgbc.c:1072: warning: assignment makes pointer from integer without a cast
   sgbc.c:1074: warning: assignment makes integer from pointer without a cast
   sgbc.c: In function `memprotect_handler':
   sgbc.c:1124: void value not ignored as it ought to be
   *** Error code 1
   make: Fatal error: Command failed for target `gbc.o'
   Current working directory /dumps/qobi/lisps/gcl-2.2/o
   *** Error code 1
   make: Fatal error: Command failed for target `all'
   16.0u 1.0s 0:20 81% 0+0k 0+0io 0pf+0w

Any ideas as to how to fix this would be much approciated.
    Thanks,
    Jeff (home page http://www.cs.toronto.edu/~qobi)

From owner-gcl@cli.com  Mon Feb 26 14:18:55 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA20574; Mon, 26 Feb 96 14:18:55 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08242; Mon, 26 Feb 96 14:15:35 CST
Received: from ee.technion.ac.il by cli.com (4.1/SMI-4.1)
	id AA08231; Mon, 26 Feb 96 14:14:45 CST
Received: (from qobi@localhost) by ee.technion.ac.il (8.6.12/8.6.6) id WAA13292; Mon, 26 Feb 1996 22:15:09 +0200
Date: Mon, 26 Feb 1996 22:15:09 +0200
From: Jeffrey Mark Siskind <qobi@ee.technion.ac.il>
Message-Id: <199602262015.WAA13292@ee.technion.ac.il>
To: gcl@cli.com
Subject: problems compiling GCL 2.1 on Solaris/SPARC 2.5
Reply-To: Qobi@EE.Technion.AC.IL
Sender: owner-gcl@cli.com
Precedence: bulk

I have run into problems trying to compile GCL 2.1 on Solaris/SPARC 2.5.
Any help will be appreciated.
    Thanks,
    Jeff (home page http://www.cs.toronto.edu/~qobi)
-------------------------------------------------------------------------------
qobi@eesun>gunzip gcl-2.1.tgz 
qobi@eesun>ls
akcl         gcl-2.1.tar  gcl-2.2
qobi@eesun>tar xvf gcl-2.1.tar 
x ./gcl-2.1/README, 11564 bytes, 23 tape blocks
x ./gcl-2.1/add-defs, 2749 bytes, 6 tape blocks
x ./gcl-2.1/cmpnew/make-fn.lsp, 103 bytes, 1 tape blocks
x ./gcl-2.1/cmpnew/cmpbind.data, 1129 bytes, 3 tape blocks
x ./gcl-2.1/cmpnew/makefile, 3273 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmpbind.c, 9367 bytes, 19 tape blocks
x ./gcl-2.1/cmpnew/cmpbind.lsp, 4405 bytes, 9 tape blocks
x ./gcl-2.1/cmpnew/cmpbind.h, 1859 bytes, 4 tape blocks
x ./gcl-2.1/cmpnew/cmpblock.lsp, 6128 bytes, 12 tape blocks
x ./gcl-2.1/cmpnew/cmpblock.c, 12517 bytes, 25 tape blocks
x ./gcl-2.1/cmpnew/cmpcall.lsp, 20725 bytes, 41 tape blocks
x ./gcl-2.1/cmpnew/cmpblock.data, 2985 bytes, 6 tape blocks
x ./gcl-2.1/cmpnew/cmpblock.h, 3721 bytes, 8 tape blocks
x ./gcl-2.1/cmpnew/cmpcatch.lsp, 4112 bytes, 9 tape blocks
x ./gcl-2.1/cmpnew/cmpcall.data, 5463 bytes, 11 tape blocks
x ./gcl-2.1/cmpnew/cmpif.c, 31661 bytes, 62 tape blocks
x ./gcl-2.1/cmpnew/cmpenv.lsp, 25531 bytes, 50 tape blocks
x ./gcl-2.1/cmpnew/cmpinit.lsp, 406 bytes, 1 tape blocks
x ./gcl-2.1/cmpnew/cmpeval.lsp, 24082 bytes, 48 tape blocks
x ./gcl-2.1/cmpnew/cmpcall.c, 41627 bytes, 82 tape blocks
x ./gcl-2.1/cmpnew/cmpcall.h, 7707 bytes, 16 tape blocks
x ./gcl-2.1/cmpnew/cmpflet.lsp, 11509 bytes, 23 tape blocks
x ./gcl-2.1/cmpnew/cmpfun.lsp, 31329 bytes, 62 tape blocks
x ./gcl-2.1/cmpnew/cmpcatch.data, 1962 bytes, 4 tape blocks
x ./gcl-2.1/cmpnew/cmpif.lsp, 15305 bytes, 30 tape blocks
x ./gcl-2.1/cmpnew/cmpmain.lsp, 22910 bytes, 45 tape blocks
x ./gcl-2.1/cmpnew/cmpinline.lsp, 22559 bytes, 45 tape blocks
x ./gcl-2.1/cmpnew/cmpcatch.c, 7082 bytes, 14 tape blocks
x ./gcl-2.1/cmpnew/cmpcatch.h, 2267 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmplabel.lsp, 7779 bytes, 16 tape blocks
x ./gcl-2.1/cmpnew/cmpenv.data, 9419 bytes, 19 tape blocks
x ./gcl-2.1/cmpnew/cmpenv.c, 46130 bytes, 91 tape blocks
x ./gcl-2.1/cmpnew/cmplam.lsp, 33897 bytes, 67 tape blocks
x ./gcl-2.1/cmpnew/cmpenv.h, 5598 bytes, 11 tape blocks
x ./gcl-2.1/cmpnew/cmplet.lsp, 12974 bytes, 26 tape blocks
x ./gcl-2.1/cmpnew/cmpeval.c, 47264 bytes, 93 tape blocks
x ./gcl-2.1/cmpnew/cmploc.lsp, 10205 bytes, 20 tape blocks
x ./gcl-2.1/cmpnew/cmpeval.data, 8679 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/cmpeval.h, 10238 bytes, 20 tape blocks
x ./gcl-2.1/cmpnew/cmpopt.lsp, 36235 bytes, 71 tape blocks
x ./gcl-2.1/cmpnew/cmpmulti.lsp, 9237 bytes, 19 tape blocks
x ./gcl-2.1/cmpnew/cmpflet.data, 3439 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmpspecial.lsp, 5782 bytes, 12 tape blocks
x ./gcl-2.1/cmpnew/cmptag.lsp, 14015 bytes, 28 tape blocks
x ./gcl-2.1/cmpnew/cmpflet.c, 24121 bytes, 48 tape blocks
x ./gcl-2.1/cmpnew/cmpflet.h, 4135 bytes, 9 tape blocks
x ./gcl-2.1/cmpnew/cmptop.lsp, 55811 bytes, 110 tape blocks
x ./gcl-2.1/cmpnew/cmptype.lsp, 8515 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/cmpfun.data, 15817 bytes, 31 tape blocks
x ./gcl-2.1/cmpnew/cmpfun.c, 70050 bytes, 137 tape blocks
x ./gcl-2.1/cmpnew/cmputil.lsp, 8242 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/cmpfun.h, 15885 bytes, 32 tape blocks
x ./gcl-2.1/cmpnew/cmpvar.lsp, 17513 bytes, 35 tape blocks
x ./gcl-2.1/cmpnew/cmpvs.lsp, 2608 bytes, 6 tape blocks
x ./gcl-2.1/cmpnew/cmpif.data, 3549 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmpif.h, 5015 bytes, 10 tape blocks
x ./gcl-2.1/cmpnew/cmpwt.lsp, 7124 bytes, 14 tape blocks
x ./gcl-2.1/cmpnew/lfun_list.lsp, 23357 bytes, 46 tape blocks
x ./gcl-2.1/cmpnew/cmpinline.data, 6945 bytes, 14 tape blocks
x ./gcl-2.1/cmpnew/nocmpinc.lsp, 455 bytes, 1 tape blocks
x ./gcl-2.1/cmpnew/cmpinline.c, 41552 bytes, 82 tape blocks
x ./gcl-2.1/cmpnew/collectfn.lsp, 12223 bytes, 24 tape blocks
x ./gcl-2.1/cmpnew/cmpinline.h, 7986 bytes, 16 tape blocks
x ./gcl-2.1/cmpnew/fasdmacros.lsp, 1964 bytes, 4 tape blocks
x ./gcl-2.1/cmpnew/sys-proclaim.lisp, 8676 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/cmpmap.lsp, 9730 bytes, 20 tape blocks
x ./gcl-2.1/cmpnew/cmptest.lsp, 8260 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/init.lsp, 145 bytes, 1 tape blocks
x ./gcl-2.1/cmpnew/make_ufun.lsp, 3255 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmplabel.data, 2991 bytes, 6 tape blocks
x ./gcl-2.1/cmpnew/cmplabel.c, 12717 bytes, 25 tape blocks
x ./gcl-2.1/cmpnew/cmplabel.h, 1966 bytes, 4 tape blocks
x ./gcl-2.1/cmpnew/cmplam.data, 5018 bytes, 10 tape blocks
x ./gcl-2.1/cmpnew/cmplam.c, 64967 bytes, 127 tape blocks
x ./gcl-2.1/cmpnew/cmplam.h, 7750 bytes, 16 tape blocks
x ./gcl-2.1/cmpnew/cmplet.data, 3407 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmplet.c, 25677 bytes, 51 tape blocks
x ./gcl-2.1/cmpnew/cmplet.h, 4514 bytes, 9 tape blocks
x ./gcl-2.1/cmpnew/cmploc.data, 4700 bytes, 10 tape blocks
x ./gcl-2.1/cmpnew/cmploc.c, 19238 bytes, 38 tape blocks
x ./gcl-2.1/cmpnew/cmploc.h, 3707 bytes, 8 tape blocks
x ./gcl-2.1/cmpnew/cmpmap.data, 2352 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmpmap.c, 21249 bytes, 42 tape blocks
x ./gcl-2.1/cmpnew/so_locations, 93 bytes, 1 tape blocks
x ./gcl-2.1/cmpnew/cmpmap.h, 2932 bytes, 6 tape blocks
x ./gcl-2.1/cmpnew/cmpmulti.data, 3921 bytes, 8 tape blocks
x ./gcl-2.1/cmpnew/cmpmulti.c, 19657 bytes, 39 tape blocks
x ./gcl-2.1/cmpnew/cmpmulti.h, 4719 bytes, 10 tape blocks
x ./gcl-2.1/cmpnew/cmpspecial.data, 3220 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmpspecial.c, 11653 bytes, 23 tape blocks
x ./gcl-2.1/cmpnew/cmpspecial.h, 3254 bytes, 7 tape blocks
x ./gcl-2.1/cmpnew/cmptag.data, 4692 bytes, 10 tape blocks
x ./gcl-2.1/cmpnew/cmptag.c, 28612 bytes, 56 tape blocks
x ./gcl-2.1/cmpnew/cmptag.h, 6745 bytes, 14 tape blocks
x ./gcl-2.1/cmpnew/cmptop.data, 19146 bytes, 38 tape blocks
x ./gcl-2.1/cmpnew/cmptop.c, 111726 bytes, 219 tape blocks
x ./gcl-2.1/cmpnew/cmptop.h, 16717 bytes, 33 tape blocks
x ./gcl-2.1/cmpnew/cmptype.data, 2249 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmptype.c, 14389 bytes, 29 tape blocks
x ./gcl-2.1/cmpnew/cmptype.h, 2216 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmputil.data, 5235 bytes, 11 tape blocks
x ./gcl-2.1/cmpnew/cmputil.c, 16486 bytes, 33 tape blocks
x ./gcl-2.1/cmpnew/cmputil.h, 4140 bytes, 9 tape blocks
x ./gcl-2.1/cmpnew/cmpvar.data, 6324 bytes, 13 tape blocks
x ./gcl-2.1/cmpnew/cmpvar.c, 36934 bytes, 73 tape blocks
x ./gcl-2.1/cmpnew/cmpvar.h, 8366 bytes, 17 tape blocks
x ./gcl-2.1/cmpnew/cmpvs.data, 2094 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmpvs.c, 3865 bytes, 8 tape blocks
x ./gcl-2.1/cmpnew/cmpvs.h, 1489 bytes, 3 tape blocks
x ./gcl-2.1/cmpnew/cmpwt.data, 2343 bytes, 5 tape blocks
x ./gcl-2.1/cmpnew/cmpwt.c, 15327 bytes, 30 tape blocks
x ./gcl-2.1/cmpnew/cmpwt.h, 3484 bytes, 7 tape blocks
x ./gcl-2.1/doc/c-gc, 1365 bytes, 3 tape blocks
x ./gcl-2.1/doc/c-gc.doc, 1140 bytes, 3 tape blocks
x ./gcl-2.1/doc/contributors, 1255 bytes, 3 tape blocks
x ./gcl-2.1/doc/debug, 970 bytes, 2 tape blocks
x ./gcl-2.1/doc/enhancements, 6371 bytes, 13 tape blocks
x ./gcl-2.1/doc/fast-link, 5286 bytes, 11 tape blocks
x ./gcl-2.1/doc/format, 1413 bytes, 3 tape blocks
x ./gcl-2.1/doc/funcall-comp, 956 bytes, 2 tape blocks
x ./gcl-2.1/doc/funcall.lsp, 3368 bytes, 7 tape blocks
x ./gcl-2.1/doc/makefile, 1795 bytes, 4 tape blocks
x ./gcl-2.1/doc/multiple-values, 2667 bytes, 6 tape blocks
x ./gcl-2.1/doc/profile, 1320 bytes, 3 tape blocks
x ./gcl-2.1/doc/compile-file-handling-of-top-level-forms, 10137 bytes, 20 tape blocks
x ./gcl-2.1/doc/bignum, 2486 bytes, 5 tape blocks
x ./gcl-2.1/h/att.h, 2769 bytes, 6 tape blocks
x ./gcl-2.1/h/att3b2.h, 531 bytes, 2 tape blocks
x ./gcl-2.1/h/bsd.h, 2470 bytes, 5 tape blocks
x ./gcl-2.1/h/convex.h, 572 bytes, 2 tape blocks
x ./gcl-2.1/h/e15.h, 1650 bytes, 4 tape blocks
x ./gcl-2.1/h/ext_sym.h, 3544 bytes, 7 tape blocks
x ./gcl-2.1/h/hp300-bsd.defs, 801 bytes, 2 tape blocks
x ./gcl-2.1/h/hp300-bsd.h, 1488 bytes, 3 tape blocks
x ./gcl-2.1/h/hp300.defs, 1461 bytes, 3 tape blocks
x ./gcl-2.1/h/hp300.h, 3263 bytes, 7 tape blocks
x ./gcl-2.1/h/mdefs.h, 1018 bytes, 2 tape blocks
x ./gcl-2.1/h/mp386.defs, 607 bytes, 2 tape blocks
x ./gcl-2.1/h/mp386.h, 559 bytes, 2 tape blocks
x ./gcl-2.1/h/news.h, 385 bytes, 1 tape blocks
x ./gcl-2.1/h/options.h, 454 bytes, 1 tape blocks
x ./gcl-2.1/h/page.h, 3072 bytes, 6 tape blocks
x ./gcl-2.1/h/s3000.h, 1824 bytes, 4 tape blocks
x ./gcl-2.1/h/sfun_argd.h, 288 bytes, 1 tape blocks
x ./gcl-2.1/h/sgi.defs, 619 bytes, 2 tape blocks
x ./gcl-2.1/h/sgi.h, 648 bytes, 2 tape blocks
x ./gcl-2.1/h/sig.defs, 469 bytes, 1 tape blocks
x ./gcl-2.1/h/sparc.h, 3069 bytes, 6 tape blocks
x ./gcl-2.1/h/sun.h, 557 bytes, 2 tape blocks
x ./gcl-2.1/h/sun2r3.defs, 535 bytes, 2 tape blocks
x ./gcl-2.1/h/sun2r3.h, 261 bytes, 1 tape blocks
x ./gcl-2.1/h/sun3.h, 338 bytes, 1 tape blocks
x ./gcl-2.1/h/sun4.h, 2645 bytes, 6 tape blocks
x ./gcl-2.1/h/sun3.defs, 835 bytes, 2 tape blocks
x ./gcl-2.1/h/sun386i.defs, 1252 bytes, 3 tape blocks
x ./gcl-2.1/h/sun386i.h, 3572 bytes, 7 tape blocks
x ./gcl-2.1/h/sun4.defs, 1232 bytes, 3 tape blocks
x ./gcl-2.1/h/twelve_null, 12 bytes, 1 tape blocks
x ./gcl-2.1/h/vax.defs, 906 bytes, 2 tape blocks
x ./gcl-2.1/h/vax.h, 626 bytes, 2 tape blocks
x ./gcl-2.1/h/att_ext.h, 13486 bytes, 27 tape blocks
x ./gcl-2.1/h/bds.h, 1756 bytes, 4 tape blocks
x ./gcl-2.1/h/eval.h, 3444 bytes, 7 tape blocks
x ./gcl-2.1/h/frame.h, 3451 bytes, 7 tape blocks
x ./gcl-2.1/h/include.h, 1464 bytes, 3 tape blocks
x ./gcl-2.1/h/num_include.h, 1358 bytes, 3 tape blocks
x ./gcl-2.1/h/object.h, 24060 bytes, 47 tape blocks
x ./gcl-2.1/h/symbol.h, 902 bytes, 2 tape blocks
x ./gcl-2.1/h/vs.h, 1743 bytes, 4 tape blocks
x ./gcl-2.1/h/rt_aix.defs, 975 bytes, 2 tape blocks
x ./gcl-2.1/h/rt_aix.h, 4530 bytes, 9 tape blocks
x ./gcl-2.1/h/sgi4d.defs, 1571 bytes, 4 tape blocks
x ./gcl-2.1/h/sgi4d.h, 1202 bytes, 3 tape blocks
x ./gcl-2.1/h/sun3-os4.h, 700 bytes, 2 tape blocks
x ./gcl-2.1/h/mp.h, 1509 bytes, 3 tape blocks
x ./gcl-2.1/h/sun3-os4.defs, 1534 bytes, 3 tape blocks
x ./gcl-2.1/h/rios.defs, 1156 bytes, 3 tape blocks
x ./gcl-2.1/h/coff_encap.h, 1376 bytes, 3 tape blocks
x ./gcl-2.1/h/dec3100.defs, 1599 bytes, 4 tape blocks
x ./gcl-2.1/h/secondary_sun_magic, 8 bytes, 1 tape blocks
x ./gcl-2.1/h/dec3100.h, 1581 bytes, 4 tape blocks
x ./gcl-2.1/h/rios.h, 5674 bytes, 12 tape blocks
x ./gcl-2.1/h/u370_aix.h, 4949 bytes, 10 tape blocks
x ./gcl-2.1/h/u370_aix.defs, 1196 bytes, 3 tape blocks
x ./gcl-2.1/h/symmetry.h, 1482 bytes, 3 tape blocks
x ./gcl-2.1/h/symmetry.defs, 1022 bytes, 2 tape blocks
x ./gcl-2.1/h/gencom.h, 18210 bytes, 36 tape blocks
x ./gcl-2.1/h/genport.h, 5857 bytes, 12 tape blocks
x ./gcl-2.1/h/erreurs.h, 4181 bytes, 9 tape blocks
x ./gcl-2.1/h/genpari.h, 909 bytes, 2 tape blocks
x ./gcl-2.1/h/386.h, 2149 bytes, 5 tape blocks
x ./gcl-2.1/h/ncr.h, 983 bytes, 2 tape blocks
x ./gcl-2.1/h/mc68k.h, 2095 bytes, 5 tape blocks
x ./gcl-2.1/h/hp800.h, 3182 bytes, 7 tape blocks
x ./gcl-2.1/h/mips.h, 803 bytes, 2 tape blocks
x ./gcl-2.1/h/hp800.defs, 1856 bytes, 4 tape blocks
x ./gcl-2.1/h/ncr.defs, 724 bytes, 2 tape blocks
x ./gcl-2.1/h/mac2.h, 4631 bytes, 10 tape blocks
x ./gcl-2.1/h/solaris.defs, 1531 bytes, 3 tape blocks
x ./gcl-2.1/h/mac2.defs, 978 bytes, 2 tape blocks
x ./gcl-2.1/h/NeXT.h, 1092 bytes, 3 tape blocks
x ./gcl-2.1/h/NeXT.defs, 651 bytes, 2 tape blocks
x ./gcl-2.1/h/dos-go32.h, 1769 bytes, 4 tape blocks
x ./gcl-2.1/h/solaris.h, 2686 bytes, 6 tape blocks
x ./gcl-2.1/h/dos-go32.defs, 1687 bytes, 4 tape blocks
x ./gcl-2.1/h/386-bsd.h, 3420 bytes, 7 tape blocks
x ./gcl-2.1/h/386-bsd.defs, 997 bytes, 2 tape blocks
x ./gcl-2.1/h/386-linux.defs, 1114 bytes, 3 tape blocks
x ./gcl-2.1/h/lex.h, 1375 bytes, 3 tape blocks
x ./gcl-2.1/h/rgbc.h, 289 bytes, 1 tape blocks
x ./gcl-2.1/h/sgi4d.defs.rej, 403 bytes, 1 tape blocks
x ./gcl-2.1/h/NetBSD.h, 3487 bytes, 7 tape blocks
x ./gcl-2.1/h/NetBSD.defs, 1234 bytes, 3 tape blocks
x ./gcl-2.1/h/enum.h, 650 bytes, 2 tape blocks
x ./gcl-2.1/h/funlink.h, 2832 bytes, 6 tape blocks
x ./gcl-2.1/h/compbas.h, 175 bytes, 1 tape blocks
x ./gcl-2.1/h/compbas2.h, 6541 bytes, 13 tape blocks
x ./gcl-2.1/h/usig.h, 185 bytes, 1 tape blocks
x ./gcl-2.1/h/defun.h, 1021 bytes, 2 tape blocks
x ./gcl-2.1/h/make-init.h, 1578 bytes, 4 tape blocks
x ./gcl-2.1/h/notcomp.h, 4296 bytes, 9 tape blocks
x ./gcl-2.1/h/stacks.h, 531 bytes, 2 tape blocks
x ./gcl-2.1/h/compat.h, 490 bytes, 1 tape blocks
x ./gcl-2.1/h/cmponly.h, 1383 bytes, 3 tape blocks
x ./gcl-2.1/h/cmpinclude.h, 61547 bytes, 121 tape blocks
x ./gcl-2.1/h/arith.h, 6347 bytes, 13 tape blocks
x ./gcl-2.1/h/cmplrs/stsupport.h, 6851 bytes, 14 tape blocks
x ./gcl-2.1/h/cmpincl1.h, 22 bytes, 1 tape blocks
x ./gcl-2.1/h/irix5.h, 2121 bytes, 5 tape blocks
x ./gcl-2.1/h/irix5.defs, 1794 bytes, 4 tape blocks
x ./gcl-2.1/h/FreeBSD.defs, 1057 bytes, 3 tape blocks
x ./gcl-2.1/h/FreeBSD.h, 2151 bytes, 5 tape blocks
x ./gcl-2.1/h/386-linux.h, 3198 bytes, 7 tape blocks
x ./gcl-2.1/dos/dostimes.c, 293 bytes, 1 tape blocks
x ./gcl-2.1/dos/dum_dos.c, 181 bytes, 1 tape blocks
x ./gcl-2.1/dos/makefile, 1828 bytes, 4 tape blocks
x ./gcl-2.1/dos/read.s, 1040 bytes, 3 tape blocks
x ./gcl-2.1/dos/sigman.s, 1295 bytes, 3 tape blocks
x ./gcl-2.1/dos/signal.c, 3128 bytes, 7 tape blocks
x ./gcl-2.1/dos/signal.h, 4862 bytes, 10 tape blocks
x ./gcl-2.1/dos/README, 222 bytes, 1 tape blocks
x ./gcl-2.1/lsp/auto.lsp, 6996 bytes, 14 tape blocks
x ./gcl-2.1/lsp/autocmp.lsp, 1655 bytes, 4 tape blocks
x ./gcl-2.1/lsp/dbind.lisp, 322 bytes, 1 tape blocks
x ./gcl-2.1/lsp/iolib.c, 14990 bytes, 30 tape blocks
x ./gcl-2.1/lsp/dummy.lisp, 1 bytes, 1 tape blocks
x ./gcl-2.1/lsp/arraylib.c, 23657 bytes, 47 tape blocks
x ./gcl-2.1/lsp/doc-file.lsp, 825 bytes, 2 tape blocks
x ./gcl-2.1/lsp/fasd.lisp, 4576 bytes, 9 tape blocks
x ./gcl-2.1/lsp/fast-mv.lisp, 1301 bytes, 3 tape blocks
x ./gcl-2.1/lsp/fdecl.lsp, 3051 bytes, 6 tape blocks
x ./gcl-2.1/lsp/gprof.hc, 2543 bytes, 5 tape blocks
x ./gcl-2.1/lsp/top.lsp, 25236 bytes, 50 tape blocks
x ./gcl-2.1/lsp/arraylib.h, 7918 bytes, 16 tape blocks
x ./gcl-2.1/lsp/gprof1.lisp, 1281 bytes, 3 tape blocks
x ./gcl-2.1/lsp/loadcmp.lsp, 1266 bytes, 3 tape blocks
x ./gcl-2.1/lsp/make-declare.lsp, 2786 bytes, 6 tape blocks
x ./gcl-2.1/lsp/make.lisp, 14222 bytes, 28 tape blocks
x ./gcl-2.1/lsp/profile.lsp, 3716 bytes, 8 tape blocks
x ./gcl-2.1/lsp/serror.lsp, 9242 bytes, 19 tape blocks
x ./gcl-2.1/lsp/iolib.h, 2224 bytes, 5 tape blocks
x ./gcl-2.1/lsp/trace.lsp, 15448 bytes, 31 tape blocks
x ./gcl-2.1/lsp/ucall.lisp, 4045 bytes, 8 tape blocks
x ./gcl-2.1/lsp/arraylib.data, 3191 bytes, 7 tape blocks
x ./gcl-2.1/lsp/assert.data, 2838 bytes, 6 tape blocks
x ./gcl-2.1/lsp/arraylib.lsp, 9933 bytes, 20 tape blocks
x ./gcl-2.1/lsp/assert.c, 14826 bytes, 29 tape blocks
x ./gcl-2.1/lsp/assert.lsp, 8195 bytes, 17 tape blocks
x ./gcl-2.1/lsp/iolib.lsp, 6787 bytes, 14 tape blocks
x ./gcl-2.1/lsp/autoload.lsp, 15112 bytes, 30 tape blocks
x ./gcl-2.1/lsp/cmpinit.lsp, 341 bytes, 1 tape blocks
x ./gcl-2.1/lsp/defmacro.data, 2118 bytes, 5 tape blocks
x ./gcl-2.1/lsp/assert.h, 1671 bytes, 4 tape blocks
x ./gcl-2.1/lsp/defmacro.lsp, 9472 bytes, 19 tape blocks
x ./gcl-2.1/lsp/defstruct.data, 7547 bytes, 15 tape blocks
x ./gcl-2.1/lsp/defstruct.lsp, 31338 bytes, 62 tape blocks
x ./gcl-2.1/lsp/defmacro.c, 17372 bytes, 34 tape blocks
x ./gcl-2.1/lsp/defmacro.h, 2883 bytes, 6 tape blocks
x ./gcl-2.1/lsp/describe.lsp, 17609 bytes, 35 tape blocks
x ./gcl-2.1/lsp/describe.data, 6430 bytes, 13 tape blocks
x ./gcl-2.1/lsp/defstruct.c, 45916 bytes, 90 tape blocks
x ./gcl-2.1/lsp/evalmacros.lsp, 9112 bytes, 18 tape blocks
x ./gcl-2.1/lsp/evalmacros.data, 2169 bytes, 5 tape blocks
x ./gcl-2.1/lsp/iolib.data, 3440 bytes, 7 tape blocks
x ./gcl-2.1/lsp/listlib.lsp, 7007 bytes, 14 tape blocks
x ./gcl-2.1/lsp/defstruct.h, 6127 bytes, 12 tape blocks
x ./gcl-2.1/lsp/describe.c, 50531 bytes, 99 tape blocks
x ./gcl-2.1/lsp/numlib.lsp, 6690 bytes, 14 tape blocks
x ./gcl-2.1/lsp/listlib.data, 1204 bytes, 3 tape blocks
x ./gcl-2.1/lsp/packlib.lsp, 5350 bytes, 11 tape blocks
x ./gcl-2.1/lsp/describe.h, 5254 bytes, 11 tape blocks
x ./gcl-2.1/lsp/predlib.lsp, 19211 bytes, 38 tape blocks
x ./gcl-2.1/lsp/seq.lsp, 4591 bytes, 9 tape blocks
x ./gcl-2.1/lsp/mislib.data, 1730 bytes, 4 tape blocks
x ./gcl-2.1/lsp/seqlib.lsp, 25731 bytes, 51 tape blocks
x ./gcl-2.1/lsp/evalmacros.c, 23566 bytes, 47 tape blocks
x ./gcl-2.1/lsp/setf.lsp, 20367 bytes, 40 tape blocks
x ./gcl-2.1/lsp/module.data, 1085 bytes, 3 tape blocks
x ./gcl-2.1/lsp/evalmacros.h, 2221 bytes, 5 tape blocks
x ./gcl-2.1/lsp/numlib.data, 3067 bytes, 6 tape blocks
x ./gcl-2.1/lsp/seq.c, 10807 bytes, 22 tape blocks
x ./gcl-2.1/lsp/gprof.lsp, 4126 bytes, 9 tape blocks
x ./gcl-2.1/lsp/packlib.data, 1402 bytes, 3 tape blocks
x ./gcl-2.1/lsp/seq.h, 2481 bytes, 5 tape blocks
x ./gcl-2.1/lsp/gprof_aix.hc, 5986 bytes, 12 tape blocks
x ./gcl-2.1/lsp/listlib.c, 10622 bytes, 21 tape blocks
x ./gcl-2.1/lsp/listlib.h, 2976 bytes, 6 tape blocks
x ./gcl-2.1/lsp/stdlisp.lsp, 1552 bytes, 4 tape blocks
x ./gcl-2.1/lsp/sys-proclaim.lisp, 7379 bytes, 15 tape blocks
x ./gcl-2.1/lsp/ustreams.lisp, 2237 bytes, 5 tape blocks
x ./gcl-2.1/lsp/sloop.lsp, 41565 bytes, 82 tape blocks
x ./gcl-2.1/lsp/debug.lsp, 23561 bytes, 47 tape blocks
x ./gcl-2.1/lsp/littleXlsp.lsp, 6572 bytes, 13 tape blocks
x ./gcl-2.1/lsp/predlib.data, 11181 bytes, 22 tape blocks
x ./gcl-2.1/lsp/mislib.c, 8307 bytes, 17 tape blocks
x ./gcl-2.1/lsp/seq.data, 1045 bytes, 3 tape blocks
x ./gcl-2.1/lsp/export.lsp, 3476 bytes, 7 tape blocks
x ./gcl-2.1/lsp/init.lsp, 468 bytes, 1 tape blocks
x ./gcl-2.1/lsp/mislib.lsp, 3532 bytes, 7 tape blocks
x ./gcl-2.1/lsp/module.lsp, 2442 bytes, 5 tape blocks
x ./gcl-2.1/lsp/mislib.h, 1178 bytes, 3 tape blocks
x ./gcl-2.1/lsp/seqlib.data, 4843 bytes, 10 tape blocks
x ./gcl-2.1/lsp/setf.data, 26983 bytes, 53 tape blocks
x ./gcl-2.1/lsp/module.c, 2931 bytes, 6 tape blocks
x ./gcl-2.1/lsp/top.data, 15208 bytes, 30 tape blocks
x ./gcl-2.1/lsp/module.h, 1055 bytes, 3 tape blocks
x ./gcl-2.1/lsp/trace.data, 5585 bytes, 11 tape blocks
x ./gcl-2.1/lsp/setf.c, 45559 bytes, 89 tape blocks
x ./gcl-2.1/lsp/sloop.data, 20086 bytes, 40 tape blocks
x ./gcl-2.1/lsp/numlib.c, 19588 bytes, 39 tape blocks
x ./gcl-2.1/lsp/debug.data, 12892 bytes, 26 tape blocks
x ./gcl-2.1/lsp/numlib.h, 7866 bytes, 16 tape blocks
x ./gcl-2.1/lsp/top.c, 63450 bytes, 124 tape blocks
x ./gcl-2.1/lsp/packages.lsp, 1 bytes, 1 tape blocks
x ./gcl-2.1/lsp/desetq.lsp, 604 bytes, 2 tape blocks
x ./gcl-2.1/lsp/stack-problem.lsp, 756 bytes, 2 tape blocks
x ./gcl-2.1/lsp/makefile, 3025 bytes, 6 tape blocks
x ./gcl-2.1/lsp/info.lsp, 15837 bytes, 31 tape blocks
x ./gcl-2.1/lsp/info.data, 5675 bytes, 12 tape blocks
x ./gcl-2.1/lsp/packlib.c, 20357 bytes, 40 tape blocks
x ./gcl-2.1/lsp/packlib.h, 1899 bytes, 4 tape blocks
x ./gcl-2.1/lsp/predlib.c, 44667 bytes, 88 tape blocks
x ./gcl-2.1/lsp/predlib.h, 3584 bytes, 7 tape blocks
x ./gcl-2.1/lsp/seqlib.c, 64785 bytes, 127 tape blocks
x ./gcl-2.1/lsp/seqlib.h, 19397 bytes, 38 tape blocks
x ./gcl-2.1/lsp/setf.h, 3326 bytes, 7 tape blocks
x ./gcl-2.1/lsp/top.h, 8931 bytes, 18 tape blocks
x ./gcl-2.1/lsp/trace.c, 28840 bytes, 57 tape blocks
x ./gcl-2.1/lsp/trace.h, 3535 bytes, 7 tape blocks
x ./gcl-2.1/lsp/sloop.c, 78589 bytes, 154 tape blocks
x ./gcl-2.1/lsp/sloop.h, 15099 bytes, 30 tape blocks
x ./gcl-2.1/lsp/debug.c, 66736 bytes, 131 tape blocks
x ./gcl-2.1/lsp/debug.h, 6641 bytes, 13 tape blocks
x ./gcl-2.1/lsp/info.c, 45235 bytes, 89 tape blocks
x ./gcl-2.1/lsp/info.h, 4146 bytes, 9 tape blocks
x ./gcl-2.1/majvers, 2 bytes, 1 tape blocks
x ./gcl-2.1/merge.c, 12238 bytes, 24 tape blocks
x ./gcl-2.1/minvers, 2 bytes, 1 tape blocks
x ./gcl-2.1/o/ChangeLog, 51801 bytes, 102 tape blocks
x ./gcl-2.1/o/bcmp.c, 123 bytes, 1 tape blocks
x ./gcl-2.1/o/bcopy.c, 82 bytes, 1 tape blocks
x ./gcl-2.1/o/bsearch.c, 660 bytes, 2 tape blocks
x ./gcl-2.1/o/bzero.c, 81 bytes, 1 tape blocks
x ./gcl-2.1/o/alloc.c, 26459 bytes, 52 tape blocks
x ./gcl-2.1/o/fat_string.c, 9349 bytes, 19 tape blocks
x ./gcl-2.1/o/funlink.c, 28268 bytes, 56 tape blocks
x ./gcl-2.1/o/format.c, 45902 bytes, 90 tape blocks
x ./gcl-2.1/o/ndiv.c, 2689 bytes, 6 tape blocks
x ./gcl-2.1/o/init_pari.c, 1793 bytes, 4 tape blocks
x ./gcl-2.1/o/nmul.c, 658 bytes, 2 tape blocks
x ./gcl-2.1/o/rel_coff.c, 2242 bytes, 5 tape blocks
x ./gcl-2.1/o/rel_hp300.c, 5345 bytes, 11 tape blocks
x ./gcl-2.1/o/rel_ps2aix.c, 2606 bytes, 6 tape blocks
x ./gcl-2.1/o/rel_stand.c, 2041 bytes, 4 tape blocks
x ./gcl-2.1/o/rel_sun3.c, 1235 bytes, 3 tape blocks
x ./gcl-2.1/o/rel_sun4.c, 4442 bytes, 9 tape blocks
x ./gcl-2.1/o/sbrk.c, 322 bytes, 1 tape blocks
x ./gcl-2.1/o/print.d, 42505 bytes, 84 tape blocks
x ./gcl-2.1/o/sfasl.c, 15219 bytes, 30 tape blocks
x ./gcl-2.1/o/file.d, 45051 bytes, 88 tape blocks
x ./gcl-2.1/o/array.c, 28012 bytes, 55 tape blocks
x ./gcl-2.1/o/big.c, 8214 bytes, 17 tape blocks
x ./gcl-2.1/o/assignment.c, 13483 bytes, 27 tape blocks
x ./gcl-2.1/o/backq.c, 6742 bytes, 14 tape blocks
x ./gcl-2.1/o/bds.c, 994 bytes, 2 tape blocks
x ./gcl-2.1/o/gbc.c, 28264 bytes, 56 tape blocks
x ./gcl-2.1/o/bind.c, 22315 bytes, 44 tape blocks
x ./gcl-2.1/o/bitop.c, 555 bytes, 2 tape blocks
x ./gcl-2.1/o/block.c, 2719 bytes, 6 tape blocks
x ./gcl-2.1/o/cfun.c, 8530 bytes, 17 tape blocks
x ./gcl-2.1/o/character.d, 13885 bytes, 28 tape blocks
x ./gcl-2.1/o/read.d, 58636 bytes, 115 tape blocks
x ./gcl-2.1/o/earith.c, 78 bytes, 1 tape blocks
x ./gcl-2.1/o/error.c, 14647 bytes, 29 tape blocks
x ./gcl-2.1/o/eval.c, 30452 bytes, 60 tape blocks
x ./gcl-2.1/o/hash.d, 11170 bytes, 22 tape blocks
x ./gcl-2.1/o/cmac.c, 6142 bytes, 12 tape blocks
x ./gcl-2.1/o/iteration.c, 9113 bytes, 18 tape blocks
x ./gcl-2.1/o/list.d, 28087 bytes, 55 tape blocks
x ./gcl-2.1/o/macros.c, 8305 bytes, 17 tape blocks
x ./gcl-2.1/o/mapfun.c, 5528 bytes, 11 tape blocks
x ./gcl-2.1/o/cmpaux.c, 8821 bytes, 18 tape blocks
x ./gcl-2.1/o/fasdump.c, 35170 bytes, 69 tape blocks
x ./gcl-2.1/o/main.c, 16941 bytes, 34 tape blocks
x ./gcl-2.1/o/sgbc.c, 28941 bytes, 57 tape blocks
x ./gcl-2.1/o/num_arith.c, 23829 bytes, 47 tape blocks
x ./gcl-2.1/o/num_rand.c, 3087 bytes, 7 tape blocks
x ./gcl-2.1/o/num_sfun.c, 10110 bytes, 20 tape blocks
x ./gcl-2.1/o/number.c, 4709 bytes, 10 tape blocks
x ./gcl-2.1/o/package.d, 24138 bytes, 48 tape blocks
x ./gcl-2.1/o/pathname.d, 15549 bytes, 31 tape blocks
x ./gcl-2.1/o/predicate.c, 14610 bytes, 29 tape blocks
x ./gcl-2.1/o/sequence.d, 11067 bytes, 22 tape blocks
x ./gcl-2.1/o/string.d, 14472 bytes, 29 tape blocks
x ./gcl-2.1/o/symbol.d, 13467 bytes, 27 tape blocks
x ./gcl-2.1/o/structure.c, 11312 bytes, 23 tape blocks
x ./gcl-2.1/o/toplevel.c, 5545 bytes, 11 tape blocks
x ./gcl-2.1/o/num_co.c, 26523 bytes, 52 tape blocks
x ./gcl-2.1/o/unixfasl.c, 9101 bytes, 18 tape blocks
x ./gcl-2.1/o/unixfsys.c, 14409 bytes, 29 tape blocks
x ./gcl-2.1/o/usig.c, 3835 bytes, 8 tape blocks
x ./gcl-2.1/o/unixsave.c, 3077 bytes, 7 tape blocks
x ./gcl-2.1/o/unixsys.c, 2010 bytes, 4 tape blocks
x ./gcl-2.1/o/unixtime.c, 3547 bytes, 7 tape blocks
x ./gcl-2.1/o/rel_aix.c, 3085 bytes, 7 tape blocks
x ./gcl-2.1/o/Vmalloc.c, 2021 bytes, 4 tape blocks
x ./gcl-2.1/o/gnumalloc.c, 23517 bytes, 46 tape blocks
x ./gcl-2.1/o/malloc.c, 22857 bytes, 45 tape blocks
x ./gcl-2.1/o/sgi4d_emul.s, 1291 bytes, 3 tape blocks
x ./gcl-2.1/o/savedec31.c, 7220 bytes, 15 tape blocks
x ./gcl-2.1/o/save.c, 400 bytes, 1 tape blocks
x ./gcl-2.1/o/xdrfuns.c, 3338 bytes, 7 tape blocks
x ./gcl-2.1/o/num_comp.c, 6562 bytes, 13 tape blocks
x ./gcl-2.1/o/num_log.c, 18058 bytes, 36 tape blocks
x ./gcl-2.1/o/littleXwin.c, 7101 bytes, 14 tape blocks
x ./gcl-2.1/o/peculiar.c, 652 bytes, 2 tape blocks
x ./gcl-2.1/o/unexlin.c, 27257 bytes, 54 tape blocks
x ./gcl-2.1/o/st, 3784 bytes, 8 tape blocks
x ./gcl-2.1/o/saveu370.c, 4029 bytes, 8 tape blocks
x ./gcl-2.1/o/run_process.c, 7627 bytes, 15 tape blocks
x ./gcl-2.1/o/rel_rios.c, 8343 bytes, 17 tape blocks
x ./gcl-2.1/o/saveaix3.c, 7399 bytes, 15 tape blocks
x ./gcl-2.1/o/user_init.c, 26 bytes, 1 tape blocks
x ./gcl-2.1/o/mych, 970 bytes, 2 tape blocks
x ./gcl-2.1/o/u370_emul.s, 1477 bytes, 3 tape blocks
x ./gcl-2.1/o/faslhp800.c, 3929 bytes, 8 tape blocks
x ./gcl-2.1/o/typespec.c, 12247 bytes, 24 tape blocks
x ./gcl-2.1/o/unexhp9k800.c, 9374 bytes, 19 tape blocks
x ./gcl-2.1/o/rel_u370aix.c, 2453 bytes, 5 tape blocks
x ./gcl-2.1/o/faslsgi4.c, 10732 bytes, 21 tape blocks
x ./gcl-2.1/o/num_pred.c, 3793 bytes, 8 tape blocks
x ./gcl-2.1/o/sfasli.c, 1023 bytes, 2 tape blocks
x ./gcl-2.1/o/NeXTunixsave.c, 10138 bytes, 20 tape blocks
x ./gcl-2.1/o/rel_mac2.c, 2530 bytes, 5 tape blocks
x ./gcl-2.1/o/unexelf.c, 29276 bytes, 58 tape blocks
x ./gcl-2.1/o/catch.c, 3633 bytes, 8 tape blocks
x ./gcl-2.1/o/save_sgi4.c, 9823 bytes, 20 tape blocks
x ./gcl-2.1/o/NeXTunixfasl.c, 12967 bytes, 26 tape blocks
x ./gcl-2.1/o/sfaslelf.c, 8966 bytes, 18 tape blocks
x ./gcl-2.1/o/conditional.c, 3946 bytes, 8 tape blocks
x ./gcl-2.1/o/frame.c, 1853 bytes, 4 tape blocks
x ./gcl-2.1/o/let.c, 6990 bytes, 14 tape blocks
x ./gcl-2.1/o/lex.c, 2751 bytes, 6 tape blocks
x ./gcl-2.1/o/multival.c, 2780 bytes, 6 tape blocks
x ./gcl-2.1/o/prog.c, 6005 bytes, 12 tape blocks
x ./gcl-2.1/o/reference.c, 4274 bytes, 9 tape blocks
x ./gcl-2.1/o/unexec-19.27.c, 30977 bytes, 61 tape blocks
x ./gcl-2.1/o/funs, 928 bytes, 2 tape blocks
x ./gcl-2.1/o/grab_defs.c, 2273 bytes, 5 tape blocks
x ./gcl-2.1/o/egrep-def, 109 bytes, 1 tape blocks
x ./gcl-2.1/o/before_init.c, 1456 bytes, 3 tape blocks
x ./gcl-2.1/o/usig2.c, 11124 bytes, 22 tape blocks
x ./gcl-2.1/o/utils.c, 2815 bytes, 6 tape blocks
x ./gcl-2.1/o/help.el, 11792 bytes, 24 tape blocks
x ./gcl-2.1/o/nfunlink.c, 8751 bytes, 18 tape blocks
x ./gcl-2.1/o/fix-structref.el, 592 bytes, 2 tape blocks
x ./gcl-2.1/o/external_funs.h, 18927 bytes, 37 tape blocks
x ./gcl-2.1/o/internal-calls.lisp, 47348 bytes, 93 tape blocks
x ./gcl-2.1/o/gbc.ini, 197 bytes, 1 tape blocks
x ./gcl-2.1/o/main.ini, 645 bytes, 2 tape blocks
x ./gcl-2.1/o/alloc.ini, 1294 bytes, 3 tape blocks
x ./gcl-2.1/o/bitop.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/typespec.ini, 2680 bytes, 6 tape blocks
x ./gcl-2.1/o/eval.ini, 515 bytes, 2 tape blocks
x ./gcl-2.1/o/macros.ini, 334 bytes, 1 tape blocks
x ./gcl-2.1/o/lex.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/bds.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/frame.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/predicate.ini, 2470 bytes, 5 tape blocks
x ./gcl-2.1/o/reference.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/assignment.ini, 1334 bytes, 3 tape blocks
x ./gcl-2.1/o/bind.ini, 63 bytes, 1 tape blocks
x ./gcl-2.1/o/let.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/block.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/conditional.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/iteration.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/mapfun.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/prog.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/multival.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/catch.ini, 458 bytes, 1 tape blocks
x ./gcl-2.1/o/cfun.ini, 645 bytes, 2 tape blocks
x ./gcl-2.1/o/symbol.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/cmpaux.ini, 403 bytes, 1 tape blocks
x ./gcl-2.1/o/big.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/package.ini, 282 bytes, 1 tape blocks
x ./gcl-2.1/o/number.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_pred.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_comp.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_arith.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_sfun.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_co.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_log.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/num_rand.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/earith.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/array.ini, 2715 bytes, 6 tape blocks
x ./gcl-2.1/o/character.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/sequence.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/orig/usig2.c, 5239 bytes, 11 tape blocks
x ./gcl-2.1/o/orig/usig.c, 1781 bytes, 4 tape blocks
x ./gcl-2.1/o/orig/unixint.c, 3568 bytes, 7 tape blocks
x ./gcl-2.1/o/list.ini, 738 bytes, 2 tape blocks
x ./gcl-2.1/o/hash.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/backq.ini, 318 bytes, 1 tape blocks
x ./gcl-2.1/o/string.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/structure.ini, 38 bytes, 1 tape blocks
x ./gcl-2.1/o/toplevel.ini, 484 bytes, 1 tape blocks
x ./gcl-2.1/o/file.ini, 1761 bytes, 4 tape blocks
x ./gcl-2.1/o/read.ini, 212 bytes, 1 tape blocks
x ./gcl-2.1/o/README, 479 bytes, 1 tape blocks
x ./gcl-2.1/o/print.ini, 1392 bytes, 3 tape blocks
x ./gcl-2.1/o/format.ini, 177 bytes, 1 tape blocks
x ./gcl-2.1/o/error.ini, 2643 bytes, 6 tape blocks
x ./gcl-2.1/o/pathname.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/unixfsys.ini, 90 bytes, 1 tape blocks
x ./gcl-2.1/o/unixfasl.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/unixtime.ini, 77 bytes, 1 tape blocks
x ./gcl-2.1/o/unixsys.ini, 121 bytes, 1 tape blocks
x ./gcl-2.1/o/unixsave.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/funlink.ini, 466 bytes, 1 tape blocks
x ./gcl-2.1/o/fat_string.ini, 717 bytes, 2 tape blocks
x ./gcl-2.1/o/run_process.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/pre_init.c, 1437 bytes, 3 tape blocks
x ./gcl-2.1/o/nfunlink.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/usig.ini, 195 bytes, 1 tape blocks
x ./gcl-2.1/o/usig2.ini, 548 bytes, 2 tape blocks
x ./gcl-2.1/o/sfasl.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/init_pari.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/utils.ini, 0 bytes, 0 tape blocks
x ./gcl-2.1/o/makefun.c, 4299 bytes, 9 tape blocks
x ./gcl-2.1/o/makefun.ini, 789 bytes, 2 tape blocks
x ./gcl-2.1/o/makefile.rej, 1277 bytes, 3 tape blocks
x ./gcl-2.1/o/sockets.c, 12431 bytes, 25 tape blocks
x ./gcl-2.1/o/sockets.ini, 2551 bytes, 5 tape blocks
x ./gcl-2.1/o/jo.c, 3439 bytes, 7 tape blocks
x ./gcl-2.1/o/usig2_aux.c, 1465 bytes, 3 tape blocks
x ./gcl-2.1/o/bind.texi, 22 bytes, 1 tape blocks
x ./gcl-2.1/o/gdb_commands, 613 bytes, 2 tape blocks
x ./gcl-2.1/o/regexp.c, 36976 bytes, 73 tape blocks
x ./gcl-2.1/o/regexpr.c, 5101 bytes, 10 tape blocks
x ./gcl-2.1/o/regexp.h, 779 bytes, 2 tape blocks
x ./gcl-2.1/o/regexpr.ini, 1160 bytes, 3 tape blocks
x ./gcl-2.1/o/strcspn.c, 302 bytes, 1 tape blocks
x ./gcl-2.1/o/new_init.c, 28548 bytes, 56 tape blocks
x ./gcl-2.1/o/grab_defs.u, 10736 bytes, 21 tape blocks
x ./gcl-2.1/o/fasldlsym.c, 2082 bytes, 5 tape blocks
x ./gcl-2.1/o/unexelfsgi.c, 31815 bytes, 63 tape blocks
x ./gcl-2.1/o/fasldlsym.c.link, 2062 bytes, 5 tape blocks
./gcl-2.1/o/cmpinclude.h linked to ./gcl-2.1/h/cmpinclude.h
x ./gcl-2.1/o/unexec.c, 30977 bytes, 61 tape blocks
x ./gcl-2.1/o/prev/usig.c, 2181 bytes, 5 tape blocks
x ./gcl-2.1/o/prev/usig2.c, 10211 bytes, 20 tape blocks
x ./gcl-2.1/o/array.c.prev, 27628 bytes, 54 tape blocks
x ./gcl-2.1/o/makefile, 6144 bytes, 12 tape blocks
x ./gcl-2.1/o/clxsocket.c, 4362 bytes, 9 tape blocks
x ./gcl-2.1/unixport/boots, 1703 bytes, 4 tape blocks
x ./gcl-2.1/unixport/bsd_rsym.c, 3457 bytes, 7 tape blocks
x ./gcl-2.1/unixport/init_kcn.lsp, 955 bytes, 2 tape blocks
x ./gcl-2.1/unixport/make_kcn, 3234 bytes, 7 tape blocks
x ./gcl-2.1/unixport/rsym.c, 8115 bytes, 16 tape blocks
x ./gcl-2.1/unixport/sys_boot.c, 2002 bytes, 4 tape blocks
x ./gcl-2.1/unixport/sys_kcn.c, 506 bytes, 1 tape blocks
x ./gcl-2.1/unixport/sys_gcl.c, 2648 bytes, 6 tape blocks
x ./gcl-2.1/unixport/makefile, 6339 bytes, 13 tape blocks
x ./gcl-2.1/unixport/gcrt0.el, 203 bytes, 1 tape blocks
x ./gcl-2.1/unixport/ncrt0.el, 214 bytes, 1 tape blocks
x ./gcl-2.1/unixport/lspboots, 131 bytes, 1 tape blocks
x ./gcl-2.1/unixport/sys-init.lsp, 160 bytes, 1 tape blocks
x ./gcl-2.1/unixport/makefile.dos, 5652 bytes, 12 tape blocks
x ./gcl-2.1/unixport/rsym_elf.c, 5018 bytes, 10 tape blocks
x ./gcl-2.1/unixport/aix_exports, 22625 bytes, 45 tape blocks
x ./gcl-2.1/unixport/aix-crt0.el, 185 bytes, 1 tape blocks
x ./gcl-2.1/unixport/cmpboots, 135 bytes, 1 tape blocks
x ./gcl-2.1/unixport/gcldos.lsp, 3532 bytes, 7 tape blocks
x ./gcl-2.1/unixport/init_gcl.lsp, 3503 bytes, 7 tape blocks
x ./gcl-2.1/unixport/litmus-temp, 0 bytes, 0 tape blocks
x ./gcl-2.1/unixport/init_maxima.lsp, 3671 bytes, 8 tape blocks
x ./gcl-2.1/unixport/init_xgcl.lsp, 3715 bytes, 8 tape blocks
x ./gcl-2.1/unixport/xgraph-out, 5957 bytes, 12 tape blocks
x ./gcl-2.1/unixport/rsym2872, 0 bytes, 0 tape blocks
x ./gcl-2.1/unixport/rsym1406, 0 bytes, 0 tape blocks
x ./gcl-2.1/unixport/rsym1937, 0 bytes, 0 tape blocks
x ./gcl-2.1/unixport/rsym2512, 0 bytes, 0 tape blocks
x ./gcl-2.1/xbin/append, 75 bytes, 1 tape blocks
x ./gcl-2.1/xbin/comp_rel, 319 bytes, 1 tape blocks
x ./gcl-2.1/xbin/compare-src, 436 bytes, 1 tape blocks
x ./gcl-2.1/xbin/compare.c, 681 bytes, 2 tape blocks
x ./gcl-2.1/xbin/dfiles, 89 bytes, 1 tape blocks
x ./gcl-2.1/xbin/distribute, 1188 bytes, 3 tape blocks
x ./gcl-2.1/xbin/file-sub, 311 bytes, 1 tape blocks
x ./gcl-2.1/xbin/ibm, 177 bytes, 1 tape blocks
x ./gcl-2.1/xbin/if-exists, 102 bytes, 1 tape blocks
x ./gcl-2.1/xbin/inc-version, 99 bytes, 1 tape blocks
x ./gcl-2.1/xbin/fix-copyright, 2925 bytes, 6 tape blocks
x ./gcl-2.1/xbin/is-V-newest, 842 bytes, 2 tape blocks
x ./gcl-2.1/xbin/make-fn, 321 bytes, 1 tape blocks
x ./gcl-2.1/xbin/maketest, 1355 bytes, 3 tape blocks
x ./gcl-2.1/xbin/new-files, 900 bytes, 2 tape blocks
x ./gcl-2.1/xbin/move-if-changed, 227 bytes, 1 tape blocks
x ./gcl-2.1/xbin/get-machine, 2 bytes, 1 tape blocks
x ./gcl-2.1/xbin/setup-tmptest, 214 bytes, 1 tape blocks
x ./gcl-2.1/xbin/notify, 449 bytes, 1 tape blocks
x ./gcl-2.1/xbin/spp.c, 2152 bytes, 5 tape blocks
x ./gcl-2.1/xbin/test, 321 bytes, 1 tape blocks
x ./gcl-2.1/xbin/test1, 674 bytes, 2 tape blocks
x ./gcl-2.1/xbin/update, 104 bytes, 1 tape blocks
x ./gcl-2.1/xbin/strip-ifdef, 364 bytes, 1 tape blocks
x ./gcl-2.1/xbin/distrib-help, 112 bytes, 1 tape blocks
x ./gcl-2.1/xbin/if-have-gcc, 77 bytes, 1 tape blocks
x ./gcl-2.1/xbin/dosmake.bat, 1489 bytes, 3 tape blocks
x ./gcl-2.1/xbin/dos-files, 1091 bytes, 3 tape blocks
x ./gcl-2.1/xbin/append.bat, 47 bytes, 1 tape blocks
x ./gcl-2.1/xbin/if-exist.bat, 73 bytes, 1 tape blocks
x ./gcl-2.1/xbin/test-distrib, 720 bytes, 2 tape blocks
x ./gcl-2.1/xbin/get-externals, 234 bytes, 1 tape blocks
x ./gcl-2.1/xbin/get-internal-calls, 274 bytes, 1 tape blocks
x ./gcl-2.1/xbin/add-dir, 407 bytes, 1 tape blocks
x ./gcl-2.1/xbin/exists, 73 bytes, 1 tape blocks
x ./gcl-2.1/xbin/maketest1, 1523 bytes, 3 tape blocks
x ./gcl-2.1/bin/dpp.c, 12420 bytes, 25 tape blocks
x ./gcl-2.1/bin/makefile, 1710 bytes, 4 tape blocks
x ./gcl-2.1/bin/gcl, 292 bytes, 1 tape blocks
x ./gcl-2.1/bin/info, 203 bytes, 1 tape blocks
x ./gcl-2.1/bin/tkinfo, 297 bytes, 1 tape blocks
x ./gcl-2.1/bin/info1, 260 bytes, 1 tape blocks
x ./gcl-2.1/misc/rusage.lsp, 1491 bytes, 3 tape blocks
x ./gcl-2.1/misc/test-sgc.lsp, 1427 bytes, 3 tape blocks
x ./gcl-2.1/misc/cstruct.lsp, 5001 bytes, 10 tape blocks
x ./gcl-2.1/misc/mprotect.ch, 4106 bytes, 9 tape blocks
x ./gcl-2.1/misc/warn-slow.lsp, 1370 bytes, 3 tape blocks
x ./gcl-2.1/misc/foreign.lsp, 4174 bytes, 9 tape blocks
x ./gcl-2.1/misc/test-seek.c, 774 bytes, 2 tape blocks
x ./gcl-2.1/misc/check_obj.c, 335 bytes, 1 tape blocks
x ./gcl-2.1/misc/check.c, 1067 bytes, 3 tape blocks
x ./gcl-2.1/machine, 5 bytes, 1 tape blocks
x ./gcl-2.1/makefile, 5889 bytes, 12 tape blocks
x ./gcl-2.1/MACHINES, 1222 bytes, 3 tape blocks
x ./gcl-2.1/add-defs.bat, 1647 bytes, 4 tape blocks
x ./gcl-2.1/mp/lo-rios.s, 2692 bytes, 6 tape blocks
x ./gcl-2.1/mp/mpi.c, 15161 bytes, 30 tape blocks
x ./gcl-2.1/mp/makefile, 2914 bytes, 6 tape blocks
x ./gcl-2.1/mp/README, 2464 bytes, 5 tape blocks
x ./gcl-2.1/mp/fplus.c, 2446 bytes, 5 tape blocks
x ./gcl-2.1/mp/mp2.c, 9722 bytes, 19 tape blocks
x ./gcl-2.1/mp/make.defs, 1225 bytes, 3 tape blocks
x ./gcl-2.1/mp/lo-sgi4d.s, 761 bytes, 2 tape blocks
x ./gcl-2.1/mp/mpi-bsd68k.s, 27041 bytes, 53 tape blocks
x ./gcl-2.1/mp/lo-ibmrt.s, 936 bytes, 2 tape blocks
x ./gcl-2.1/mp/gcclab, 419 bytes, 1 tape blocks
x ./gcl-2.1/mp/mp_addmul.c, 1205 bytes, 3 tape blocks
x ./gcl-2.1/mp/mp_mulul3.c, 1718 bytes, 4 tape blocks
x ./gcl-2.1/mp/gcclab.awk, 213 bytes, 1 tape blocks
x ./gcl-2.1/mp/mp_bfffo.c, 1488 bytes, 3 tape blocks
x ./gcl-2.1/mp/mp_divul3.c, 1936 bytes, 4 tape blocks
x ./gcl-2.1/mp/mp_sl3todivul3.c, 2423 bytes, 5 tape blocks
x ./gcl-2.1/mp/mp_shiftl.c, 975 bytes, 2 tape blocks
x ./gcl-2.1/mp/sparcdivul3.s, 4323 bytes, 9 tape blocks
x ./gcl-2.1/mp/gnulib1.c, 1031 bytes, 3 tape blocks
x ./gcl-2.1/mp/mpi-sparc.s, 44820 bytes, 88 tape blocks
x ./gcl-2.1/mp/mpi-386.s, 44062 bytes, 87 tape blocks
x ./gcl-2.1/mp/mpi-386d.s, 34659 bytes, 68 tape blocks
x ./gcl-2.1/mp/mp_dblrul3.c, 981 bytes, 2 tape blocks
x ./gcl-2.1/mp/lo-u370_aix.s, 1302 bytes, 3 tape blocks
x ./gcl-2.1/mp/mpi-sol-sparc.s, 46741 bytes, 92 tape blocks
x ./gcl-2.1/mp/mp_divul3_word.c, 2199 bytes, 5 tape blocks
x ./gcl-2.1/mp/mp_dblrsl3.c, 1263 bytes, 3 tape blocks
x ./gcl-2.1/COPYING.LIB-2.0, 25265 bytes, 50 tape blocks
x ./gcl-2.1/restarts.lsp, 2979 bytes, 6 tape blocks
x ./gcl-2.1/comp/makefile, 2416 bytes, 5 tape blocks
x ./gcl-2.1/comp/top2.lsp, 32346 bytes, 64 tape blocks
x ./gcl-2.1/comp/comptype.lsp, 6304 bytes, 13 tape blocks
x ./gcl-2.1/comp/mangle.lsp, 3857 bytes, 8 tape blocks
x ./gcl-2.1/comp/proclaim.lsp, 21 bytes, 1 tape blocks
x ./gcl-2.1/comp/stmt.lsp, 12325 bytes, 25 tape blocks
x ./gcl-2.1/comp/defs.lsp, 3344 bytes, 7 tape blocks
x ./gcl-2.1/comp/exit.lsp, 1109 bytes, 3 tape blocks
x ./gcl-2.1/comp/top1.lsp, 3369 bytes, 7 tape blocks
x ./gcl-2.1/comp/fasdmacros.lsp, 2141 bytes, 5 tape blocks
x ./gcl-2.1/comp/wr.lsp, 13558 bytes, 27 tape blocks
x ./gcl-2.1/comp/c-pass1.lsp, 1878 bytes, 4 tape blocks
x ./gcl-2.1/comp/top.lsp, 2505 bytes, 5 tape blocks
x ./gcl-2.1/comp/data.lsp, 3022 bytes, 6 tape blocks
x ./gcl-2.1/comp/macros.lsp, 2221 bytes, 5 tape blocks
x ./gcl-2.1/comp/sysdef.lsp, 682 bytes, 2 tape blocks
x ./gcl-2.1/comp/try.lsp, 744 bytes, 2 tape blocks
x ./gcl-2.1/comp/opts-base.lsp, 1264 bytes, 3 tape blocks
x ./gcl-2.1/comp/inline.lsp, 20116 bytes, 40 tape blocks
x ./gcl-2.1/comp/cmpinit.lsp, 624 bytes, 2 tape blocks
x ./gcl-2.1/comp/utils.lsp, 4835 bytes, 10 tape blocks
x ./gcl-2.1/comp/opts.lsp-.Z, 6931 bytes, 14 tape blocks
x ./gcl-2.1/comp/lambda.lsp, 1049 bytes, 3 tape blocks
x ./gcl-2.1/comp/defmacro.lsp, 7999 bytes, 16 tape blocks
x ./gcl-2.1/comp/opts.lsp, 21847 bytes, 43 tape blocks
x ./gcl-2.1/comp/smash-oldcmp.lsp, 265 bytes, 1 tape blocks
x ./gcl-2.1/comp/var.lsp, 35877 bytes, 71 tape blocks
x ./gcl-2.1/comp/try1.lsp, 165 bytes, 1 tape blocks
x ./gcl-2.1/comp/bo1.lsp, 4390 bytes, 9 tape blocks
x ./gcl-2.1/comp/integer.doc, 1193 bytes, 3 tape blocks
x ./gcl-2.1/comp/if.lsp--.Z, 1326 bytes, 3 tape blocks
x ./gcl-2.1/comp/lisp-decls.doc, 37947 bytes, 75 tape blocks
x ./gcl-2.1/utils/repls1.sed, 637 bytes, 2 tape blocks
x ./gcl-2.1/utils/repls2.sed, 77 bytes, 1 tape blocks
x ./gcl-2.1/utils/repls3.sed, 569 bytes, 2 tape blocks
x ./gcl-2.1/utils/repls4.sed, 1308 bytes, 3 tape blocks
x ./gcl-2.1/utils/revstruct.sed, 4358 bytes, 9 tape blocks
x ./gcl-2.1/utils/replace, 171 bytes, 1 tape blocks
x ./gcl-2.1/utils/repls5.sed, 2224 bytes, 5 tape blocks
x ./gcl-2.1/info/bind.texi, 17158 bytes, 34 tape blocks
x ./gcl-2.1/info/control.texi, 142596 bytes, 279 tape blocks
x ./gcl-2.1/info/gcl-tk.texi, 1485 bytes, 3 tape blocks
x ./gcl-2.1/info/general.texi, 26143 bytes, 52 tape blocks
x ./gcl-2.1/info/widgets.texi, 203978 bytes, 399 tape blocks
x ./gcl-2.1/info/io.texi, 22118 bytes, 44 tape blocks
x ./gcl-2.1/info/makefile, 3025 bytes, 6 tape blocks
x ./gcl-2.1/info/gcl-si.texi, 2090 bytes, 5 tape blocks
x ./gcl-2.1/info/gcl-tk.toc, 10905 bytes, 22 tape blocks
x ./gcl-2.1/info/gcl-tk.cp, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-tk.vr, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-tk.tp, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-tk.ky, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-tk.pg, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/debug.texi, 5311 bytes, 11 tape blocks
x ./gcl-2.1/info/misc.texi, 1761 bytes, 4 tape blocks
x ./gcl-2.1/info/si-defs.texi, 33043 bytes, 65 tape blocks
x ./gcl-2.1/info/compiler-defs.texi, 4896 bytes, 10 tape blocks
x ./gcl-2.1/info/c-interface.texi, 608 bytes, 2 tape blocks
x ./gcl-2.1/info/gcl-si-index.texi, 118 bytes, 1 tape blocks
x ./gcl-2.1/info/number.texi, 21971 bytes, 43 tape blocks
x ./gcl-2.1/info/sequence.texi, 24740 bytes, 49 tape blocks
x ./gcl-2.1/info/list.texi, 13072 bytes, 26 tape blocks
x ./gcl-2.1/info/internal.texi, 9524 bytes, 19 tape blocks
x ./gcl-2.1/info/form.texi, 25304 bytes, 50 tape blocks
x ./gcl-2.1/info/compile.texi, 7830 bytes, 16 tape blocks
x ./gcl-2.1/info/symbol.texi, 9303 bytes, 19 tape blocks
x ./gcl-2.1/info/system.texi, 9167 bytes, 18 tape blocks
x ./gcl-2.1/info/structure.texi, 1361 bytes, 3 tape blocks
x ./gcl-2.1/info/iteration.texi, 3336 bytes, 7 tape blocks
x ./gcl-2.1/info/user-interface.texi, 8256 bytes, 17 tape blocks
x ./gcl-2.1/info/doc.texi, 3073 bytes, 7 tape blocks
x ./gcl-2.1/info/type.texi, 2545 bytes, 5 tape blocks
x ./gcl-2.1/info/character.texi, 7053 bytes, 14 tape blocks
x ./gcl-2.1/info/gcl-si.toc, 1390 bytes, 3 tape blocks
x ./gcl-2.1/info/gcl-si.cp, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-si.vr, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-si.tp, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-si.ky, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-si.pg, 0 bytes, 0 tape blocks
x ./gcl-2.1/info/gcl-tk.info, 1523 bytes, 3 tape blocks
x ./gcl-2.1/info/gcl-si.info, 1285 bytes, 3 tape blocks
x ./gcl-2.1/info/gcl-tk.info-3.gz, 10179 bytes, 20 tape blocks
x ./gcl-2.1/info/gcl-tk.info-4.gz, 11817 bytes, 24 tape blocks
x ./gcl-2.1/info/gcl-tk.info-5.gz, 11917 bytes, 24 tape blocks
x ./gcl-2.1/info/gcl-tk.info-6.gz, 12459 bytes, 25 tape blocks
x ./gcl-2.1/info/gcl-tk.info-7.gz, 12887 bytes, 26 tape blocks
x ./gcl-2.1/info/gcl-tk.info-8.gz, 7159 bytes, 14 tape blocks
x ./gcl-2.1/info/gcl-tk.info-1.gz, 14390 bytes, 29 tape blocks
x ./gcl-2.1/info/gcl-tk.info-2.gz, 14710 bytes, 29 tape blocks
x ./gcl-2.1/info/gcl-si.info-4.gz, 11538 bytes, 23 tape blocks
x ./gcl-2.1/info/gcl-si.info-5.gz, 15579 bytes, 31 tape blocks
x ./gcl-2.1/info/gcl-si.info-6.gz, 6336 bytes, 13 tape blocks
x ./gcl-2.1/info/gcl-si.info-1.gz, 9375 bytes, 19 tape blocks
x ./gcl-2.1/info/gcl-si.info-2.gz, 10708 bytes, 21 tape blocks
x ./gcl-2.1/info/gcl-si.info-3.gz, 13332 bytes, 27 tape blocks
x ./gcl-2.1/global-data-for-interrupt, 14662 bytes, 29 tape blocks
x ./gcl-2.1/gcl-tk/socketsl.lisp, 1291 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/tem.lisp, 635 bytes, 2 tape blocks
x ./gcl-2.1/gcl-tk/guis.h, 1408 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/tkAppInit.c, 3494 bytes, 7 tape blocks
x ./gcl-2.1/gcl-tk/tkMain.c, 17576 bytes, 35 tape blocks
x ./gcl-2.1/gcl-tk/tkXAppInit.c, 4646 bytes, 10 tape blocks
x ./gcl-2.1/gcl-tk/tkXshell.c, 12087 bytes, 24 tape blocks
x ./gcl-2.1/gcl-tk/tktst.c, 5522 bytes, 11 tape blocks
x ./gcl-2.1/gcl-tk/guis.c, 7416 bytes, 15 tape blocks
x ./gcl-2.1/gcl-tk/our_io.c, 2003 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/gc-monitor.lisp, 4884 bytes, 10 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkCanvText.lisp, 5013 bytes, 10 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkItems.lisp, 14902 bytes, 30 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkListbox.lisp, 1806 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkPlot.lisp, 2913 bytes, 6 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkRadio.lisp, 3067 bytes, 6 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkVScale.lisp, 1542 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/showVars.lisp, 1093 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkCheck.tcl, 1448 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/demos/nqthm-stack.lisp, 2352 bytes, 5 tape blocks
x ./gcl-2.1/gcl-tk/demos/widget.lisp, 10265 bytes, 21 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkLabel.lisp, 1621 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkRuler.lisp, 5215 bytes, 11 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkdialog.lisp, 2537 bytes, 5 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkListbox2.tcl, 4901 bytes, 10 tape blocks
x ./gcl-2.1/gcl-tk/demos/index.lsp, 2578 bytes, 6 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkLabel.tcl, 1332 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkHScale.lisp, 1531 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkListbox3.tcl, 2099 bytes, 5 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkEntry.lisp, 1736 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkEntry2.lisp, 2524 bytes, 5 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkPuzzle.tcl, 2070 bytes, 5 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkForm.lisp, 1947 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkBasic.lisp, 2795 bytes, 6 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkTextBind.lisp, 4129 bytes, 9 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkStyles.lisp, 5225 bytes, 11 tape blocks
x ./gcl-2.1/gcl-tk/demos/mkSearch.lisp, 4987 bytes, 10 tape blocks
x ./gcl-2.1/gcl-tk/gcl_guisl.h, 127 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/intrs.h, 0 bytes, 0 tape blocks
x ./gcl-2.1/gcl-tk/sheader.h, 3046 bytes, 6 tape blocks
x ./gcl-2.1/gcl-tk/socks.h, 874 bytes, 2 tape blocks
x ./gcl-2.1/gcl-tk/sysdep-sunos.h, 153 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/convert.el, 6570 bytes, 13 tape blocks
x ./gcl-2.1/gcl-tk/makefile, 3136 bytes, 7 tape blocks
x ./gcl-2.1/gcl-tk/helpers.lisp, 697 bytes, 2 tape blocks
x ./gcl-2.1/gcl-tk/gcl.tcl, 1406 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/gcl-1.tcl, 1405 bytes, 3 tape blocks
x ./gcl-2.1/gcl-tk/cmpinit.lsp, 23 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/tinfo.lsp, 18961 bytes, 38 tape blocks
x ./gcl-2.1/gcl-tk/index.lsp, 1844 bytes, 4 tape blocks
x ./gcl-2.1/gcl-tk/tk-package.lsp, 884 bytes, 2 tape blocks
x ./gcl-2.1/gcl-tk/dir.sed, 46 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/gcltksrv.prev, 420 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/gcltksrv.in, 364 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/tkl.lisp, 48617 bytes, 95 tape blocks
x ./gcl-2.1/gcl-tk/gcltksrv, 359 bytes, 1 tape blocks
x ./gcl-2.1/gcl-tk/comm.c, 6706 bytes, 14 tape blocks
x ./gcl-2.1/todo, 338 bytes, 1 tape blocks
x ./gcl-2.1/changed, 106 bytes, 1 tape blocks
x ./gcl-2.1/go/makefile, 5997 bytes, 12 tape blocks
x ./gcl-2.1/index.lsp, 18 bytes, 1 tape blocks
x ./gcl-2.1/clcs/condition-definitions.lisp, 13122 bytes, 26 tape blocks
x ./gcl-2.1/clcs/condition-precom.lisp, 1742 bytes, 4 tape blocks
x ./gcl-2.1/clcs/conditions.lisp, 7934 bytes, 16 tape blocks
x ./gcl-2.1/clcs/debugger.lisp, 5004 bytes, 10 tape blocks
x ./gcl-2.1/clcs/handler.lisp, 4760 bytes, 10 tape blocks
x ./gcl-2.1/clcs/install.lisp, 3700 bytes, 8 tape blocks
x ./gcl-2.1/clcs/kcl-cond.lisp, 7329 bytes, 15 tape blocks
x ./gcl-2.1/clcs/loading.lisp, 540 bytes, 2 tape blocks
x ./gcl-2.1/clcs/macros.lisp, 4532 bytes, 9 tape blocks
x ./gcl-2.1/clcs/package.lisp, 2188 bytes, 5 tape blocks
x ./gcl-2.1/clcs/precom.lisp, 212 bytes, 1 tape blocks
x ./gcl-2.1/clcs/reload.lisp, 292 bytes, 1 tape blocks
x ./gcl-2.1/clcs/restart.lisp, 6766 bytes, 14 tape blocks
x ./gcl-2.1/clcs/sysdef.lisp, 4047 bytes, 8 tape blocks
x ./gcl-2.1/clcs/test.lisp, 7342 bytes, 15 tape blocks
x ./gcl-2.1/clcs/test2.lisp, 1581 bytes, 4 tape blocks
x ./gcl-2.1/clcs/test3.lisp, 3774 bytes, 8 tape blocks
x ./gcl-2.1/clcs/test4.lisp, 554 bytes, 2 tape blocks
x ./gcl-2.1/clcs/test5.lisp, 11381 bytes, 23 tape blocks
x ./gcl-2.1/clcs/tester.lisp, 374 bytes, 1 tape blocks
x ./gcl-2.1/clcs/top-patches.lisp, 6610 bytes, 13 tape blocks
x ./gcl-2.1/2, 10 bytes, 1 tape blocks
x ./gcl-2.1/1, 0 bytes, 0 tape blocks
x ./gcl-2.1/elisp/ansi-doc.el, 3143 bytes, 7 tape blocks
x ./gcl-2.1/elisp/dbl.el, 16312 bytes, 32 tape blocks
x ./gcl-2.1/elisp/doc-to-texi.el, 4304 bytes, 9 tape blocks
x ./gcl-2.1/elisp/gcl.el, 11545 bytes, 23 tape blocks
x ./gcl-2.1/elisp/lisp-complete.el, 1354 bytes, 3 tape blocks
x ./gcl-2.1/elisp/man1-to-texi.el, 13755 bytes, 27 tape blocks
x ./gcl-2.1/elisp/sshell.el, 12837 bytes, 26 tape blocks
x ./gcl-2.1/elisp/README, 236 bytes, 1 tape blocks
x ./gcl-2.1/ChangeLog, 1338 bytes, 3 tape blocks
1.0u 6.0s 1:38 7% 0+0k 0+0io 0pf+0w
qobi@eesun>ls
akcl         gcl-2.1      gcl-2.1.tar  gcl-2.2
qobi@eesun>rm gcl-2.1.tar 
qobi@eesun>cd gcl-2.1
qobi@eesun>ls
1                          go
2                          h
COPYING.LIB-2.0            index.lsp
ChangeLog                  info
MACHINES                   lsp
README                     machine
add-defs                   majvers
add-defs.bat               makefile
bin                        merge.c
changed                    minvers
clcs                       misc
cmpnew                     mp
comp                       o
doc                        restarts.lsp
dos                        todo
elisp                      unixport
gcl-tk                     utils
global-data-for-interrupt  xbin
qobi@eesun>ls 1
1
qobi@eesun>ls 2
2
qobi@eesun>ls -l
total 41
-rw-r--r--   1 qobi     staff          0 May  4  1995 1
-rw-r--r--   1 qobi     staff         10 Apr  1  1995 2
-rw-r--r--   1 qobi     staff      25265 Mar 28  1994 COPYING.LIB-2.0
-rw-r--r--   1 qobi     staff       1338 May  1  1995 ChangeLog
-rw-r--r--   1 qobi     staff       1222 Feb 10  1995 MACHINES
-rw-r--r--   1 qobi     staff      11564 Apr 10  1995 README
-rwxr-xr-x   1 qobi     staff       2749 May  7  1995 add-defs
-rw-r--r--   1 qobi     staff       1647 Oct 16  1992 add-defs.bat
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 bin
-rw-r--r--   1 qobi     staff        106 Dec 13  1994 changed
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 clcs
drwxr-xr-x   2 qobi     staff       2560 Feb 26 21:46 cmpnew
drwxr-xr-x   2 qobi     staff       1024 Feb 26 21:47 comp
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:46 doc
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:46 dos
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 elisp
drwxr-xr-x   3 qobi     staff       1024 Feb 26 21:47 gcl-tk
-rw-r--r--   1 qobi     staff      14662 Nov 28  1994 global-data-for-interrupt
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 go
drwxr-xr-x   3 qobi     staff       2560 Feb 26 21:46 h
-rw-r--r--   1 qobi     staff         18 Jan 20  1995 index.lsp
drwxr-xr-x   2 qobi     staff       1536 Feb 26 21:47 info
drwxr-xr-x   2 qobi     staff       2560 Feb 26 21:47 lsp
-rw-r--r--   1 qobi     staff          5 May  4  1995 machine
-rw-r--r--   1 qobi     staff          2 Feb  2  1995 majvers
-rw-r--r--   1 qobi     staff       5889 May  4  1995 makefile
-rw-r--r--   1 qobi     staff      12238 Oct 10  1991 merge.c
-rw-r--r--   1 qobi     staff          2 May  1  1995 minvers
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 misc
drwxr-xr-x   2 qobi     staff       1024 Feb 26 21:47 mp
drwxr-xr-x   4 qobi     staff       4608 Feb 26 21:47 o
-rw-r--r--   1 qobi     staff       2979 Jun 14  1994 restarts.lsp
-rw-r--r--   1 qobi     staff        338 Nov 27  1994 todo
drwxr-xr-x   2 qobi     staff       1024 Feb 26 21:47 unixport
drwxr-xr-x   2 qobi     staff        512 Feb 26 21:47 utils
drwxr-xr-x   2 qobi     staff       1024 Feb 26 21:47 xbin
qobi@eesun>cat 2
/dev/null
qobi@eesun>cat 1
qobi@eesun>add-defs solaris
using solaris.defs
#edit add-defs? could not find tk.tcl in /usr/lib/tk /public/lib/tk /usr/local/lib/tk /usr/lib/X11/tk
adding X11_INCLUDE_DIR=-I/usr/openwin/include
#edit add-defs? could not find tk.h in /usr/include/tcl /public/include/tcl /usr/local/include /usr/local/include/tcl /usr/include /public/include
#edit add-defs? could not find libtk.* in /usr/lib /usr/X11/lib /public/X11/lib /usr/X11R6/lib /public/lib /usr/local/lib
#edit add-defs? could not find libtcl.* in /usr/lib /usr/X11/lib /usr/X11R6/lib /public/X11/lib /public/lib /usr/local/lib
adding X11_LIBS=-L/usr/openwin/lib -lX11
#edit add-defs? could not find *.el* in /usr/lib/emacs/site-lisp /usr/local/lib/emacs/site-lisp ${PUBLIC}/lib/emacs/site-lisp ${PUBLIC}/X11/lib
adding INFO_DIR=/usr/local/info
inserting h/solaris.defs in ..
 makefile,
 unixport/make_kcn,
 bin/makefile,
 cmpnew/makefile,
 comp/makefile,
 doc/makefile,
 dos/makefile,
 gcl-tk/makefile,
 go/makefile,
 info/makefile,
 lsp/makefile,
 mp/makefile,
 o/makefile,
 unixport/makefile,

2.0u 7.0s 0:16 53% 0+0k 0+0io 0pf+0w
qobi@eesun>ls
1                          h
2                          index.lsp
COPYING.LIB-2.0            info
ChangeLog                  lsp
MACHINES                   machine
README                     majvers
add-defs                   makedefs
add-defs.bat               makefile
bin                        merge.c
changed                    minvers
clcs                       misc
cmpnew                     mp
comp                       o
doc                        restarts.lsp
dos                        todo
elisp                      unixport
gcl-tk                     utils
global-data-for-interrupt  xbin
go
qobi@eesun>make
cat h/config.h | sed -e "1,/Begin for cmpincl/d" \
  -e "/End for cmpinclude/,50000d" > tmpx
cat h/cmpincl1.h h/compbas.h h/enum.h h/object.h h/vs.h  h/bds.h h/frame.h  h/lex.h h/eval.h    h/funlink.h  h/att_ext.h h/compbas2.h h//compat.h h//cmponly.h >> tmpx
./xbin/move-if-changed mv tmpx h/cmpinclude.h
tmpx and h/cmpinclude.h were not the same.
ln tmpx h/cmpinclude.h
./xbin/move-if-changed ln h/cmpinclude.h o/cmpinclude.h
h/cmpinclude.h and o/cmpinclude.h were not the same.
ln h/cmpinclude.h o/cmpinclude.h
(cd bin; make all)
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -DUNIX -o dpp dpp.c
(cd mp ; make all)
make all1 "MPFILES=./mpi-sol-sparc.o ./sparcdivul3.o ./libmport.a"
/usr/ccs/bin/as -P -D__svr4__ mpi-sol-sparc.s -o mpi-sol-sparc.o
/usr/ccs/bin/as -P -D__svr4__ sparcdivul3.s -o sparcdivul3.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp_divul3.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp_bfffo.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp_mulul3.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp2.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp_dblrsl3.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -c -O -I../h -I. -c   -I../h -O4 mp_dblrul3.c
rm -f libmport.a
/usr/ccs/bin/ar qc libmport.a mp_divul3.o  mp_bfffo.o mp_mulul3.o mp2.o mp_dblrsl3.o mp_dblrul3.o 
true libmport.a
rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
(cd o; make all)
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 main.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 alloc.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 gbc.c  
sgbc.c: In function `memprotect_handler':
In file included from gbc.c:1296:
sgbc.c:1096: warning: pointer/integer type mismatch in conditional expression
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bitop.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 typespec.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 eval.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 macros.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 lex.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bds.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 frame.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 predicate.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 reference.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 assignment.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bind.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 let.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 conditional.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 block.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 iteration.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 mapfun.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 prog.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 multival.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 catch.c  
../bin/dpp symbol
dpp: symbol.d -> symbol.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 symbol.c 
rm symbol.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 cfun.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 cmpaux.c  
../bin/dpp package
dpp: package.d -> package.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 package.c 
rm package.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 big.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 number.c  
number.c: In function `init_number':
number.c:237: warning: decimal constant is so large that it is unsigned
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_pred.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_comp.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_arith.c  
num_arith.c: In function `number_negate':
num_arith.c:507: warning: decimal constant is so large that it is unsigned
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_sfun.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_co.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_log.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 num_rand.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 earith.c  
../bin/dpp character
dpp: character.d -> character.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 character.c 
rm character.c
../bin/dpp sequence
dpp: sequence.d -> sequence.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 sequence.c 
rm sequence.c
../bin/dpp list
dpp: list.d -> list.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 list.c 
rm list.c
../bin/dpp hash
dpp: hash.d -> hash.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 hash.c 
rm hash.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 array.c  
../bin/dpp string
dpp: string.d -> string.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 string.c 
rm string.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 regexpr.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 structure.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 toplevel.c  
../bin/dpp file
dpp: file.d -> file.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 file.c 
rm file.c
../bin/dpp read
dpp: read.d -> read.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 read.c 
rm read.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 backq.c  
../bin/dpp print
dpp: print.d -> print.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 print.c 
rm print.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 format.c  
../bin/dpp pathname
dpp: pathname.d -> pathname.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 pathname.c 
rm pathname.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 unixfsys.c  
unixfsys.c:29: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 unixfasl.c  
unixfasl.c:76: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 error.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 unixtime.c  
In file included from unixtime.c:34:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:164: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 unixsys.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 unixsave.c  
unexelf.c: In function `unexec':
In file included from unixsave.c:32:
unexelf.c:546: warning: assignment makes pointer from integer without a cast
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 funlink.c  
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from /usr/include/rpc/auth_kerb.h:14,
                 from /usr/include/rpc/rpc.h:38,
                 from xdrfuns.c:24,
                 from funlink.c:797:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:164: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from /usr/include/rpc/auth_kerb.h:14,
                 from /usr/include/rpc/rpc.h:38,
                 from xdrfuns.c:24,
                 from funlink.c:797:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:380: warning: `PAGESIZE' redefined
../h//../h/object.h:41: warning: this is the location of the previous definition
xdrfuns.c: In function `siGxdr_write':
In file included from funlink.c:797:
xdrfuns.c:50: warning: passing arg 2 of `xdr_long' from incompatible pointer type
xdrfuns.c:67: warning: pointer type mismatch in conditional expression
xdrfuns.c:67: warning: passing arg 2 of `xdr_array' from incompatible pointer type
xdrfuns.c: In function `siGxdr_read':
xdrfuns.c:86: warning: passing arg 2 of `xdr_long' from incompatible pointer type
xdrfuns.c:106: warning: pointer type mismatch in conditional expression
xdrfuns.c:106: warning: passing arg 2 of `xdr_array' from incompatible pointer type
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 fat_string.c  
fat_string.c: In function `fSread_externals':
fat_string.c:128: warning: assignment makes integer from pointer without a cast
fat_string.c: In function `init_fat_string':
fat_string.c:366: warning: right shift count >= width of type
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 run_process.c  
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from run_process.c:37:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:164: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
run_process.c: In function `open_connection':
run_process.c:110: warning: passing arg 2 of `connect' from incompatible pointer type
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 nfunlink.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 usig.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 usig2.c  
usig2.c: In function `before_interrupt':
usig2.c:249: warning: assignment makes pointer from integer without a cast
usig2_aux.c: In function `after_interrupt':
In file included from usig2.c:299:
usig2_aux.c:3: warning: assignment makes integer from pointer without a cast
usig2_aux.c:4: warning: assignment makes integer from pointer without a cast
usig2_aux.c:5: warning: assignment makes integer from pointer without a cast
usig2_aux.c:7: warning: assignment makes integer from pointer without a cast
usig2_aux.c:8: warning: assignment makes integer from pointer without a cast
usig2_aux.c:9: warning: assignment makes integer from pointer without a cast
usig2_aux.c:16: warning: assignment makes integer from pointer without a cast
usig2_aux.c:17: warning: assignment makes integer from pointer without a cast
usig2_aux.c:18: warning: assignment makes integer from pointer without a cast
usig2_aux.c:20: warning: assignment makes integer from pointer without a cast
usig2_aux.c:21: warning: assignment makes integer from pointer without a cast
usig2_aux.c:22: warning: assignment makes integer from pointer without a cast
usig2_aux.c:23: warning: assignment makes integer from pointer without a cast
usig2_aux.c:24: warning: assignment makes integer from pointer without a cast
usig2_aux.c:25: warning: assignment makes integer from pointer without a cast
usig2_aux.c:26: warning: assignment makes integer from pointer without a cast
usig2_aux.c:27: warning: assignment makes integer from pointer without a cast
usig2_aux.c:29: warning: assignment makes integer from pointer without a cast
usig2_aux.c:32: warning: assignment makes integer from pointer without a cast
usig2_aux.c:33: warning: assignment makes integer from pointer without a cast
usig2_aux.c:34: warning: assignment makes integer from pointer without a cast
usig2_aux.c:36: warning: assignment makes integer from pointer without a cast
usig2_aux.c:37: warning: assignment makes integer from pointer without a cast
usig2_aux.c:38: warning: assignment makes integer from pointer without a cast
usig2_aux.c:40: warning: assignment makes integer from pointer without a cast
usig2_aux.c:41: warning: assignment makes integer from pointer without a cast
usig2_aux.c:42: warning: assignment makes integer from pointer without a cast
usig2_aux.c:45: warning: assignment makes integer from pointer without a cast
usig2_aux.c:46: warning: assignment makes integer from pointer without a cast
usig2_aux.c:48: warning: assignment makes integer from pointer without a cast
usig2_aux.c:52: warning: assignment makes integer from pointer without a cast
usig2_aux.c:55: warning: assignment makes integer from pointer without a cast
usig2_aux.c:56: warning: assignment makes integer from pointer without a cast
usig2_aux.c:58: warning: assignment makes integer from pointer without a cast
usig2_aux.c:59: warning: assignment makes integer from pointer without a cast
usig2_aux.c:62: warning: assignment makes integer from pointer without a cast
usig2_aux.c:64: warning: assignment makes integer from pointer without a cast
usig2_aux.c:65: warning: assignment makes integer from pointer without a cast
usig2_aux.c:66: warning: assignment makes integer from pointer without a cast
usig2_aux.c:69: warning: assignment makes integer from pointer without a cast
usig2_aux.c:70: warning: assignment makes integer from pointer without a cast
usig2_aux.c:71: warning: assignment makes integer from pointer without a cast
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 utils.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 makefun.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -I../gcl-tk -I../h/ -O4 -I/usr/openwin/include -c  sockets.c
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from sockets.c:30:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:164: warning: `MAXPATHLEN' redefined
../h//../h/notcomp.h:37: warning: this is the location of the previous definition
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from sockets.c:30:
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/sys/param.h:380: warning: `PAGESIZE' redefined
../h//../h/object.h:41: warning: this is the location of the previous definition
In file included from /usr/openwin/include/X11/Xos.h:59,
                 from clxsocket.c:19,
                 from sockets.c:505:
sockets.c:70: warning: previous external decl of `memset'
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/string.h:57: warning: type mismatch with previous implicit declaration
../gcl-tk/comm.c:39: warning: previous implicit declaration of `memset'
/usr/local/lib/gcc-lib/sparc-sun-solaris2.4/2.6.3/include/string.h:57: warning: `memset' was previously implicitly declared to return `int'
clxsocket.c: In function `connect_to_server':
In file included from sockets.c:505:
clxsocket.c:135: warning: passing arg 4 of `setsockopt' from incompatible pointer type
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 init_pari.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 sfasl.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -o grab_defs  grab_defs.c
make new_init.c "INI_FILES=`echo main.o alloc.o gbc.o  bitop.o typespec.o eval.o  macros.o lex.o bds.o  frame.o predicate.o reference.o  assignment.o bind.o let.o  conditional.o block.o iteration.o  mapfun.o prog.o multival.o  catch.o symbol.o cfun.o  cmpaux.o package.o big.o  number.o num_pred.o num_comp.o  num_arith.o num_sfun.o num_co.o  num_log.o num_rand.o earith.o  character.o  sequence.o  list.o hash.o array.o  string.o regexpr.o structure.o toplevel.o  file.o read.o backq.o  print.o format.o pathname.o  unixfsys.o unixfasl.o error.o  unixtime.o unixsys.o unixsave.o  funlink.o   fat_string.o ./run_process.o  nfunlink.o usig.o usig2.o utils.o  makefun.o sockets.o   init_pari.o   ./sfasl.o  | sed -e 's:\.o:.ini:g'  -e 's:new_init.o::g' `"
`new_init.c' is up to date.
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bcmp.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bcopy.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 bzero.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 new_init.c  
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c -O -I../gcl-tk -I../h/ -O4 user_init.c  
rm -f gcllib.a
/usr/ccs/bin/ar qc gcllib.a bcmp.o bcopy.o bzero.o user_init.o 
true gcllib.a
(cd lsp; make all)
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h arraylib.c
cat ../h/secondary_sun_magic arraylib.data >> arraylib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h assert.c
cat ../h/secondary_sun_magic assert.data >> assert.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h defmacro.c
cat ../h/secondary_sun_magic defmacro.data >> defmacro.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h defstruct.c
cat ../h/secondary_sun_magic defstruct.data >> defstruct.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h describe.c
cat ../h/secondary_sun_magic describe.data >> describe.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h evalmacros.c
cat ../h/secondary_sun_magic evalmacros.data >> evalmacros.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h iolib.c
cat ../h/secondary_sun_magic iolib.data >> iolib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h listlib.c
cat ../h/secondary_sun_magic listlib.data >> listlib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h mislib.c
cat ../h/secondary_sun_magic mislib.data >> mislib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h module.c
cat ../h/secondary_sun_magic module.data >> module.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h numlib.c
cat ../h/secondary_sun_magic numlib.data >> numlib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h packlib.c
cat ../h/secondary_sun_magic packlib.data >> packlib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h predlib.c
cat ../h/secondary_sun_magic predlib.data >> predlib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h seq.c
cat ../h/secondary_sun_magic seq.data >> seq.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h seqlib.c
cat ../h/secondary_sun_magic seqlib.data >> seqlib.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h setf.c
cat ../h/secondary_sun_magic setf.data >> setf.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h top.c
cat ../h/secondary_sun_magic top.data >> top.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h trace.c
cat ../h/secondary_sun_magic trace.data >> trace.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h sloop.c
cat ../h/secondary_sun_magic sloop.data >> sloop.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h debug.c
cat ../h/secondary_sun_magic debug.data >> debug.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h info.c
cat ../h/secondary_sun_magic info.data >> info.o
(cd cmpnew; make all)
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpbind.c
cat ../h/secondary_sun_magic cmpbind.data >> cmpbind.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpblock.c
cat ../h/secondary_sun_magic cmpblock.data >> cmpblock.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpcall.c
cat ../h/secondary_sun_magic cmpcall.data >> cmpcall.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpcatch.c
cat ../h/secondary_sun_magic cmpcatch.data >> cmpcatch.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpenv.c
cat ../h/secondary_sun_magic cmpenv.data >> cmpenv.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpeval.c
cat ../h/secondary_sun_magic cmpeval.data >> cmpeval.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpflet.c
cat ../h/secondary_sun_magic cmpflet.data >> cmpflet.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpfun.c
cat ../h/secondary_sun_magic cmpfun.data >> cmpfun.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpif.c
cat ../h/secondary_sun_magic cmpif.data >> cmpif.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpinline.c
cat ../h/secondary_sun_magic cmpinline.data >> cmpinline.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmplabel.c
cat ../h/secondary_sun_magic cmplabel.data >> cmplabel.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmplam.c
cat ../h/secondary_sun_magic cmplam.data >> cmplam.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmplet.c
cat ../h/secondary_sun_magic cmplet.data >> cmplet.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmploc.c
cat ../h/secondary_sun_magic cmploc.data >> cmploc.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpmap.c
cat ../h/secondary_sun_magic cmpmap.data >> cmpmap.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpmulti.c
cat ../h/secondary_sun_magic cmpmulti.data >> cmpmulti.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpspecial.c
cat ../h/secondary_sun_magic cmpspecial.data >> cmpspecial.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmptag.c
cat ../h/secondary_sun_magic cmptag.data >> cmptag.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmptop.c
cat ../h/secondary_sun_magic cmptop.data >> cmptop.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmptype.c
cat ../h/secondary_sun_magic cmptype.data >> cmptype.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmputil.c
cat ../h/secondary_sun_magic cmputil.data >> cmputil.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpvar.c
cat ../h/secondary_sun_magic cmpvar.data >> cmpvar.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpvs.c
cat ../h/secondary_sun_magic cmpvs.data >> cmpvs.o
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -O -c   -I../h cmpwt.c
cat ../h/secondary_sun_magic cmpwt.data >> cmpwt.o
(cd unixport; make saved_gcl)
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char -c   -I../h sys_gcl.c
gcc -I/dumps/qobi/lisps/gcl-2.1/o -static -DVOL=volatile -fsigned-char  -o raw_gcl ../o/main.o ../o/alloc.o ../o/gbc.o  ../o/bitop.o ../o/typespec.o ../o/eval.o  ../o/macros.o ../o/lex.o ../o/bds.o  ../o/frame.o ../o/predicate.o ../o/reference.o  ../o/assignment.o ../o/bind.o ../o/let.o  ../o/conditional.o ../o/block.o ../o/iteration.o  ../o/mapfun.o ../o/prog.o ../o/multival.o  ../o/catch.o ../o/symbol.o ../o/cfun.o  ../o/cmpaux.o ../o/package.o ../o/big.o  ../o/number.o ../o/num_pred.o ../o/num_comp.o  ../o/num_arith.o ../o/num_sfun.o ../o/num_co.o  ../o/num_log.o ../o/num_rand.o ../o/earith.o  ../o/character.o  ../o/sequence.o  ../o/list.o ../o/hash.o ../o/array.o  ../o/string.o ../o/regexpr.o ../o/structure.o ../o/toplevel.o  ../o/file.o ../o/read.o ../o/backq.o  ../o/print.o ../o/format.o ../o/pathname.o  ../o/unixfsys.o ../o/unixfasl.o ../o/error.o  ../o/unixtime.o ../o/unixsys.o ../o/unixsave.o  ../o/funlink.o   ../o/fat_string.o ../o/run_process.o  ../o/nfunlink.o ..!
 /o/usig.o ../o/usig2.o ../o/utils.o  ../o/makefun.o ../o/sockets.o   ../o/init_pari.o ../o/new_init.o ../mp/mpi-sol-sparc.o ../mp/sparcdivul3.o ../mp/libmport.a ../o/sfasl.o  ../lsp/defmacro.o ../lsp/evalmacros.o ../lsp/top.o  ../lsp/module.o ../lsp/predlib.o ../lsp/setf.o  ../lsp/arraylib.o ../lsp/assert.o ../lsp/defstruct.o  ../lsp/describe.o ../lsp/iolib.o ../lsp/listlib.o  ../lsp/mislib.o ../lsp/numlib.o ../lsp/packlib.o  ../lsp/seq.o ../lsp/seqlib.o ../lsp/trace.o  ../lsp/sloop.o  ../lsp/debug.o ../lsp/info.o ../cmpnew/cmpinline.o ../cmpnew/cmputil.o ../cmpnew/cmptype.o  ../cmpnew/cmpbind.o ../cmpnew/cmpblock.o ../cmpnew/cmpcall.o  ../cmpnew/cmpcatch.o ../cmpnew/cmpenv.o ../cmpnew/cmpeval.o  ../cmpnew/cmpflet.o ../cmpnew/cmpfun.o ../cmpnew/cmpif.o  ../cmpnew/cmplabel.o ../cmpnew/cmplam.o ../cmpnew/cmplet.o  ../cmpnew/cmploc.o ../cmpnew/cmpmap.o ../cmpnew/cmpmulti.o  ../cmpnew/cmpspecial.o ../cmpnew/cmptag.o ../cmpnew/cmptop.o  ../cmpnew/cmpvar.o ../cmpnew/cmpvs.o ../cm!
 pnew/cmpwt.o  sys_gcl.o -lc -lm -lsocket -lnsl  ../o/gcllib.a
ld: fatal: symbol `shifts' is multiply defined:
  (file ../mp/libmport.a(mp2.o) and file /usr/lib/libnsl.a(des_soft.o));
ld: fatal: File processing errors.  No output written to raw_gcl
*** Error code 1
make: Fatal error: Command failed for target `raw_gcl'
Current working directory /dumps/qobi/lisps/gcl-2.1/unixport
*** Error code 1
make: Fatal error: Command failed for target `all'
597.0u 70.0s 12:31 88% 0+0k 0+0io 0pf+0w
qobi@eesun>


From owner-gcl@cli.com  Tue Feb 27 13:25:10 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA20939; Tue, 27 Feb 96 13:25:10 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA25219; Tue, 27 Feb 96 13:20:15 CST
Received: from fountain.village.org by cli.com (4.1/SMI-4.1)
	id AA25213; Tue, 27 Feb 96 13:20:07 CST
Received: from localhost (localhost [127.0.0.1]) by fountain.village.org (8.6.11/8.6.6) with SMTP id MAA12294 for <gcl@cli.com>; Tue, 27 Feb 1996 12:20:01 -0700
Message-Id: <199602271920.MAA12294@fountain.village.org>
To: gcl@cli.com
Subject: documentation bugs; using select(3)
Date: Tue, 27 Feb 1996 12:20:00 -0700
From: Dieter Dworkin Muller <dworkin@village.org>
Sender: owner-gcl@cli.com
Precedence: bulk


BUGS:
The info-file entry for FORMAT is horribly garbled; it looks to be a
problem with incorrectly-escaped characters in io.texi, but I'm not in
a position to verify this.

(bye) is documented to take no arguments.  However, it does accept
one, which is used as the exit status.

QUESTION:
Is anyone interested in select-based i/o for GCL?  This is needed
for handling multiple simultaneous i/o streams, such as accepting
input from multiple users/processes at once.  I've got a kludge that
works fairly well for for reading, but haven't generalized it yet.  If
there's interest, I'll go that, and work on the unbuffered input
problem that goes with it (such as for single-key triggered menus).

	Dworkin

From owner-gcl@cli.com  Wed Feb 28 10:40:06 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21272; Wed, 28 Feb 96 10:40:06 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA12292; Wed, 28 Feb 96 10:36:08 CST
Received: from mycroft.caos.aamu.edu ([198.180.133.20]) by cli.com (4.1/SMI-4.1)
	id AA12286; Wed, 28 Feb 96 10:36:04 CST
Received: by mycroft.caos.aamu.edu
	id m0trorK-0000YeC
	(Debian /\oo/\ Smail3.1.29.1 #29.36); Wed, 28 Feb 96 10:36 CST
Message-Id: <m0trorK-0000YeC@mycroft.caos.aamu.edu>
From: krs@caos.aamu.edu (Karl R. Sackett)
Subject: gcl 2.2 compile fails under Linux
To: gcl@cli.com
Date: Wed, 28 Feb 1996 10:36:10 -0600 (CST)
X-Mailer: ELM [version 2.4 PL25 PGP2]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 1132      
Sender: owner-gcl@cli.com
Precedence: bulk

I'm using gcc 2.7.2 under Linux 1.3.57.  When I compile gcl this is what
happens:

gcc -pipe -fwritable-strings  -DVOL=volatile -I/home/krs/src/gcl/gcl-2.2/o -fsig
ned-char -c -O  -I../gcl-tk -I../h/ -O4   gbc.c
In file included from sgbc.c:14,
                 from gbc.c:1321:
/usr/include/sys/mman.h:11: warning: `MAP_FILE' redefined
/usr/include/asm/mman.h:29: warning: this is the location of the previous defini
tion
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1124: dereferencing pointer to incomplete type
make[1]: *** [gbc.o] Error 1
make[1]: Leaving directory `/home/krs/src/gcl/gcl-2.2/o'
make: *** [all] Error 2    

In the mailing list archive I found a fix for this under Solaris, but
no mention of other Linux users with this problem.  (I tried the Solaris
fix.  It didn't work.)

Any suggestions?
-- 
Karl R. Sackett                                        krs@caos.aamu.edu
Run silent, run deep

From owner-gcl@cli.com  Wed Feb 28 20:02:35 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21352; Wed, 28 Feb 96 20:02:35 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA13925; Wed, 28 Feb 96 19:58:52 CST
Received: from euler.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA13919; Wed, 28 Feb 96 19:58:38 CST
Received: (billm@localhost) by euler.maths.monash.edu.au (8.6.12/8.6.4) id MAA03214 for gcl@cli.com; Thu, 29 Feb 1996 12:58:05 +1100
Date: Thu, 29 Feb 1996 12:58:05 +1100
From: WE Metzenthen <billm@euler.maths.monash.edu.au>
Message-Id: <199602290158.MAA03214@euler.maths.monash.edu.au>
To: gcl@cli.com
Subject: Re: gcl 2.2 compile fails under Linux
Sender: owner-gcl@cli.com
Precedence: bulk

Karl R. Sackett (krs@caos.aamu.edu) wrote:

> I'm using gcc 2.7.2 under Linux 1.3.57.  When I compile gcl this is what
happens:
[...]
> sgbc.c: In function `memprotect_handler':
> sgbc.c:1124: dereferencing pointer to incomplete type
> make[1]: *** [gbc.o] Error 1
[...]

In case something wierd has happened in recent kernels, I tried compiling
gcl-2.2 again and it succeeded:

gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/local/lisp/gcl/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   gbc.c
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast

i.e. nothing has changed.

My current kernel is 1.3.68, libc is 5.3.0, gcc is 2.7.0, and the system
is all ELF.

Are you running a non-ELF system?


--Bill

From owner-gcl@cli.com  Thu Feb 29 07:29:06 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21605; Thu, 29 Feb 96 07:29:06 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA23685; Thu, 29 Feb 96 07:26:13 CST
Received: from mycroft.caos.aamu.edu ([198.180.133.20]) by cli.com (4.1/SMI-4.1)
	id AA23679; Thu, 29 Feb 96 07:26:08 CST
Received: by mycroft.caos.aamu.edu
	id m0ts8N3-0000YeC
	(Debian /\oo/\ Smail3.1.29.1 #29.36); Thu, 29 Feb 96 07:26 CST
Message-Id: <m0ts8N3-0000YeC@mycroft.caos.aamu.edu>
From: krs@caos.aamu.edu (Karl R. Sackett)
Subject: Re: gcl 2.2 compile fails under Linux
To: gcl@cli.com
Date: Thu, 29 Feb 1996 07:26:12 -0600 (CST)
In-Reply-To: <199602290158.MAA03214@euler.maths.monash.edu.au> from "WE Metzenthen" at Feb 29, 96 12:58:05 pm
X-Mailer: ELM [version 2.4 PL25 PGP2]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 909       
Sender: owner-gcl@cli.com
Precedence: bulk

WE Metzenthen writes:
> 
> In case something wierd has happened in recent kernels, I tried compiling
> gcl-2.2 again and it succeeded:
> 
> gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/src/local/lisp/gcl/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   gbc.c
> sgbc.c: In function `sgc_quit':
> In file included from gbc.c:1321:
> sgbc.c:1072: warning: assignment makes pointer from integer without a cast
> sgbc.c:1074: warning: assignment makes integer from pointer without a cast
> 
> i.e. nothing has changed.
> 
> My current kernel is 1.3.68, libc is 5.3.0, gcc is 2.7.0, and the system
> is all ELF.
> 
> Are you running a non-ELF system?

All ELF here.  I'm using gcc 2.7.2 and libc 5.2.18.  Was there a change
between libc 5.2.18 and 5.3.0 that would account for my compilation
problem?

-- 
Karl R. Sackett                                        krs@caos.aamu.edu
Run silent, run deep

From owner-gcl@cli.com  Thu Feb 29 13:23:55 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21642; Thu, 29 Feb 96 13:23:55 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02354; Thu, 29 Feb 96 13:22:01 CST
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA02319; Thu, 29 Feb 96 13:21:52 CST
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id NAA02648; Thu, 29 Feb 1996 13:21:38 -0600 (CST)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id MAA01856; Thu, 29 Feb 1996 12:12:52 -0600 (CST)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.8/8.6.4) with ESMTP id NAA12767; Thu, 29 Feb 1996 13:15:01 -0500
To: krs@caos.aamu.edu (Karl R. Sackett)
Cc: gcl@cli.com
References: <m0ts8N3-0000YeC@mycroft.caos.aamu.edu> 
Subject: Re: gcl 2.2 compile fails under Linux 
In-Reply-To: (Your message of Thu, 29 Feb 1996 07:26:12 CST.)
             <m0ts8N3-0000YeC@mycroft.caos.aamu.edu> 
Date: Thu, 29 Feb 1996 13:10:49 -0500
Message-Id: <4462.825617449@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk


[problems compiling gcl 2.2 with ELF deleted]

    Karl> All ELF here.  I'm using gcc 2.7.2 and libc 5.2.18.  Was there a change
    Karl> between libc 5.2.18 and 5.3.0 that would account for my compilation
    Karl> problem?

I successfully compiled gcl 2.2 (with my really hacked up half a.out,
half ELF system) using gcc 2.7.2 and libc 5.2.16.  Did you get the
patches for gcl 2.2 that are on the gcl site?  That might help.  It
certainly helped me with the problem I had with loading compiled lisp
files. 

Ray

From owner-gcl@cli.com  Thu Feb 29 16:15:37 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA21715; Thu, 29 Feb 96 16:15:37 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA09757; Thu, 29 Feb 96 16:13:19 CST
Received: from Rincewind (ossian.arch.su.EDU.AU) by cli.com (4.1/SMI-4.1)
	id AA09751; Thu, 29 Feb 96 16:12:47 CST
Received: from Rincewind (thorsten@Rincewind [127.0.0.1]) by Rincewind (8.6.12/8.6.9) with SMTP id JAA01103; Fri, 1 Mar 1996 09:15:08 +1100
Message-Id: <31362569.2A98B7BE@arch.su.edu.au>
Date: Fri, 01 Mar 1996 09:15:05 +1100
From: Thorsten Schnier <thorsten@arch.su.edu.au>
X-Mailer: Mozilla 2.0 (X11; I; Linux 1.3.20 i486)
Mime-Version: 1.0
To: gcl@cli.com
Subject: Re: gcl 2.2 compile fails under Linux 
References: <m0ts8N3-0000YeC@mycroft.caos.aamu.edu>  <4462.825617449@rtp.ericsson.se>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk

Raymond Toy wrote:
> 
> [problems compiling gcl 2.2 with ELF deleted]
> 
>     Karl> All ELF here.  I'm using gcc 2.7.2 and libc 5.2.18.  Was there a change
>     Karl> between libc 5.2.18 and 5.3.0 that would account for my compilation
>     Karl> problem?
> 
> I successfully compiled gcl 2.2 (with my really hacked up half a.out,
> half ELF system) using gcc 2.7.2 and libc 5.2.16.  Did you get the
> patches for gcl 2.2 that are on the gcl site?  That might help.  It
> certainly helped me with the problem I had with loading compiled lisp
> files.
> 
> Ray

I did manage to compile 2.2. on a linux ELF system, using the 
patches provided. But in the (patched) 386-linux.h, i had to 
undo the following change:

-/* #include <asm/sigcontext.h> */
#include <asm/signal.h>

i.e. I had to use sigcontext.h instead of signal.h (that's how it
was in the unpatched files).

Unfortunately, I can't remember what (compiler) error I got that
required that change.

(I am running 1.3.20, gcc 2.7.0)


thorsten

(BTW: using the patches, we didn't have any problems with Solaris)

----------------------------------------------------------------------- 
       \    C                                       
        \   O                                          Thorsten Schnier
         \  M                       
     /\   \ P                            Key Centre of Design Computing
    /     / U                                      University of Sydney
    \    /  T                                                  NSW 2006
     \  /   I                      
      \/    N                                   thorsten@arch.su.edu.au 
    DESIGN  G                      http://www.arch.su.edu.au/~thorsten/
  key centre

From owner-gcl@cli.com  Fri Mar  1 08:49:59 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com (4.1/SMI-4.1)
	id AA22089; Fri, 1 Mar 96 08:49:59 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA26010; Fri, 1 Mar 96 08:45:25 CST
Received: from mycroft.caos.aamu.edu ([198.180.133.20]) by cli.com (4.1/SMI-4.1)
	id AA26004; Fri, 1 Mar 96 08:45:21 CST
Received: by mycroft.caos.aamu.edu
	id m0tsW5B-0000XVC
	(Debian /\oo/\ Smail3.1.29.1 #29.36); Fri, 1 Mar 96 08:45 CST
Message-Id: <m0tsW5B-0000XVC@mycroft.caos.aamu.edu>
From: krs@caos.aamu.edu (Karl R. Sackett)
Subject: Re: gcl 2.2 compile fails under Linux
To: gcl@cli.com
Date: Fri, 1 Mar 1996 08:45:21 -0600 (CST)
In-Reply-To: <31362569.2A98B7BE@arch.su.edu.au> from "Thorsten Schnier" at Mar 1, 96 09:15:05 am
X-Mailer: ELM [version 2.4 PL25 PGP2]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Content-Length: 594       
Sender: owner-gcl@cli.com
Precedence: bulk

Thorsten Schnier writes:
> 
> I did manage to compile 2.2. on a linux ELF system, using the 
> patches provided. But in the (patched) 386-linux.h, i had to 
> undo the following change:
> 
> -/* #include <asm/sigcontext.h> */
> #include <asm/signal.h>
> 
> i.e. I had to use sigcontext.h instead of signal.h (that's how it
> was in the unpatched files).

Yes, I did have the patches installed.  When I made the change in
386-linux.h as you suggested it compiled correctly.

Thanks for your help.
-- 
Karl R. Sackett                                        krs@caos.aamu.edu
Run silent, run deep

From owner-gcl@cli.com  Mon Mar  4 16:46:03 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA01286; Mon, 4 Mar 96 16:46:03 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA01302; Mon, 4 Mar 96 16:34:03 CST
Received: from cbisinet.cbis.com by cli.com (4.1/SMI-4.1)
	id AA01289; Mon, 4 Mar 96 16:32:30 CST
Received: from topgun.p2k.cbis.com by cbisinet.cbis.com (5.x/SMI-SVR4)
	id AA01771; Mon, 4 Mar 1996 17:32:22 -0500
Received: from spock.p2k.cbis.com (spock.p2k.cbis.com [155.90.183.87]) by topgun.p2k.cbis.com (8.7/8.7) with ESMTP id RAA18412 for <gcl@cli.com>; Mon, 4 Mar 1996 17:30:59 -0500 (EST)
From: Steve Weagraff <sweagraf@cbis.com>
Received: (from sweagraf@localhost) by spock.p2k.cbis.com (8.7.1/8.7.1) id RAA25478 for gcl@cli.com; Mon, 4 Mar 1996 17:30:57 -0500 (EST)
Date: Mon, 4 Mar 1996 17:30:57 -0500 (EST)
Message-Id: <199603042230.RAA25478@spock.p2k.cbis.com>
To: gcl@cli.com
Subject: Error compiling gcl-2.2 on Solaris with gcc 2.7.2
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Content-Md5: jx1xEr9qKoupRt6oirgiKQ==
Sender: owner-gcl@cli.com
Precedence: bulk

I received the following error trying to compile on Solaris with gcc 2.7.2

Any Ideas ??


gcc -I/p2k/1.1/midware/research/gcl/gcl-2.2/o -static -DVOL=volatile 
-fsigned-char -c -O -I../gcl-tk -I../h/ -O4 gbc.c  
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1125: void value not ignored as it ought to be
*** Error code 1
make: Fatal error: Command failed for target `gbc.o'


Steve Weagraff
sweagraf@cbis.com

From owner-gcl@cli.com  Thu Mar  7 01:15:44 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02260; Thu, 7 Mar 96 01:15:44 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA23266; Thu, 7 Mar 96 01:10:09 CST
Received: from ami4000.hei.co.kr by cli.com (4.1/SMI-4.1)
	id AA23247; Thu, 7 Mar 96 01:10:03 CST
Received: from ami2000.hei.co.kr (ami2000 [202.30.128.12]) by ami4000.hei.co.kr (8.6.12h2/8.6.9) with SMTP id QAA03938 for <gcl@cli.com>; Thu, 7 Mar 1996 16:09:44 +0900
Received: by ami2000.hei.co.kr (4.1/SMI-4.1)
	id AA28012; Thu, 7 Mar 96 16:11:09 KST
From: dhyangcs@ami2000.hei.co.kr (DanHee Yang(81-20-4603))
Message-Id: <9603070711.AA28012@ami2000.hei.co.kr>
Subject: How can I use CLOS syntax?
To: gcl@cli.com
Date: Thu, 7 Mar 1996 16:11:08 +0900 (KST)
X-Mailer: ELM [version 2.4 PL21-h3]
Content-Type: text
Content-Length: 573       
Sender: owner-gcl@cli.com
Precedence: bulk


Hello,

I installed gcl-2.1 and pcl-gcl-2.1, but I can't use CLOS syntax.

If I enter gcl and execute the following statement:
(defclass person ()
  ((name :accessor person-name)))

I met the error message, "Error: The function DEFCLASS is undefined".

What should I do?  What should I read to make it correctly?

Thank you very much in advance.

 ///  Danny   ///  Tel:(02)3449-0423  Fax:(02)3449-0593
 \ //   Yang /// 
  \ ///     //     
   \_ //// /  /    
    \_NLL&NLU /     
    /   Man   \_ 
   /,)-_(  \_   \
   (/   \\ /\\\\ 
         //      
        =((=     

From owner-gcl@cli.com  Thu Mar  7 05:24:02 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02286; Thu, 7 Mar 96 05:24:02 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA06589; Thu, 7 Mar 96 05:19:07 CST
Received: from mtlsim.mit.edu by cli.com (4.1/SMI-4.1)
	id AA06581; Thu, 7 Mar 96 05:19:03 CST
Received: by mtlsim.mit.edu; (5.65/1.1.8.2/25Jul95-0542PM)
	id AA21132; Thu, 7 Mar 1996 06:19:00 -0500
Date: Thu, 7 Mar 1996 06:19:00 -0500
From: Michael McIlrath <mbm@hotswap.mit.edu>
Message-Id: <9603071119.AA21132@mtlsim.mit.edu>
To: gcl@cli.com, owner-gcl@cli.com
Subject: Re:  How can I use CLOS syntax?
Sender: owner-gcl@cli.com
Precedence: bulk

did you (use-package :pcl) or (use-package :clos)?

From owner-gcl@cli.com  Thu Mar  7 09:49:48 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02343; Thu, 7 Mar 96 09:49:48 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07248; Thu, 7 Mar 96 09:46:44 CST
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA07193; Thu, 7 Mar 96 09:41:11 CST
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.10/8.6.12) with SMTP id PAA10759; Thu, 7 Mar 1996 15:38:20 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 7 Mar 96 15:37:19 GMT
Date: Thu, 7 Mar 96 15:37:18 GMT
Message-Id: <2230.9603071537@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re:  How can I use CLOS syntax?
To: Michael McIlrath <mbm@hotswap.mit.edu>, gcl@cli.com
In-Reply-To: Michael McIlrath's message of Thu, 7 Mar 1996 06:19:00 -0500
Sender: owner-gcl@cli.com
Precedence: bulk

> did you (use-package :pcl) or (use-package :clos)?

Up to gcl 1.1 (at least) (I think), it was (use-package :pcl).

Note that you can call (list-all-packages) to see what
packages exist and can use do-external-symbols to see
what they export.  Apropos is also useful.  For instance
(apropos "DEFCLASS") would probably tell you what package
was right.  (Need to check this.)

(Sorry if you already know all this, but some people on the
list might not.)

-- jeff


From owner-gcl@cli.com  Thu Mar  7 16:44:21 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02435; Thu, 7 Mar 96 16:44:21 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08571; Thu, 7 Mar 96 16:40:41 CST
Received: from ludwig.pmad.uic.edu by cli.com (4.1/SMI-4.1)
	id AA08565; Thu, 7 Mar 96 16:40:36 CST
Received: by ludwig.pmad.uic.edu (NX5.67d/NeXT-2.0)
	id AA16480; Thu, 7 Mar 96 16:29:04 -0600
Date: Thu, 7 Mar 96 16:29:04 -0600
From: bruce@ludwig.pmad.uic.edu (Bruce Lambert)
Message-Id: <9603072229.AA16480@ludwig.pmad.uic.edu>
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: Compiling GCL 2.2 for NeXTStep 3.2 with Motorola 68K processor
Sender: owner-gcl@cli.com
Precedence: bulk

Hi,

Has anyone sucessfully compiled GCL 2.2 for a NeXT running NeXTstep 3.2 with a  
motorola 68K processor and gcc 2.7.2? If so, could you drop me a line?

Bruce Lambert
University of Illinois at Chicago

From owner-gcl@cli.com  Thu Mar  7 18:31:18 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02483; Thu, 7 Mar 96 18:31:18 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA08799; Thu, 7 Mar 96 18:28:52 CST
Received: from ness.arch.su.EDU.AU by cli.com (4.1/SMI-4.1)
	id AA08793; Thu, 7 Mar 96 18:27:32 CST
Received: from ossian (ossian [129.78.66.222]) by ness.arch.su.EDU.AU (8.6.12/8.6.12) with SMTP id LAA21879; Fri, 8 Mar 1996 11:27:10 +1100
From: Thorsten Schnier <thorsten@arch.su.EDU.AU>
Received: by ossian (5.x) id AA13628; Fri, 8 Mar 1996 11:27:01 +1100
Message-Id: <9603080027.AA13628@ossian>
Subject: Re: Linux patches for gcl
To: wnewman@netcom.com (Bill Newman)
Date: Fri, 8 Mar 1996 11:27:01 +1100 (EST)
Cc: gcl@cli.com
In-Reply-To: <199603071801.KAA16640@netcom6.netcom.com> from "Bill Newman" at Mar 7, 96 10:01:45 am
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Sender: owner-gcl@cli.com
Precedence: bulk

> 
> Raymond Toy wrote on the gcl mailing list
> 
> >I successfully compiled gcl 2.2 (with my really hacked up half a.out,
> >half ELF system) using gcc 2.7.2 and libc 5.2.16.  Did you get the
> >patches for gcl 2.2 that are on the gcl site?  That might help.  It
> >certainly helped me with the problem I had with loading compiled lisp
> >files.
> 
> and judging from their responses, Thorsten Schnier and Karl R. Sackett
> were able to figure out what he meant.  I myself am confused.  Is
> "ftp.cli.com:/pub/gcl" the gcl site in question?  What would the
> patches be called?  I went to ftp.cli.com and downloaded what appear
> to gcl 2.2 sources and general gcl info files, but I didn't see
> anything that looked like linux patches to download.  
> 
> Thanks for any help,
> 
>   Bill Newman
>   wnewman@netcom.com
> 

Get ftp://ftp.ma.utexas.edu/pub/gcl/gcl-2.2-fixes.tgz , an unpack that
over the gcl-2.2 distribution. Then undo the change in the include, and
make, that should work. This is not a linux-only patch, it includes changes
for other OS's as well. Maybe the problems some people have with Solaris
are related to that, too, as we compilled it without problems. (I don't
know why that file is at the utexas site, but not at cli.com).

thorsten






From owner-gcl@cli.com  Fri Mar  8 09:22:25 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02761; Fri, 8 Mar 96 09:22:25 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA28858; Fri, 8 Mar 96 09:17:13 CST
Received: from rs2.hrz.th-darmstadt.de ([130.83.22.63]) by cli.com (4.1/SMI-4.1)
	id AA28852; Fri, 8 Mar 96 09:17:07 CST
Received: from mailhost.rs.E-Technik.TH-Darmstadt.DE (clyde.rs.e-technik.th-darmstadt.de [130.83.34.38]) by rs2.hrz.th-darmstadt.de (8.6.12/8.6.12.1ms) with SMTP id QAA36394 for <gcl@cli.com>; Fri, 8 Mar 1996 16:16:51 +0100
Received: from magnum.rs.E-Technik.TH-Darmstadt.DE by mailhost.rs.E-Technik.TH-Darmstadt.DE (5.x/SMI-SVR4)
	id AA14080; Fri, 8 Mar 1996 16:14:25 +0100
Received: by magnum.rs.E-Technik.TH-Darmstadt.DE (5.x/SMI-SVR4)
	id AA04585; Fri, 8 Mar 1996 16:13:04 +0100
Date: Fri, 8 Mar 1996 16:13:04 +0100
From: sth@magnum.rs.E-Technik.TH-Darmstadt.DE (Stefan Hoereth)
Message-Id: <9603081513.AA04585@magnum.rs.E-Technik.TH-Darmstadt.DE>
To: gcl@cli.com
Subject: faslink for Solaris?
X-Sun-Charset: US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk


Hi,

  I'm a little bit confused if it is possible to load (compiled) c-code
into gcl on a Solaris2.x machine?

The manual says: "On some systems it is possible with faslink...
but in general this practice is not portable."

My question: Is Solaris2.x the "general case" - even if we have the
  Sun incremental linker?

Please forgive me if this was a stupid question!

Stefan

sth@rs.e-technik.th-darmstadt.de

--

From owner-gcl@cli.com  Fri Mar  8 11:54:04 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02804; Fri, 8 Mar 96 11:54:04 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA29478; Fri, 8 Mar 96 11:49:37 CST
Received: from fountain.village.org by cli.com (4.1/SMI-4.1)
	id AA29472; Fri, 8 Mar 96 11:49:31 CST
Received: from localhost (localhost [127.0.0.1]) by fountain.village.org (8.6.11/8.6.6) with SMTP id KAA07927 for <gcl@cli.com>; Fri, 8 Mar 1996 10:49:16 -0700
Message-Id: <199603081749.KAA07927@fountain.village.org>
To: gcl@cli.com
Subject: Re: faslink for Solaris? 
In-Reply-To: Your message of Fri, 08 Mar 1996 16:13:04 +0100
Date: Fri, 08 Mar 1996 10:49:16 -0700
From: Dieter Dworkin Muller <dworkin@village.org>
Sender: owner-gcl@cli.com
Precedence: bulk


sth@magnum.rs.E-Technik.TH-Darmstadt.DE (Stefan Hoereth) wrote:
:  
:    I'm a little bit confused if it is possible to load (compiled) c-code
:  into gcl on a Solaris2.x machine?


Works for me on 2.3 and 2.4.  However, you have to have compiled on
2.3 for it to work on 2.3, or 2.4 to work on 2.4.  This isn't
loading-specific, several other things fail when running on a
different minor revision of Solaris than gcl was compiled on.  This
is most likely a Solaris bug, rather than a gcl bug.

If you're having specific problems, send me details and I'll see what
I can come up with.

	Dworkin

From owner-gcl@cli.com  Sat Mar  9 15:03:00 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA03599; Sat, 9 Mar 96 15:03:00 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA21526; Sat, 9 Mar 96 14:58:20 CST
Received: from punish.uun.org ([198.178.229.23]) by cli.com (4.1/SMI-4.1)
	id AA21520; Sat, 9 Mar 96 14:58:16 CST
Received: (from rtm@localhost) by punish.uun.org (8.7.3/8.6.11) id PAA04279; Sat, 9 Mar 1996 15:58:13 -0500 (EST)
Date: Sat, 9 Mar 1996 15:58:13 -0500 (EST)
From: Robert Morris <rtm@uun.org>
Message-Id: <199603092058.PAA04279@punish.uun.org>
To: gcl@cli.com
Subject: finish-output should call fsync()
Sender: owner-gcl@cli.com
Precedence: bulk

I'm trying to store data reliably in files: I don't want to be screwed
up by the system crashing after I create (truncate) the file but
before I've finished writing the new contents. My approach is to write
all the data to a temporary file and then call rename-file. However,
I'd like to make sure the data is on disk before
renaming. finish-output should do this: CLTL1 says it doesn't return
until the data has reached its destination. But the GCL implementation
just calls fflush(), which just asks UNIX to write the data to disk
whenever convenient. I'd like finish-output to also call fsync(),
which waits until UNIX has written the data to disk.

This involves adding this line

  fsync(fileno(strm->sm.sm_fp));

after the call to fflush(strm->sm.fm_fp) in flush_stream() in
o/file.d.  This will also affect force-output; perhaps flush_stream
should take an extra argument saying whether to wait.

Thanks,
Robert Morris

From owner-gcl@cli.com  Wed Mar 13 04:38:33 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA08893; Wed, 13 Mar 96 04:38:33 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA26785; Wed, 13 Mar 96 04:29:19 CST
Received: from cgl.ucsf.EDU ([128.218.14.2]) by cli.com (4.1/SMI-4.1)
	id AA26779; Wed, 13 Mar 96 04:29:16 CST
Received: from stockmayer.ucsf.edu (stockmayer.ucsf.EDU [128.218.2.14]) by cgl.ucsf.EDU (8.6.12/GSC4.24) with SMTP
	id CAA19128 for <gcl@cli.com>; Wed, 13 Mar 1996 02:29:15 -0800
From: yue@maxwell.ucsf.EDU
Received: by stockmayer.ucsf.edu (4.1/GSC4.23)
	id AA21502; Wed, 13 Mar 96 02:29:51 PST
Date: Wed, 13 Mar 96 02:29:51 PST
Message-Id: <9603131029.AA21502@stockmayer.ucsf.edu>
To: gcl@cli.com
Subject: Problem in compiling gcl-2.1 with gcc 2.7.0
Sender: owner-gcl@cli.com
Precedence: bulk

Hi, 

  I have problem compiling GCL-2.1 with GCC 2.7.0. Your help is greatly
appreciated.

  In the past, I successfully compiled gcl-2.1 with gcc 2.5.7. However,
recently when I use gcc 2.7.0 to compile, the compilation got an error when
it tries to make raw_gcl. The error msg is as follows:

 gcc -pipe -fwritable-strings  -DVOL=volatile -I/par4/gcl-2.1/o -fsigned-char -static   -o raw_gcl .. [... more file names omitted]  ../cmpnew/cmpspecial.o ../cmpnew/cmptag.o ../cmpnew/cmptop.o ../cmpnew/cmpvar.o ../cmpnew/cmpvs.o ../cmpnew/cmpwt.o  sys_gcl.o -lc	 -lm   ../o/gcllib.a
../o/big.o(.text+0x31b): undefined reference to `addsi'
../o/big.o(.text+0x49b): undefined reference to `mulsi'
../o/big.o(.text+0x55e): undefined reference to `divis'
../o/big.o(.text+0x619): undefined reference to `addii'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x336): undefined reference to `_avma'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x8db): undefined reference to `_mulul3'
../mp/mpi-386d.o(.text+0x93c): undefined reference to `_avma'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x981): undefined reference to `_avma'
../mp/mpi-386d.o(.text+0x9a0): undefined reference to `_cgeti'
../mp/mpi-386d.o(.text+0xa94): undefined reference to `_cgeti'
../mp/mpi-386d.o(.text+0xad0): undefined reference to `_mulul3'
........ [more omitted].....
../mp/mpi-386d.o(.text+0xcd1): undefined reference to `_stoi'
../mp/mpi-386d.o(.text+0xce2): undefined reference to `_hiremainder'
../mp/mpi-386d.o(.text+0xceb): undefined reference to `_hiremainder'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x1468): undefined reference to `_icopy'
../mp/mpi-386d.o(.text+0x1482): undefined reference to `_cgeti'
../mp/mpi-386d.o(.text+0x1519): undefined reference to `_avma'
../mp/mpi-386d.o(.text+0x15a5): undefined reference to `_gerepile'
../mp/mpi-386d.o(.text+0x15c9): undefined reference to `_gerepile'
mp2.o(.text+0xfa2): undefined reference to `addsi'
mp2.o(.text+0xfe2): undefined reference to `addii'
mp2.o(.text+0x1028): undefined reference to `addsi'
mp2.o(.text+0x10e0): undefined reference to `addsi'
........ [more omitted].....
mp2.o(.text+0x18d7): undefined reference to `addii'
mp2.o(.text+0x1922): undefined reference to `dvmdii'
mp2.o(.text+0x19b5): undefined reference to `dvmdii'
make[1]: *** [raw_gcl] Error 1
make[1]: Leaving directory `/par4/gcl-2.1/unixport'
make: *** [all] Error 2

  I am running linux 1.2.13 that comes with slackware 3.0.

  Thanks a lot in advance.


         Kai Yue

From owner-gcl@cli.com  Wed Mar 13 18:11:33 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA23336; Wed, 13 Mar 96 18:11:33 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA28889; Wed, 13 Mar 96 18:07:37 CST
Received: from euler.maths.monash.edu.au by cli.com (4.1/SMI-4.1)
	id AA28883; Wed, 13 Mar 96 18:07:30 CST
Received: (billm@localhost) by euler.maths.monash.edu.au (8.6.12/8.6.4) id LAA19019 for gcl@cli.com; Thu, 14 Mar 1996 11:07:04 +1100
Date: Thu, 14 Mar 1996 11:07:04 +1100
From: WE Metzenthen <billm@euler.maths.monash.edu.au>
Message-Id: <199603140007.LAA19019@euler.maths.monash.edu.au>
To: gcl@cli.com
Subject: Re: Problem in compiling gcl-2.1 with gcc 2.7.0
Sender: owner-gcl@cli.com
Precedence: bulk

Kai Yue <yue@maxwell.ucsf.EDU> wrote:

[...]
>   In the past, I successfully compiled gcl-2.1 with gcc 2.5.7. However,
> recently when I use gcc 2.7.0 to compile, the compilation got an error when
> it tries to make raw_gcl. The error msg is as follows:
[...]
../o/big.o(.text+0x31b): undefined reference to `addsi'
../o/big.o(.text+0x49b): undefined reference to `mulsi'
../o/big.o(.text+0x55e): undefined reference to `divis'
../o/big.o(.text+0x619): undefined reference to `addii'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x336): undefined reference to `_avma'
........ [more omitted].....
../mp/mpi-386d.o(.text+0x8db): undefined reference to `_mulul3'
../mp/mpi-386d.o(.text+0x93c): undefined reference to `_avma'
[...]

You have a mixture of ELF (almost everything?, compiled with gcc
2.7.0?) and non-ELF (mpi-386d.o, compiled with gcc 2.5.7?) stuff here.
Try removing mpi-386d.o and then re-compiling.  If that doesn't work,
make sure that you have mpi-386d.S and perhaps remove mpi-386d.s
(which you don't need) and try again.


--Bill


From owner-gcl@cli.com  Fri Mar 15 04:41:37 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00192; Fri, 15 Mar 96 04:41:37 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02617; Fri, 15 Mar 96 04:37:22 CST
Received: from mgate.uni-hannover.de ([130.75.2.3]) by cli.com (4.1/SMI-4.1)
	id AA02610; Fri, 15 Mar 96 04:37:02 CST
Received: from helios (actually helios.tnt.uni-hannover.de) by mgate 
          with SMTP (PP); Fri, 15 Mar 1996 11:36:43 +0100
Received: from daedalus.tnt.uni-hannover.de by helios (SMI-8.6/SMI-SVR4) 
          id LAA08242; Fri, 15 Mar 1996 11:36:33 +0100
Received: by daedalus.tnt.uni-hannover.de (SMI-8.6/SMI-SVR4) id LAA01601;
          Fri, 15 Mar 1996 11:35:59 +0100
Date: Fri, 15 Mar 1996 11:35:59 +0100
Message-Id: <199603151035.LAA01601@daedalus.tnt.uni-hannover.de>
From: Heiko Muenkel <muenkel@daedalus.tnt.uni-hannover.de>
To: gcl@cli.com
Subject: gcl and tk 4.0
X-Face: n}R'l6CHRf>pi&bj7[x0CW3:kmXm@1)7m+l*9[fp;-Ow4Xe~=5E;skf?2>y]f{HzB|Q(\V9 
        +y$PP~.4G[2n4W7{6Ilm[AMY9B:0kj.K_$-d%p4YIF*bX;=ADp6{HS@NEv9c.VII+9PgXHASx}K(jy 
        ^t=q%qzZ72q1e4E;O!$A$`&wgtLk"1%p.nC_G!]4d1!+J4Q#YD_iXeEy`1x)d\r$1Qn\'23n|[8Y_x 
        zuXJJ7W(EGqnzB]`]aq??;+z=)DW~\'Vq&F'g%QU[Mv2:}nS>SdZFTEC2GsgB=Q,:~H<R5S[:ZN%B: 
        s0;|v1x"Jb
Mime-Version: 1.0 (generated by tm-edit 7.47)
Content-Type: text/plain; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

Is it possible to use gcl together with tk 4.0 ?

Are there any plans to update gcl to use tk 4.0 ?

From owner-gcl@cli.com  Fri Mar 15 05:22:53 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00934; Fri, 15 Mar 96 05:22:53 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02681; Fri, 15 Mar 96 05:19:59 CST
Received: from mgate.uni-hannover.de by cli.com (4.1/SMI-4.1)
	id AA02675; Fri, 15 Mar 96 05:19:48 CST
Received: from helios (actually helios.tnt.uni-hannover.de) by mgate 
          with SMTP (PP); Fri, 15 Mar 1996 12:19:28 +0100
Received: from daedalus.tnt.uni-hannover.de by helios (SMI-8.6/SMI-SVR4) 
          id MAA08592; Fri, 15 Mar 1996 12:19:16 +0100
Received: by daedalus.tnt.uni-hannover.de (SMI-8.6/SMI-SVR4) id MAA01684;
          Fri, 15 Mar 1996 12:18:41 +0100
Date: Fri, 15 Mar 1996 12:18:41 +0100
Message-Id: <199603151118.MAA01684@daedalus.tnt.uni-hannover.de>
From: Heiko Muenkel <muenkel@daedalus.tnt.uni-hannover.de>
To: gcl@cli.com
Subject: Problems with CLX-5.02-gcl-2.1
X-Face: n}R'l6CHRf>pi&bj7[x0CW3:kmXm@1)7m+l*9[fp;-Ow4Xe~=5E;skf?2>y]f{HzB|Q(\V9 
        +y$PP~.4G[2n4W7{6Ilm[AMY9B:0kj.K_$-d%p4YIF*bX;=ADp6{HS@NEv9c.VII+9PgXHASx}K(jy 
        ^t=q%qzZ72q1e4E;O!$A$`&wgtLk"1%p.nC_G!]4d1!+J4Q#YD_iXeEy`1x)d\r$1Qn\'23n|[8Y_x 
        zuXJJ7W(EGqnzB]`]aq??;+z=)DW~\'Vq&F'g%QU[Mv2:}nS>SdZFTEC2GsgB=Q,:~H<R5S[:ZN%B: 
        s0;|v1x"Jb
Mime-Version: 1.0 (generated by tm-edit 7.47)
Content-Type: text/plain; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

System: Solaris 2.5
X11: R6
gcl: 2.2

I've just tried to run 'make try' in the directory of CLX-5.02-gcl-2.1
(after running 'make compile' and 'make save'). It fails with the
following message:

:
>Loading demo/menu.lisp
Finished loading demo/menu.lisp
T
 
>calling 'dl' function sun did not supply..exittingmake: *** [try] Error 1


Any ideas what is going wrong?


From owner-gcl@cli.com  Fri Mar 15 06:39:10 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02296; Fri, 15 Mar 96 06:39:10 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02767; Fri, 15 Mar 96 06:36:07 CST
Received: from melon.jaist.ac.jp ([150.65.1.6]) by cli.com (4.1/SMI-4.1)
	id AA02761; Fri, 15 Mar 96 06:35:51 CST
Received: by melon.jaist.ac.jp (8.6.9+2.4Wb3/2.8Wb); Fri, 15 Mar 1996 21:35:13 +0900
Message-Id: <199603151235.VAA19799@melon.jaist.ac.jp>
To: muenkel@daedalus.tnt.uni-hannover.de
Cc: gcl@cli.com
Subject: Re: gcl and tk 4.0 
In-Reply-To: Your message of "Fri, 15 Mar 1996 11:35:59 +0100."
             <199603151035.LAA01601@daedalus.tnt.uni-hannover.de> 
Date: Fri, 15 Mar 1996 21:35:12 JST
From: Toshimi Sawada <sawada@jaist.ac.jp>
Sender: owner-gcl@cli.com
Precedence: bulk

Hi,

> Is it possible to use gcl together with tk 4.0 ?

Yes, I runs gcl(2.2-beta7) with tk4.1a on NexT3.0 & SunOS4.1.3.
You must make some minor modifications to tkAppInit.c and tkMain.c of
gcltksrv. (tk4.1a seems to have some incompatible differences with
tk4.0 at the implementation level, thus the modifications are bit
different). I'm not sure that my changes are valid or not, but 
seems run well now. 

I can send you my version of tkAppInt.c and tkMain.c with some notes.

--
sawada@sra.co.jp



From owner-gcl@cli.com  Fri Mar 15 06:59:41 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA02674; Fri, 15 Mar 96 06:59:41 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02819; Fri, 15 Mar 96 06:57:22 CST
Received: from mgate.uni-hannover.de by cli.com (4.1/SMI-4.1)
	id AA02813; Fri, 15 Mar 96 06:57:11 CST
Received: from helios (actually helios.tnt.uni-hannover.de) by mgate 
          with SMTP (PP); Fri, 15 Mar 1996 13:56:56 +0100
Received: from daedalus.tnt.uni-hannover.de by helios (SMI-8.6/SMI-SVR4) 
          id NAA09207; Fri, 15 Mar 1996 13:56:44 +0100
Received: by daedalus.tnt.uni-hannover.de (SMI-8.6/SMI-SVR4) id NAA02125;
          Fri, 15 Mar 1996 13:56:09 +0100
Date: Fri, 15 Mar 1996 13:56:09 +0100
Message-Id: <199603151256.NAA02125@daedalus.tnt.uni-hannover.de>
From: Heiko Muenkel <muenkel@daedalus.tnt.uni-hannover.de>
To: Toshimi Sawada <sawada@jaist.ac.jp>
Cc: gcl@cli.com
Subject: Re: gcl and tk 4.0
In-Reply-To: <199603151235.VAA19799@melon.jaist.ac.jp>
References: <199603151035.LAA01601@daedalus.tnt.uni-hannover.de> <199603151235.VAA19799@melon.jaist.ac.jp>
X-Face: n}R'l6CHRf>pi&bj7[x0CW3:kmXm@1)7m+l*9[fp;-Ow4Xe~=5E;skf?2>y]f{HzB|Q(\V9 
        +y$PP~.4G[2n4W7{6Ilm[AMY9B:0kj.K_$-d%p4YIF*bX;=ADp6{HS@NEv9c.VII+9PgXHASx}K(jy 
        ^t=q%qzZ72q1e4E;O!$A$`&wgtLk"1%p.nC_G!]4d1!+J4Q#YD_iXeEy`1x)d\r$1Qn\'23n|[8Y_x 
        zuXJJ7W(EGqnzB]`]aq??;+z=)DW~\'Vq&F'g%QU[Mv2:}nS>SdZFTEC2GsgB=Q,:~H<R5S[:ZN%B: 
        s0;|v1x"Jb
Mime-Version: 1.0 (generated by tm-edit 7.47)
Content-Type: text/plain; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

>>>>> "Toshimi" == Toshimi Sawada <sawada@jaist.ac.jp> writes:

    Toshimi> Hi,
    >> Is it possible to use gcl together with tk 4.0 ?

    Toshimi> Yes, I runs gcl(2.2-beta7) with tk4.1a on NexT3.0 &
    Toshimi> SunOS4.1.3.  You must make some minor modifications to
    Toshimi> tkAppInit.c and tkMain.c of gcltksrv. (tk4.1a seems to
    Toshimi> have some incompatible differences with tk4.0 at the
    Toshimi> implementation level, thus the modifications are bit
    Toshimi> different). I'm not sure that my changes are valid or
    Toshimi> not, but seems run well now.

    Toshimi> I can send you my version of tkAppInt.c and tkMain.c with
    Toshimi> some notes.

Yes, please send it to me. 

    Toshimi> -- sawada@sra.co.jp

Do you think, that it is possible to use the tk- interface of gcl also
in other Common Lisp implemenations like LispWorks from Harlequin?

From owner-gcl@cli.com  Fri Mar 15 08:32:40 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA04378; Fri, 15 Mar 96 08:32:40 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02942; Fri, 15 Mar 96 08:27:22 CST
Received: from mgate.uni-hannover.de by cli.com (4.1/SMI-4.1)
	id AA02936; Fri, 15 Mar 96 08:26:55 CST
Received: from helios (actually helios.tnt.uni-hannover.de) by mgate 
          with SMTP (PP); Fri, 15 Mar 1996 15:26:49 +0100
Received: from daedalus.tnt.uni-hannover.de by helios (SMI-8.6/SMI-SVR4) 
          id PAA09798; Fri, 15 Mar 1996 15:26:38 +0100
Received: by daedalus.tnt.uni-hannover.de (SMI-8.6/SMI-SVR4) id PAA02254;
          Fri, 15 Mar 1996 15:26:05 +0100
Date: Fri, 15 Mar 1996 15:26:05 +0100
Message-Id: <199603151426.PAA02254@daedalus.tnt.uni-hannover.de>
From: Heiko Muenkel <muenkel@daedalus.tnt.uni-hannover.de>
To: gcl@cli.com
Subject: Bug in texi file si-defs.texi fixed
X-Face: n}R'l6CHRf>pi&bj7[x0CW3:kmXm@1)7m+l*9[fp;-Ow4Xe~=5E;skf?2>y]f{HzB|Q(\V9 
        +y$PP~.4G[2n4W7{6Ilm[AMY9B:0kj.K_$-d%p4YIF*bX;=ADp6{HS@NEv9c.VII+9PgXHASx}K(jy 
        ^t=q%qzZ72q1e4E;O!$A$`&wgtLk"1%p.nC_G!]4d1!+J4Q#YD_iXeEy`1x)d\r$1Qn\'23n|[8Y_x 
        zuXJJ7W(EGqnzB]`]aq??;+z=)DW~\'Vq&F'g%QU[Mv2:}nS>SdZFTEC2GsgB=Q,:~H<R5S[:ZN%B: 
        s0;|v1x"Jb
Mime-Version: 1.0 (generated by tm-edit 7.47)
Content-Type: text/plain; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk

I wasn't abble to tex the original file si-defs.texi. It was caused by
a missing argument of @table. To fix it, I've changed:


@deffn {Funcition} ALLOCATED (type)
Package:SI

Returns 6 values:
@table
@item nfree
number free 
@item npages
number of pages 
@item maxpage
number of pages to grow to 
@item nppage
number per page 
@item gbccount
number of gc's due to running out of items of this size
@item nused
number of items used 
@end table



to:



@deffn {Funcition} ALLOCATED (type)
Package:SI

Returns 6 values:
@table @asis
@item nfree
number free 
@item npages
number of pages 
@item maxpage
number of pages to grow to 
@item nppage
number per page 
@item gbccount
number of gc's due to running out of items of this size
@item nused
number of items used 
@end table

From owner-gcl@cli.com  Fri Mar 15 15:39:51 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA11935; Fri, 15 Mar 96 15:39:51 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA03887; Fri, 15 Mar 96 15:33:57 CST
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA03881; Fri, 15 Mar 96 15:33:39 CST
Date: Fri, 15 Mar 96 15:32:22 CST
From: bshults@math.utexas.edu
Posted-Date: Fri, 15 Mar 96 15:32:22 CST
Message-Id: <9603152132.AA06281@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA06281; Fri, 15 Mar 96 15:32:22 CST
To: muenkel@daedalus.tnt.uni-hannover.de
Cc: sawada@jaist.ac.jp, gcl@cli.com
In-Reply-To: <199603151256.NAA02125@daedalus.tnt.uni-hannover.de> (message from Heiko Muenkel on Fri, 15 Mar 1996 13:56:09 +0100)
Subject: Re: gcl and tk 4.0
Sender: owner-gcl@cli.com
Precedence: bulk

   Do you think, that it is possible to use the tk- interface of gcl also
   in other Common Lisp implemenations like LispWorks from Harlequin?

There is a package called lisp2wish (or sometimes withwish) which is a
portable interface between lisp and wish.  It works on Allegro, clisp,
lucid and kcl (so gcl, I suppose).  There are pointers to it from the
Tcl/Tk software map.

   http://web.cs.ualberta.ca/~wade/HyperTcl/

Search for 'lisp'.

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli.com  Fri Mar 15 16:59:45 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA13343; Fri, 15 Mar 96 16:59:45 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA04122; Fri, 15 Mar 96 16:57:45 CST
Received: from ludwig.pmad.uic.edu by cli.com (4.1/SMI-4.1)
	id AA04116; Fri, 15 Mar 96 16:57:36 CST
Received: by ludwig.pmad.uic.edu (NX5.67d/NeXT-2.0)
	id AA20309; Fri, 15 Mar 96 16:47:17 -0600
Date: Fri, 15 Mar 96 16:47:17 -0600
From: bruce@ludwig.pmad.uic.edu (Bruce Lambert)
Message-Id: <9603152247.AA20309@ludwig.pmad.uic.edu>
Received: by NeXT.Mailer (1.100)
Received: by NeXT Mailer (1.100)
To: gcl@cli.com
Subject: Can't install gcl on NeXT
Sender: owner-gcl@cli.com
Precedence: bulk

Hi people,

With help, I've managed to make gcl for my nextstattion, but I'm having trouble  
installing it. Below is the output when I ay 'make install'. I think the  
problem is I don't have the tkl stuff. What should I do?

Thaks in advance.

-bruce

-------------------------------------------------------------------------------


ludwig:1# make install
make install1 "INSTALL_LIB_DIR=/usr/local/lib/gcl-`cat majvers`.`cat minvers`"  
"PREFIX_DIR=/usr/local"
if [ -d /usr/local/lib ] ;then true; else mkdir /usr/local/lib ; fi
if [ -d /usr/local/bin ] ;then true; else mkdir /usr/local/bin ; fi
if [ -d /usr/local/lib/gcl-2.2 ] ; then true; else mkdir /usr/local/lib/gcl-2.2  
;fi
make install-command "INSTALL_LIB_DIR=/usr/local/lib/gcl-2.2"  
"PREFIX_DIR=/usr/local"
(echo "#!/bin/sh" ;  echo exec /usr/local/lib/gcl-2.2/unixport/saved_gcl \\ ;   
echo '   -dir' /usr/local/lib/gcl-2.2/unixport/ \\ ;  echo '   -libdir'  
/usr/local/lib/gcl-2.2/ \\ ;  echo '   -eval '\''(setq si::*allow-gzipped-file*  
t)'\' \\ ; echo '   -eval '\''(setq si::*tk-library* '\"unknown\"')'\' \\; echo  
'     '\"\$@\" ) > /usr/local/bin/gcl;
echo '#' other options: -load "/tmp/foo.o" -load "jo.lsp" -eval '"(joe 3)"' >>  
/usr/local/bin/gcl
chmod a+x /usr/local/bin/gcl
rm -f /usr/local/bin/gcl.exe
tar cvf - unixport/saved_gcl info/*info* doc/*.el cmpnew/collectfn.o  
lsp/gprof.lsp lsp/info.o lsp/profile.lsp gcl-tk/tkl.o  gcl-tk/tinfo.o  
gcl-tk/demos/*.lsp gcl-tk/demos/*.lisp gcl-tk/demos/*.o  gcl-tk/gcl.tcl  
gcl-tk/gcltkaux  |  (cd /usr/local/lib/gcl-2.2 ;tar xvf -)
a unixport/saved_gcl 6321 blocks
x unixport/saved_gcl, 3236112 bytes, 6321 tape blocks
a info/gcl-si.info 3 blocks
a info/gcl-si.info-1.gz 19 blocks
x info/gcl-si.info, 1285 bytes, 3 tape blocks
x info/gcl-si.info-1.gz, 9375 bytes, 19 tape blocks
a info/gcl-si.info-2.gz 21 blocks
x info/gcl-si.info-2.gz, 10708 bytes, 21 tape blocks
a info/gcl-si.info-3.gz 27 blocks
x info/gcl-si.info-3.gz, 13332 bytes, 27 tape blocks
a info/gcl-si.info-4.gz 23 blocks
x info/gcl-si.info-4.gz, 11538 bytes, 23 tape blocks
a info/gcl-si.info-5.gz 31 blocks
x info/gcl-si.info-5.gz, 15609 bytes, 31 tape blocks
a info/gcl-si.info-6.gz 13 blocks
a info/gcl-tk.info 3 blocks
a info/gcl-tk.info-1.gz 29 blocks
x info/gcl-si.info-6.gz, 6337 bytes, 13 tape blocks
x info/gcl-tk.info, 1523 bytes, 3 tape blocks
x info/gcl-tk.info-1.gz, 14390 bytes, 29 tape blocks
a info/gcl-tk.info-2.gz 29 blocks
x info/gcl-tk.info-2.gz, 14710 bytes, 29 tape blocks
a info/gcl-tk.info-3.gz 20 blocks
a info/gcl-tk.info-4.gz 24 blocks
x info/gcl-tk.info-3.gz, 10179 bytes, 20 tape blocks
x info/gcl-tk.info-4.gz, 11817 bytes, 24 tape blocks
a info/gcl-tk.info-5.gz 24 blocks
x info/gcl-tk.info-5.gz, 11917 bytes, 24 tape blocks
a info/gcl-tk.info-6.gz 25 blocks
x info/gcl-tk.info-6.gz, 12459 bytes, 25 tape blocks
a info/gcl-tk.info-7.gz 26 blocks
x info/gcl-tk.info-7.gz, 12887 bytes, 26 tape blocks
a info/gcl-tk.info-8.gz 14 blocks
doc/*.el: No such file or directory
tar: a cmpnew/collectfn.o 74 blocks
x info/gcl-tk.info-8.gz, 7159 bytes, 14 tape blocks
x cmpnew/collectfn.o, 37460 bytes, 74 tape blocks
a lsp/gprof.lsp 9 blocks
a lsp/info.o 82 blocks
x lsp/gprof.lsp, 4126 bytes, 9 tape blocks
x lsp/info.o, 41543 bytes, 82 tape blocks
a lsp/profile.lsp 8 blocks
gcl-tk/tkl.o: No such file or directory
gcl-tk/tinfo.o: No such file or directory
tar: tar: a gcl-tk/demos/index.lsp 6 blocks
a gcl-tk/demos/gc-monitor.lisp 10 blocks
x lsp/profile.lsp, 3716 bytes, 8 tape blocks
x gcl-tk/demos/index.lsp, 2578 bytes, 6 tape blocks
a gcl-tk/demos/mkBasic.lisp 6 blocks
a gcl-tk/demos/mkCanvText.lisp 10 blocks
x gcl-tk/demos/gc-monitor.lisp, 4884 bytes, 10 tape blocks
a gcl-tk/demos/mkEntry.lisp 4 blocks
a gcl-tk/demos/mkEntry2.lisp 5 blocks
x gcl-tk/demos/mkBasic.lisp, 2795 bytes, 6 tape blocks
x gcl-tk/demos/mkCanvText.lisp, 5013 bytes, 10 tape blocks
a gcl-tk/demos/mkForm.lisp 4 blocks
a gcl-tk/demos/mkHScale.lisp 3 blocks
a gcl-tk/demos/mkItems.lisp 30 blocks
x gcl-tk/demos/mkEntry.lisp, 1736 bytes, 4 tape blocks
x gcl-tk/demos/mkEntry2.lisp, 2524 bytes, 5 tape blocks
x gcl-tk/demos/mkForm.lisp, 1947 bytes, 4 tape blocks
x gcl-tk/demos/mkHScale.lisp, 1531 bytes, 3 tape blocks
x gcl-tk/demos/mkItems.lisp, 14902 bytes, 30 tape blocks
a gcl-tk/demos/mkLabel.lisp 4 blocks
a gcl-tk/demos/mkListbox.lisp 4 blocks
a gcl-tk/demos/mkPlot.lisp 6 blocks
a gcl-tk/demos/mkRadio.lisp 6 blocks
x gcl-tk/demos/mkLabel.lisp, 1621 bytes, 4 tape blocks
a gcl-tk/demos/mkRuler.lisp 11 blocks
x gcl-tk/demos/mkListbox.lisp, 1806 bytes, 4 tape blocks
x gcl-tk/demos/mkPlot.lisp, 2913 bytes, 6 tape blocks
x gcl-tk/demos/mkRadio.lisp, 3067 bytes, 6 tape blocks
a gcl-tk/demos/mkSearch.lisp 10 blocks
x gcl-tk/demos/mkRuler.lisp, 5215 bytes, 11 tape blocks
a gcl-tk/demos/mkStyles.lisp 11 blocks
x gcl-tk/demos/mkSearch.lisp, 4987 bytes, 10 tape blocks
a gcl-tk/demos/mkTextBind.lisp 9 blocks
x gcl-tk/demos/mkStyles.lisp, 5225 bytes, 11 tape blocks
a gcl-tk/demos/mkVScale.lisp 4 blocks
a gcl-tk/demos/mkdialog.lisp 5 blocks
a gcl-tk/demos/nqthm-stack.lisp 5 blocks
x gcl-tk/demos/mkTextBind.lisp, 4129 bytes, 9 tape blocks
a gcl-tk/demos/showVars.lisp 3 blocks
a gcl-tk/demos/widget.lisp 21 blocks
x gcl-tk/demos/mkVScale.lisp, 1542 bytes, 4 tape blocks
x gcl-tk/demos/mkdialog.lisp, 2537 bytes, 5 tape blocks
x gcl-tk/demos/nqthm-stack.lisp, 2352 bytes, 5 tape blocks
x gcl-tk/demos/showVars.lisp, 1093 bytes, 3 tape blocks
x gcl-tk/demos/widget.lisp, 10265 bytes, 21 tape blocks
gcl-tk/demos/*.o: No such file or directory
tar: a gcl-tk/gcl.tcl 3 blocks
gcl-tk/gcltkaux: No such file or directory
x gcl-tk/gcl.tcl, 1406 bytes, 3 tape blocks
tar: ln -s /usr/local/lib/gcl-2.2/unixport/saved_gcl  /usr/local/bin/gcl.exe
cat gcl-tk/gcltksrv |  sed -e "s:DIR=.*:DIR=/usr/local/lib/gcl-2.2/gcl-tk:g"    
-e "s:TK_LIBRARY=.*:TK_LIBRARY=unknown:g" >   
/usr/local/lib/gcl-2.2/gcl-tk/gcltksrv
chmod a+x /usr/local/lib/gcl-2.2/gcl-tk/gcltksrv
(cd /usr/local/lib/gcl-2.2/gcl-tk/demos ;  echo '(load  
"../tkl.o")(TK::GET-AUTOLOADS (directory "*.lisp"))' | /usr/local/bin/gcl)
GCL (GNU Common Lisp)  Version(2.2) Fri Mar  8 16:03:45 GMT-0600 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>
Error: Cannot open the file ../tkl.o.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at LOAD.  Type :H for Help.
>>
Error: The function TK::GET-AUTOLOADS is undefined.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by EVALHOOK.
Backtrace: system:universal-error-handler > EVALHOOK

Broken at LOAD.
>>(cd info ; make ; make install)
if [  -d unknown ] ; then true ; else exit 0; fi
if fgrep gcl-si unknown/dir > /dev/null ; then true ; else  echo "* GCL Doc:  
(gcl-si.info).     GNU Common Lisp specific Documentation." >> unknown/dir ; fi
fgrep: can't open unknown/dir
sh: unknown/dir: cannot create
*** Exit 1 (ignored)
if fgrep gcl-tk unknown/dir > /dev/null ; then true ; else  echo "* GCL TK Doc:  
(gcl-tk.info).  TK window GCL interface." >> unknown/dir ; fi
fgrep: can't open unknown/dir
sh: unknown/dir: cannot create
*** Exit 1 (ignored)
if fgrep gcl.info unknown/dir > /dev/null ; then true ; else  echo "* GCL Ansi  
Doc: (gcl.info).  Ansi Common Lisp Specification." >> unknown/dir ; fi
fgrep: can't open unknown/dir
sh: unknown/dir: cannot create
*** Exit 1 (ignored)
if [  -d unknown ] ; then       cp *.info* unknown ; fi

From owner-gcl@cli.com  Fri Mar 15 19:13:55 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA15715; Fri, 15 Mar 96 19:13:55 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA04362; Fri, 15 Mar 96 19:11:58 CST
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA04356; Fri, 15 Mar 96 19:11:44 CST
Date: Fri, 15 Mar 96 19:10:40 CST
From: wfs@math.utexas.edu
Posted-Date: Fri, 15 Mar 96 19:10:40 CST
Message-Id: <9603160110.AA06788@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA06788; Fri, 15 Mar 96 19:10:40 CST
To: muenkel@daedalus.tnt.uni-hannover.de
Cc: gcl@cli.com
In-Reply-To: <199603151035.LAA01601@daedalus.tnt.uni-hannover.de> (message from Heiko Muenkel on Fri, 15 Mar 1996 11:35:59 +0100)
Subject: Re: gcl and tk 4.0
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


yes..

I certainly use it with tk 4.1

use ftp.ma.utexas.edu:pub/gcl/gcl-2.2.tgz
and                           gcl-2.2-fixes.tgz

bill



From owner-gcl@cli.com  Tue Mar 19 11:49:07 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA22319; Tue, 19 Mar 96 11:49:07 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA13841; Tue, 19 Mar 96 11:41:29 CST
Received: from soren.home (slip-1-13.ots.utexas.edu) by cli.com (4.1/SMI-4.1)
	id AA13831; Tue, 19 Mar 96 11:41:10 CST
Received: from soren.home (localhost [127.0.0.1]) by soren.home (8.7.1/8.7.1) with SMTP id LAA05131; Tue, 19 Mar 1996 11:41:26 -0600
Message-Id: <314EF1BB.2627DCD4@math.utexas.edu>
Date: Tue, 19 Mar 1996 11:41:15 -0600
From: Benjamin Shults <bshults@fireant.ma.utexas.edu>
X-Mailer: Mozilla 2.01 (X11; I; Linux 1.2.13 i686)
Mime-Version: 1.0
Newsgroups: comp.lang.lisp,comp.lang.clos
Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, gcl@cli.com
Subject: xp-code.lisp errors in clisp and gcl
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk

I downloaded the latest (09/02/92) version of xp-code.lisp from merl.com.
I have some pretty printing code which is very stable and
runs fine under Allegro.

I also want to use CLISP and GCL.  When I load xp-code.lisp
into either of these lisps and run my code I get runtime
errors signaled from inside the xp code.

Has anyone gotten pretty printing to work under CLISP or GCL?

The error I get is that -1 is given as the first argument to
nthcdr.

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli.com  Tue Mar 19 14:00:01 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA24644; Tue, 19 Mar 96 14:00:01 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA14325; Tue, 19 Mar 96 13:56:11 CST
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA14319; Tue, 19 Mar 96 13:55:57 CST
Date: Tue, 19 Mar 96 13:54:51 CST
From: bshults@math.utexas.edu
Posted-Date: Tue, 19 Mar 96 13:54:51 CST
Message-Id: <9603191954.AA07593@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA07593; Tue, 19 Mar 96 13:54:51 CST
To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de
Cc: gcl@cli.com
In-Reply-To: <24640.827263727@rtp.ericsson.se> (message from Raymond Toy on Tue, 19 Mar 96 20:57:05 +0100)
Subject: Re: xp-code.lisp errors in clisp and gcl
Sender: owner-gcl@cli.com
Precedence: bulk

Benjamin Shults wrote:
> I downloaded the latest (09/02/92) version of xp-code.lisp from merl.com.
> I have some pretty printing code which is very stable and
> runs fine under Allegro.
> 
> I also want to use CLISP and GCL.  When I load xp-code.lisp
> into either of these lisps and run my code I get runtime
> errors signaled from inside the xp code.

This has been solved.  I was using a format string that worked
with Allegro because they extended the ~* directive in an undocumented
yet sensible way so that it could take ~-1* and skip backwards.
The standard way to do this is ~1:*.  xp-code.lisp gives
an error on the former while Allegro understands it.

Let this be a lesson to me.

Benjamin

From owner-gcl@cli.com  Fri Mar 22 09:44:53 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA07916; Fri, 22 Mar 96 09:44:53 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA02504; Fri, 22 Mar 96 09:32:01 CST
Received: from edward.xstar.com ([204.177.163.220]) by cli.com (4.1/SMI-4.1)
	id AA02498; Fri, 22 Mar 96 09:31:58 CST
Received: (from root@localhost) by edward.xstar.com (8.7.1/8.7.1) id JAA05690 for gcl@cli.com; Fri, 22 Mar 1996 09:30:00 -0600
Date: Fri, 22 Mar 1996 09:30:00 -0600
From: root <root@edward.xstar.com>
Message-Id: <199603221530.JAA05690@edward.xstar.com>
To: gcl@cli.com
Subject: problems with compile
Sender: owner-gcl@cli.com
Precedence: bulk

When I try to make gcl-2.2 on my linux machine, all goes well until the very
end.  At the end I get the following error message :

make[1]: Entering directory `/syq_linux/gcl-2.2/unixport'
[gcc line deleted]
gcc -pipe -fwritable-strings  -DVOL=volatile -I/syq_linux/gcl-2.2/o -fsigned-char-static  -o raw_gcl {object files} -lc -lm ../o/gcllib.a
ld: cannot open -lc: No such file or directory
make[1]: *** [raw_gcl] Error 1
make[1]: Leaving directory `/syq_linux/gcl-2.2/unixport'
make: *** [all] Error 2

What is -lc and where can I get it?

I am running the Caldera Network Desktop v1.0, based of of redhat 2.0, gcc 2.7.0
and this is (or should be) a fully elf system.  Any help would be greatly 
appreciated.  I am not subscribed to the list, so please mail responses
to edward@xstar.com.

Thanks,
edward



From owner-gcl@cli.com  Fri Apr  5 14:58:03 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA17526; Fri, 5 Apr 96 14:58:03 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA24111; Fri, 5 Apr 96 14:52:35 CST
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA24105; Fri, 5 Apr 96 14:52:32 CST
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA18248; Fri, 5 Apr 96 15:52:30 EST
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id UAA03849; Fri, 5 Apr 1996 20:52:23 GMT
Date: Fri, 5 Apr 1996 20:52:23 GMT
Message-Id: <199604052052.UAA03849@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: pcl
Sender: owner-gcl@cli.com
Precedence: bulk



I am trying to have a gcl version with pcl on an SGI (Irix5).
However, I get 

Error: Sorry, Cant save an image with dynamically loaded .o files
Fast links are on: do (si::use-fast-links nil) for debugging

What's the best way to do that?

Thanks,




                                          myriam



From owner-gcl@cli.com  Sat Apr  6 18:49:14 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA18317; Sat, 6 Apr 96 18:49:14 CST
Received: by cli.com (4.1/SMI-4.1)
	id AA07731; Sat, 6 Apr 96 18:46:00 CST
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA07725; Sat, 6 Apr 96 18:45:46 CST
Date: Sat, 6 Apr 96 18:44:24 CST
From: wfs@math.utexas.edu
Posted-Date: Sat, 6 Apr 96 18:44:24 CST
Message-Id: <9604070044.AA24501@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA24501; Sat, 6 Apr 96 18:44:24 CST
To: mabramson@nlm.nih.gov
Cc: gcl@cli.com
In-Reply-To: <199604052052.UAA03849@play.nlm.nih.gov> (message from Myriam Abramson on Fri, 5 Apr 1996 20:52:23 GMT)
Subject: Re: pcl
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl@cli.com
Precedence: bulk


Sorry on such a platform you will have to load in the .o
files each time.

It is possible to build an image with the files in it,
the way the original gcl is constructed, but I dont think
you want to do it..

Bill

From owner-gcl@cli.com  Tue Apr  9 10:58:37 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA27015; Tue, 9 Apr 96 10:58:37 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA22113; Tue, 9 Apr 96 10:53:11 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA22107; Tue, 9 Apr 96 10:53:07 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA03871; Tue, 9 Apr 96 11:52:59 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id LAA21716; Tue, 9 Apr 1996 11:52:47 -0400
Date: Tue, 9 Apr 1996 11:52:47 -0400
Message-Id: <199604091552.LAA21716@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: current directory
Sender: owner-gcl@cli.com
Precedence: bulk


I'm sorry to reflect such ignorance but how do you get the name of the
current directory you are in?  

Thanks,



                                          myriam



From owner-gcl@cli.com  Tue Apr  9 14:29:51 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA00824; Tue, 9 Apr 96 14:29:51 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA03741; Tue, 9 Apr 96 14:26:16 CDT
Received: from Sunset.AI.SRI.COM by cli.com (4.1/SMI-4.1)
	id AA03734; Tue, 9 Apr 96 14:26:12 CDT
Received: from DARWIN.AI.SRI.COM by Sunset.AI.SRI.COM (8.7.1/SMI-4.1)
	id MAA10504 for <gcl@cli.com>; Tue, 9 Apr 1996 12:25:58 -0700 (PDT)
Date: Tue, 9 Apr 1996 12:26-0700
From: Mark Stickel <Stickel@ai.sri.com>
Subject: ~ pathname problem in solaris
To: gcl@cli.com
Message-Id: <19960409192600.9.STICKEL@DARWIN.AI.SRI.COM>
Sender: owner-gcl@cli.com
Precedence: bulk

On Sun Solaris systems, have others encountered and hopefully fixed a
problem with pathnames including "~"?  It appears the message about sun
not supplying it is incorrect.

% saved_gcl
GCL (GNU Common Lisp)  Version(2.2) Mon Apr  8 09:28:51 PDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(truename (pathname "~/.emacs"))
calling 'dl' function sun did not supply..exitting

From owner-gcl@cli.com  Wed Apr 10 12:48:01 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA24815; Wed, 10 Apr 96 12:48:01 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA17867; Wed, 10 Apr 96 12:40:48 CDT
Received: from haymarket.ed.ac.uk by cli.com (4.1/SMI-4.1)
	id AA17861; Wed, 10 Apr 96 12:40:45 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id SAA26620; Wed, 10 Apr 1996 18:40:34 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Wed, 10 Apr 96 18:39:12 BST
Date: Wed, 10 Apr 96 18:39:12 BST
Message-Id: <21422.9604101739@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: current directory
To: Myriam Abramson <mabramson@nlm.nih.gov>, gcl@cli.com
In-Reply-To: Myriam Abramson's message of Tue, 9 Apr 1996 11:52:47 -0400
Sender: owner-gcl@cli.com
Precedence: bulk

> I'm sorry to reflect such ignorance but how do you get the name of the
> current directory you are in?  

Well, that's not entirely clear.  But, on a Unix system, you
can use (truename ".").  Them, if you put in down in a function
that you call instead, you can easily change to some other
method or make code conditional on the OS.  E.g.:

(defun current-directory-name ()
  #+unix
  (truename ".")
  #-unix
  (error "Don't know how to get the name of the current directory."))

-- jeff

From owner-gcl@cli.com  Wed Apr 10 13:54:44 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA25993; Wed, 10 Apr 96 13:54:44 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA18137; Wed, 10 Apr 96 13:51:36 CDT
Received: from smtp-gw01.ny.us.ibm.net by cli.com (4.1/SMI-4.1)
	id AA18131; Wed, 10 Apr 96 13:51:32 CDT
Received: (from uucp@localhost) by smtp-gw01.ny.us.ibm.net (8.6.9/8.6.9) id SAA123686 for <gcl@cli.com>; Wed, 10 Apr 1996 18:51:27 GMT
From: mmerten@ibm.net
Received: from slip139-92-41-14.ut.nl.ibm.net(139.92.41.14) by smtp-gw01.ny.us.ibm.net via smap (V1.3mjr)
	id sma6uMDmb; Wed Apr 10 18:51:05 1996
Received: by slip139-92-41-14.ut.nl.ibm.net (IBM OS/2 SENDMAIL VERSION 1.3.14/2.12um) id AA0015; Wed, 10 Apr 96 20:48:05 -0700
Message-Id: <9604110348.AA0015@slip139-92-41-14.ut.nl.ibm.net>
Mime-Version: 1.0
Date: Wed, 10 Apr 96 20:44:26 +0000
To: gcl@cli.com
Reply-To: mmerten@ibm.net
Subject: Symbolic debugger
X-Mailer: Ultimedia Mail/2 Lite, IBM T. J. Watson Research Center
Content-Id: <14_60_1_829183467>
Content-Type: text/plain; charset="US-ASCII"
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk

Hello,

      does someone know about a source level debugger for gcl. I have used gcl and found it a great language 
but what I'm missing is a symbolic debugger.

Thanks in advance.


Marc Mertens
mmerten@ibm.net

From owner-gcl@cli.com  Wed Apr 10 14:55:19 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA27070; Wed, 10 Apr 96 14:55:19 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA18321; Wed, 10 Apr 96 14:53:01 CDT
Received: from candy.chi.its.hiroshima-cu.ac.jp by cli.com (4.1/SMI-4.1)
	id AA18315; Wed, 10 Apr 96 14:52:57 CDT
Received: from localhost (localhost [127.0.0.1]) 
      by candy.chi.its.hiroshima-cu.ac.jp (8.6.12+2.5Wb4/3.2W6) with SMTP id EAA07706
      Thu, 11 Apr 1996 04:50:29 +0900
Message-Id: <199604101950.EAA07706@candy.chi.its.hiroshima-cu.ac.jp>
To: gcl@cli.com
Subject: faslink for IRIX: rel_mips.c
Date: Thu, 11 Apr 96 04:50:28 +0900
From: Mutsuhiro TERAUCHI <mucha@chi.its.hiroshima-cu.ac.jp>
Sender: owner-gcl@cli.com
Precedence: bulk

Hello,

I am trying to install gcl-2.2 on SGI mahine running IRIX5.3.
To link with OpenGL C-code, I need faslink function, however
there isn't a RELOC_FILE ``rel_mips.c'' in the distribution.

Does anyone port faslink to IRIX machine? Any comment is helpful.

Thanks in advance.

-- mucha (Mutsuhiro TERAUCHI / Hiroshima City Univ. Japan)

From owner-gcl@cli.com  Wed Apr 10 15:45:48 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp (4.1/SMI-4.1)
	id AA27982; Wed, 10 Apr 96 15:45:48 CDT
Received: by cli.com (4.1/SMI-4.1)
	id AA18490; Wed, 10 Apr 96 15:43:40 CDT
Received: from nachos.vt.com by cli.com (4.1/SMI-4.1)
	id AA18484; Wed, 10 Apr 96 15:43:38 CDT
Received: from 204.180.148.56 (argot.vt.com [204.180.148.56]) by nachos.vt.com (8.6.5/8.6.5) with SMTP id PAA17953 for <gcl@cli.com>; Wed, 10 Apr 1996 15:46:14 -0500
Message-Id: <316BD70E.7950@argot.vt.com>
Date: Wed, 10 Apr 1996 15:43:10 +0000
From: "Victor M. Banda" <victor@argot.vt.com>
Organization: Argot Limited
X-Mailer: Mozilla 2.0 (Macintosh; I; PPC)
Mime-Version: 1.0
To: gcl@cli.com
Subject: gcl faq, where?
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk

Where on the internet is the GCL FAQ ?

From owner-gcl@cli.com  Thu Apr 18 00:57:29 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp. (SMI-8.6/SMI-SVR4)
	id AAA16703; Thu, 18 Apr 1996 00:57:29 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA19308; Thu, 18 Apr 96 00:54:42 CDT
Received: from vega.anu.edu.au ([150.203.160.27]) by cli.com (4.1/SMI-4.1)
	id AA19177; Thu, 18 Apr 96 00:53:23 CDT
Received: (from mcn@localhost) by vega.anu.edu.au (8.6.12/8.6.9) id PAA07592; Thu, 18 Apr 1996 15:53:17 +1000
Date: Thu, 18 Apr 1996 15:53:17 +1000
From: Malcolm Newey <Malcolm.Newey@cs.anu.edu.au>
Message-Id: <199604180553.PAA07592@vega.anu.edu.au>
To: gcl@cli.com, Stickel@ai.sri.com
Subject: Re: ~ pathname problem in solaris
X-Sun-Charset: US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 964


Mark Stickel writes
> From owner-gcl@cli.com  Wed Apr 10 06:50:04 1996
> From: Mark Stickel <Stickel@ai.sri.com>
> Subject: ~ pathname problem in solaris

> On Sun Solaris systems, have others encountered and hopefully fixed a
> problem with pathnames including "~"?  It appears the message about sun
> not supplying it is incorrect.
> 
> % saved_gcl
> GCL (GNU Common Lisp)  Version(2.2) Mon Apr  8 09:28:51 PDT 1996
> Licensed under GNU Public Library License
> Contains Enhancements by W. Schelter
> 
> >(truename (pathname "~/.emacs"))
> calling 'dl' function sun did not supply..exitting



The standard distribution of HOL88 has this same problem when built with GCL
on Solaris.  The workaround we have used is to eliminate places where '~/'
was used (with small loss in functionality).  There is no fix that we know to
GCL.

The gcl mail archives show Martin Simons was also having this problem on Mar 2
last year.  His lisp application was CMU's NESL 3.0

From owner-gcl@cli.com  Sun Apr 21 11:13:43 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA00260; Sun, 21 Apr 1996 11:13:43 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA00190; Sun, 21 Apr 96 11:09:43 CDT
Received: from fountain.village.org by cli.com (4.1/SMI-4.1)
	id AA29472; Fri, 8 Mar 96 11:49:31 CST
Received: from localhost (localhost [127.0.0.1]) by fountain.village.org (8.6.11/8.6.6) with SMTP id KAA07927 for <gcl@cli.com>; Fri, 8 Mar 1996 10:49:16 -0700
Message-Id: <199603081749.KAA07927@fountain.village.org>
To: gcl@cli.com
Subject: Re: faslink for Solaris? 
In-Reply-To: Your message of Fri, 08 Mar 1996 16:13:04 +0100
Date: Fri, 08 Mar 1996 10:49:16 -0700
From: Dieter Dworkin Muller <dworkin@village.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 597


sth@magnum.rs.E-Technik.TH-Darmstadt.DE (Stefan Hoereth) wrote:
:  
:    I'm a little bit confused if it is possible to load (compiled) c-code
:  into gcl on a Solaris2.x machine?


Works for me on 2.3 and 2.4.  However, you have to have compiled on
2.3 for it to work on 2.3, or 2.4 to work on 2.4.  This isn't
loading-specific, several other things fail when running on a
different minor revision of Solaris than gcl was compiled on.  This
is most likely a Solaris bug, rather than a gcl bug.

If you're having specific problems, send me details and I'll see what
I can come up with.

	Dworkin

From owner-gcl@cli.com  Sun Apr 21 11:26:02 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA00264; Sun, 21 Apr 1996 11:26:01 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA00189; Sun, 21 Apr 96 11:19:08 CDT
Received: from aurora.romoidoy.com (aurora.zoom.com) by cli.com (4.1/SMI-4.1)
	id AA00292; Sun, 21 Apr 96 11:12:10 CDT
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id UAA16624; Sat, 20 Apr 1996 20:37:32 -0700
Date: Sat, 20 Apr 1996 20:37:32 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199604210337.UAA16624@aurora.romoidoy.com>
To: gcl@cli.com
Subject: apparent compiler bug: 1.5 becomes inconstant
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1182

1.5 behaves itself until you compile it into a function.  Then it gets
broken.  This is under linux on a 586.  Let me know if there's
anything else I can do to help track down the problem...  Or am I
being stupid s.t. that isn't actually a bug?

semsnyid{zvona}7: gcl
GCL (GNU Common Lisp)  Version(2.2) Wed Apr  3 15:00:44 PST 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>1.5
1.5

>1.5  
1.5      ; yup, it's still 1.5...

>(defun foo () 1.5)
FOO

>(foo)
1.5

>(foo)  
1.5      ; winning so far

>(= 1.5 (foo))
T

>(compile 'foo)
Compiling gazonk1.lsp.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0,
Speed=3
Finished compiling gazonk1.lsp.
Loading gazonk1.o
start address -T 239f7c Finished loading gazonk1.o
#<compiled-function FOO>

>1.5
1.5000000006705523   ; weird, but maybe that's OK -- no guarantee of exactness

>1.5
1.5000000001490116   ; weirder -- READ's idea of 1.5 is wavering...

>1.5
1.5000000004470348

>(= 1.5 1.5)         
T                    ; so maybe it's still up to spec; we just lost precision

>(= 1.5 (foo))
NIL		     ; whoops!  This has to be wrong, right??!!


From owner-gcl@cli.com  Sun Apr 21 11:29:20 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA00268; Sun, 21 Apr 1996 11:29:20 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA00190; Sun, 21 Apr 96 11:09:43 CDT
Received: from fountain.village.org by cli.com (4.1/SMI-4.1)
	id AA29472; Fri, 8 Mar 96 11:49:31 CST
Received: from localhost (localhost [127.0.0.1]) by fountain.village.org (8.6.11/8.6.6) with SMTP id KAA07927 for <gcl@cli.com>; Fri, 8 Mar 1996 10:49:16 -0700
Message-Id: <199603081749.KAA07927@fountain.village.org>
To: gcl@cli.com
Subject: Re: faslink for Solaris? 
In-Reply-To: Your message of Fri, 08 Mar 1996 16:13:04 +0100
Date: Fri, 08 Mar 1996 10:49:16 -0700
From: Dieter Dworkin Muller <dworkin@village.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 597


sth@magnum.rs.E-Technik.TH-Darmstadt.DE (Stefan Hoereth) wrote:
:  
:    I'm a little bit confused if it is possible to load (compiled) c-code
:  into gcl on a Solaris2.x machine?


Works for me on 2.3 and 2.4.  However, you have to have compiled on
2.3 for it to work on 2.3, or 2.4 to work on 2.4.  This isn't
loading-specific, several other things fail when running on a
different minor revision of Solaris than gcl was compiled on.  This
is most likely a Solaris bug, rather than a gcl bug.

If you're having specific problems, send me details and I'll see what
I can come up with.

	Dworkin

From owner-gcl@cli.com  Tue Apr 23 12:56:46 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id MAA01500; Tue, 23 Apr 1996 12:56:45 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA19866; Tue, 23 Apr 96 12:47:57 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA19860; Tue, 23 Apr 96 12:47:50 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA09199; Tue, 23 Apr 96 13:47:34 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id NAA22608; Tue, 23 Apr 1996 13:47:43 -0400
Date: Tue, 23 Apr 1996 13:47:43 -0400
Message-Id: <199604231747.NAA22608@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: benchmarks on Intels
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 139


Could somebody send me the Gabriel's benchmarks for GCL on an Intel
box?  

Thanks,



                                          myriam



From owner-gcl@cli.com  Wed May  1 13:29:08 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA06732; Wed, 1 May 1996 13:29:08 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA27960; Wed, 1 May 96 13:24:06 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA27954; Wed, 1 May 96 13:24:03 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id NAA00319 for <gcl@cli.com>; Wed, 1 May 1996 13:23:54 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id NAA02674 for <gcl@cli.com>; Wed, 1 May 1996 13:23:53 -0500 (CDT)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id OAA06319 for <gcl@cli.com>; Wed, 1 May 1996 14:18:48 -0400
To: GCL Mailing List <gcl@cli.com>
Subject: Number bug in gcl 2.2 on Linux
Date: Wed, 01 May 1996 14:21:42 -0400
Message-Id: <23933.830974902@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 540

I found a small bug in double-float-epsilon in gcl 2.2 on Linux.  The
value of double-float-epsilon is on the order of 1e-20, which is
clearly wrong.  

The reason is that num_co.c is compiled with gcc -O4.  This 
inlines the function lf_eql which means the calculation of
double-float-epsilon is done entirely within the FP registers using
extended double precision instead of just double precision.

One fix is to compile num_co.c without -O4.  I tried -O and
double-float-epsilon takes the value of 1.16d-16, which is about
right. 

Ray

From owner-gcl@cli.com  Thu May  2 05:12:55 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id FAA07105; Thu, 2 May 1996 05:12:55 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA10979; Thu, 2 May 96 05:09:36 CDT
Received: from fang.dsto.defence.gov.au by cli.com (4.1/SMI-4.1)
	id AA10973; Thu, 2 May 96 05:09:28 CDT
Received: from itd3.dsto.defence.gov.au by fang.dsto.defence.gov.au; (8.6.12/1.1.8.2/13May95-0346PM)
	id TAA25518; Thu, 2 May 1996 19:39:04 +0930
Received: from hci-sun2 (hci-sun2 [131.185.4.177]) by itd3.dsto.defence.gov.au (8.7.5/sendmail.ITD.EDB+userdb.960305) with SMTP id TAA10407 for <gcl@cli.com>; Thu, 2 May 1996 19:20:51 +0930 (CST)
From: Conn Copas <Conn.Copas@dsto.defence.GOV.AU>
Received: by hci-sun2 (4.1) id AA09494; Thu, 2 May 96 19:23:09 CST
Message-Id: <9605020953.AA09494@hci-sun2>
Subject: gcl list -> tcl listbox
To: gcl@cli.com
Date: Thu, 2 May 1996 19:23:08 +0930 (CST)
X-Mailer: ELM [version 2.4 PL25]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 507

All, a beginner's question I am afraid.

I want to insert a gcl list into a tk listbox with the minimum of fuss. That 
is, I would like to be able to convert the gcl list into a variable which can
later be 'inserted'. Can anyone recommend a suitable data structure?

Part of the problem seems to be that, if a native tcl list is inserted, it 
seems to be regarded as a string, ie, all elements on the same line of the
listbox (version tk4.0b3/tcl7.4b3 under Irix5.3). Please e-mail me if this is 
old news.

From owner-gcl@cli.com  Thu May  2 10:59:56 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA07240; Thu, 2 May 1996 10:59:56 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA11542; Thu, 2 May 96 10:57:47 CDT
Received: from mycroft.caos.aamu.edu ([198.180.133.20]) by cli.com (4.1/SMI-4.1)
	id AA11536; Thu, 2 May 96 10:57:44 CDT
Received: by mycroft.caos.aamu.edu
	id m0uF0k0-0000YoC
	(Debian /\oo/\ Smail3.1.29.1 #29.37); Thu, 2 May 96 10:56 CDT
Message-Id: <m0uF0k0-0000YoC@mycroft.caos.aamu.edu>
From: krs@caos.aamu.edu (Karl R. Sackett)
Subject: Floating point exception from gcl-tk
To: gcl@cli.com
Date: Thu, 2 May 1996 10:56:28 -0500 (CDT)
X-Mailer: ELM [version 2.4 PL25 PGP2]
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 561

This occurs when doing the example from the 'Getting Started' portion
of the gcl-tk info pages:

mycroft$ gcl
GCL (GNU Common Lisp)  Version(2.2) Wed Mar  6 12:45:08 CST 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(in-package "TK")
#<"TK" package>

TK>(tkconnect)
Loading /usr/lib/gcl/gcl-tk/tkl.o

Error: Floating-point exception.


I built gcl under Linux with gcc-2.7.2, libc-5.2.18, and tk-4.0.
Suggestions, anyone?

-- 
Karl R. Sackett                                        krs@caos.aamu.edu
Run silent, run deep

From owner-gcl@cli.com  Thu May  2 18:25:59 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id SAA07395; Thu, 2 May 1996 18:25:58 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA12450; Thu, 2 May 96 18:22:56 CDT
Received: from london.visi.net by cli.com (4.1/SMI-4.1)
	id AA12444; Thu, 2 May 96 18:22:53 CDT
Received: from mango.galaxy.gmu.edu (imran@ppp-nn-1-20.visi.net [206.151.65.40]) by london.visi.net (8.7.1/8.7.1) with SMTP id TAA09571 for <gcl@cli.com>; Thu, 2 May 1996 19:22:23 -0400 (EDT)
Received: (from imran@localhost) by mango.galaxy.gmu.edu (8.6.12/8.6.10) id TAA01222; Thu, 2 May 1996 19:25:41 -0400
Date: Thu, 2 May 1996 19:25:41 -0400
From: Imran Shah <imran@science.gmu.edu>
Message-Id: <199605022325.TAA01222@mango.galaxy.gmu.edu>
To: gcl@cli.com
Subject: foreign function interface
Reply-To: imran@science.gmu.edu
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 170


I am running gcl-2.2 on Linux 1.2.13. I am interested in using the
foreign function interface. Any advice on how to do so would be
appreciated. 

Thank you

Imran Shah


From owner-gcl@cli.com  Thu May  2 23:31:27 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id XAA07508; Thu, 2 May 1996 23:31:27 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA12781; Thu, 2 May 96 23:29:20 CDT
Received: from aurora.romoidoy.com (aurora.zoom.com) by cli.com (4.1/SMI-4.1)
	id AA12775; Thu, 2 May 96 23:29:10 CDT
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id VAA18709; Thu, 2 May 1996 21:29:20 -0700
Date: Thu, 2 May 1996 21:29:20 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199605030429.VAA18709@aurora.romoidoy.com>
To: gcl@cli.com
Subject: [incr widgets] and GCL
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 661

[incr widgets] is an extension of tk that is a big win.  It adds a
bunch of new widgets like optionmenus, spinners, and progress bars;
perhaps more importantly, it packages up common combinations of
widgets (like canvases with scrollbars and entries with labels) as
``megawidgets''.  The latter feature means that the amount of code
required to put together a gui typically drops by more than a factor
of two.

You can read about [incr widgets] at http://www.tcltk.com/iwidgets/. 

[incr widgets] works seamlessly with GCL (after a bit of hacking to
gcltkaux and tkl.lisp).

I recommend that anyone doing significant work in GCL/tk upgrade to
[incr widgets].  

From owner-gcl@cli.com  Fri May  3 10:33:09 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA07770; Fri, 3 May 1996 10:33:09 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA24946; Fri, 3 May 96 10:26:58 CDT
Received: from josquin.ucdavis.edu by cli.com (4.1/SMI-4.1)
	id AA24940; Fri, 3 May 96 10:26:55 CDT
Received: (from john@localhost) by josquin.ucdavis.edu (8.7.1/8.7.1) id IAA29344; Fri, 3 May 1996 08:30:25 -0700
Date: Fri, 3 May 1996 08:30:25 -0700
Message-Id: <199605031530.IAA29344@josquin.ucdavis.edu>
To: gcl@cli.com
Subject: gcl on sgi
From: jhgillespie@ucdavis.edu
Reply-To: jhgillespie@ucdavis.edu
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 366


I am trying to compile gcl-2.2+fixes on an sgi running IRIX 5.2.  I
used sgi4d for the machine and the compilation progressed to the
linking of gcl.raw, where there is one unresolved symbol: sigmask.

I didn't play around with the makefiles at all, being a
techno-weenie.  Do I need to do something heroic or is there a simple
fix to this problem?

Thanks,

john



From owner-gcl@cli.com  Sun May  5 20:09:35 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id UAA09454; Sun, 5 May 1996 20:09:35 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA15235; Sun, 5 May 96 20:04:47 CDT
Received: from ccr-p.ida.org (idacrd.ccr-p.ida.org) by cli.com (4.1/SMI-4.1)
	id AA15229; Sun, 5 May 96 20:04:39 CDT
Received: from runner.ccr-p.ida.org (runner.ccr-p.ida.org [198.3.41.1]) by ccr-p.ida.org (8.6.12/8.6.12) with ESMTP id VAA11977 for <gcl@cli.com>; Sun, 5 May 1996 21:04:24 -0400
From: Frank Brickle <brickle@ccr-p.ida.org>
Received: (brickle@localhost) by runner.ccr-p.ida.org (8.6.10/8.6.9) id VAA18768 for gcl@cli.com; Sun, 5 May 1996 21:04:24 -0400
Date: Sun, 5 May 1996 21:04:24 -0400
Message-Id: <199605060104.VAA18768@runner.ccr-p.ida.org>
To: gcl@cli.com
Subject: pcl for gcl 2.1 under Linux ELF?
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 187

Running gcl 2.1 on Linux 1.1.23 (ELF) (gcc 2.7.0). Trying to build PCL
(pcl-gcl-2.1) and failing (on account of ELF, I'm guessing).

Can anyone point to patches or fixes to PCL?

Thanks.

From owner-gcl@cli.com  Mon May  6 08:00:12 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA09707; Mon, 6 May 1996 08:00:12 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA16141; Mon, 6 May 96 07:56:43 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA16135; Mon, 6 May 96 07:56:39 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id HAA18186; Mon, 6 May 1996 07:56:22 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id HAA02258; Mon, 6 May 1996 07:56:22 -0500 (CDT)
Received: from rcur (rcur7.rtp.ericsson.se [147.117.133.38]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id IAA09262; Mon, 6 May 1996 08:51:19 -0400
To: Frank Brickle <brickle@ccr-p.ida.org>
Cc: gcl@cli.com
References: <199605060104.VAA18768@runner.ccr-p.ida.org> 
Subject: Re: pcl for gcl 2.1 under Linux ELF? 
In-Reply-To: (Your message of Sun, 05 May 1996 21:04:24 EDT.)
             <199605060104.VAA18768@runner.ccr-p.ida.org> 
Date: Mon, 06 May 1996 08:54:08 -0400
Message-Id: <744.831387248@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 420


    Frank> Running gcl 2.1 on Linux 1.1.23 (ELF) (gcc 2.7.0). Trying
    Frank> to build PCL (pcl-gcl-2.1) and failing (on account of ELF,
    Frank> I'm guessing).

    Frank> Can anyone point to patches or fixes to PCL?

Don't know about PCL, but you can try gcl 2.2 with the gcl patches for
2.2.  This works just fine for me with pcl.  (Well, except for a small
bug in double-float-epsilon being too smalll.)

Ray



From owner-gcl@cli.com  Wed May  8 06:31:09 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id GAA10759; Wed, 8 May 1996 06:31:08 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA10334; Wed, 8 May 96 06:26:20 CDT
Received: from mimsy.cs.UMD.EDU by cli.com (4.1/SMI-4.1)
	id AA10328; Wed, 8 May 96 06:26:09 CDT
Received: by mimsy.cs.UMD.EDU (8.7.5/UMIACS-0.9/04-05-88)
	id HAA17419; Wed, 8 May 1996 07:25:54 -0400 (EDT)
Received: (from pcolsen@localhost) by n2ell.columbia.md.us (8.6.12/8.6.9) id HAA01046; Wed, 8 May 1996 07:23:16 -0400
Date: Wed, 8 May 1996 07:23:16 -0400
Message-Id: <199605081123.HAA01046@n2ell.columbia.md.us>
From: "Peter C. Olsen" <pcolsen@n2ell.columbia.md.us>
To: gcl@cli.com
Subject: "cannot execute binary file" : unixport/saved_gcl
Reply-To: "Peter.C.Olsen@n2ell.columbia.md.us, \"P.E.\"" <pcolsen@acm.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 671

I'm looking for help building gcl-2.2 under Linux 1.3.20 with gcc
version 2.7.0.

I'm trying to build gcl-2.2 under Linux, but the make always
stops when it attempts to execute unixport/saved_gcl with the
message "cannot execute binary file".  I've made the changes in
gcl-2.2.tar (and then "unfixed" the Linux files in h/).  

Any suggestions will be greatly appreciated.

Peter

-- 
Peter Olsen, P.E.,                                        pcolsen@acm.org
        P.O. Box 410, Simpsonville, MD 21150-0410 USA, 410-997-8584
       "Engineering is the art of applying a professional knowledge
  of mathematics and the physical sciences to improve the quality of life."

From owner-gcl@cli.com  Wed May  8 10:21:35 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA10868; Wed, 8 May 1996 10:21:35 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA10965; Wed, 8 May 96 10:15:16 CDT
Received: from sabrina.bhi.com by cli.com (4.1/SMI-4.1)
	id AA10959; Wed, 8 May 96 10:15:02 CDT
Received: (from basham@localhost) by sabrina.bhi.com (8.6.12/8.6.12) id JAA14151; Wed, 8 May 1996 09:15:25 -0600
Date: Wed, 8 May 1996 09:15:25 -0600
From: Bryan Basham <basham@bhi.com>
Message-Id: <199605081515.JAA14151@sabrina.bhi.com>
To: gcl@cli.com
Subject: [GCL] problems with build on IRIX 5.3
Cc: basham@sabrina.bhi.com
X-Mailer: [XMailTool v3.1.2b]
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 4235


Hello,

I am trying to build GCL 2.2 on an SGI Indy with IRIX 5.3.  I currently do
not have Tcl/Tk loaded.  The build crashed fairly quickly as you can see:

------------------------------ make ------------------------------
(cd bin; make all)
make[1]: Entering directory `/usr/local/gnu/gcl-2.2/bin'
make[1]: Nothing to be done for `all'.
make[1]: Leaving directory `/usr/local/gnu/gcl-2.2/bin'
(cd mp ; make all)
make[1]: Entering directory `/usr/local/gnu/gcl-2.2/mp'
make all1 "MPFILES=./mpi.o ./lo-sgi4d.o ./libmport.a"
make[2]: Entering directory `/usr/local/gnu/gcl-2.2/mp'
as lo-sgi4d.s -o lo-sgi4d.o
lo-sgi4d.s: Assembler messages:
lo-sgi4d.s:15: Warning: expected `$'
lo-sgi4d.s:15: Warning: Bad .frame directive
lo-sgi4d.s:15: Error: Rest of line ignored. First ignored character is `p'.
lo-sgi4d.s:17: Error: ERROR: Illegal operands `multu'
lo-sgi4d.s:18: Error: ERROR: Illegal operands `mfhi'
lo-sgi4d.s:19: Error: ERROR: Illegal operands `mflo'
lo-sgi4d.s:20: Error: ERROR: Illegal operands `sw'
lo-sgi4d.s:35: Warning: expected `$'
lo-sgi4d.s:35: Warning: Bad .frame directive
lo-sgi4d.s:35: Error: Rest of line ignored. First ignored character is `p'.
lo-sgi4d.s:37: Error: ERROR: Illegal operands `lw'
lo-sgi4d.s:38: Error: ERROR: Illegal operands `li'
lo-sgi4d.s:41: Error: ERROR: Illegal operands `srl'
lo-sgi4d.s:42: Error: ERROR: Illegal operands `sll'
lo-sgi4d.s:43: Error: ERROR: Illegal operands `or'
lo-sgi4d.s:44: Error: ERROR: Illegal operands `sll'
lo-sgi4d.s:45: Error: ERROR: Illegal operands `subu'
lo-sgi4d.s:46: Error: ERROR: Illegal operands `bltz'
lo-sgi4d.s:47: Error: ERROR: Illegal operands `move'
lo-sgi4d.s:48: Error: ERROR: Illegal operands `or'
lo-sgi4d.s:50: Error: ERROR: Illegal operands `subu'
lo-sgi4d.s:51: Error: ERROR: Illegal operands `bnez'
lo-sgi4d.s:52: Error: ERROR: Illegal operands `move'
lo-sgi4d.s:53: Error: ERROR: Illegal operands `sw'
make[2]: *** [lo-sgi4d.o] Error 1
make[2]: Leaving directory `/usr/local/gnu/gcl-2.2/mp'
make[1]: *** [all] Error 2
make[1]: Leaving directory `/usr/local/gnu/gcl-2.2/mp'
make: *** [all] Error 2
------------------------------ make ------------------------------

Does anyone know what's going on here?

Also, I have gas and gcc built on my system, why isn't the build using
these tools?

This is the output from the add-defs command:

-------------------------- add-defs irix5 ------------------------
using irix5.defs
#could not find tk.tcl in /public/lib/tk /usr/lib/tk /usr/local/lib/tk /usr/lib/X11/tk
Using: TK_LIBRARY=unknown
#could not find init.tcl in /public/lib /public/lib/tcl /usr/lib/tcl /usr/local/lib/tcl
Using: TCL_LIBRARY=unknown
adding X11_INCLUDE_DIR=/usr/include
#could not find tk.h in /usr/include/tcl /public/include/tcl /public/include /usr/local/include /usr/local/include/tcl /usr/include
Using: TK_INCLUDE_DIR=unknown
#could not find libtk.* in /usr/lib /usr/X11/lib /public/X11/lib /usr/X11R6/lib /public/lib /usr/local/lib
Using: TK_LIBS_DIR=unknown
#could not find libtcl.* in /usr/lib /usr/X11/lib /usr/X11R6/lib /public/X11/lib /public/lib /usr/local/lib
Using: TCL_LIBS_DIR=unknown
adding X11_LIBS_DIR=/usr/lib
#could not find *.el* in /usr/lib/emacs/site-lisp /usr/local/lib/emacs/site-lisp /public/lib/emacs/site-lisp /public/X11/lib
Using: EMACS_SITE_LISP=unknown
adding INFO_DIR=/usr/local/info
inserting h/irix5.defs in ..
 makefile,
 unixport/make_kcn,
 CLX-5.02/makefile,
 bin/makefile,
 cmpnew/makefile,
 comp/makefile,
 doc/makefile,
 dos/makefile,
 gcl-tk/makefile,
 go/makefile,
 info/makefile,
 lsp/makefile,
 mp/makefile,
 o/makefile,
 unixport/makefile,

 if the 'unknown' directories exist you may provide
a second argument to ./add-defs of a local directory where things might be,
or edit ./add-defs so that it can find them.   Otherwise just continue
and the portions with unknown will not be compiled.
-------------------------- add-defs irix5 ------------------------

Any help would be appreciated.

-Bryan Basham


[ Bryan D. Basham		    | Research is what I'm doing when I	     ]
[ Basham@BHI.COM		    | don't know what I'm doing.	     ]
[ http://www.bhi.com/~basham	    | 	-- Wernher von Braun		     ]
[ GCS !d? -p+ c++(+++) l u+ e++ --m++(*) s n+ h+(*) f* g+ w@ t+(--) r(-) x++ ]

From owner-gcl@cli.com  Wed May  8 13:59:47 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA10952; Wed, 8 May 1996 13:59:47 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA14026; Wed, 8 May 96 13:56:04 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA13994; Wed, 8 May 96 13:55:51 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA03599; Wed, 8 May 96 14:55:28 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id OAA13052; Wed, 8 May 1996 14:55:51 -0400
Date: Wed, 8 May 1996 14:55:51 -0400
Message-Id: <199605081855.OAA13052@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: file type for compilation
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 557


".lsp" and ".o" seems to be the automatic extensions added when loading files.

For example, (load "foo"), will automatically load foo.o or foo.lsp if
either one exists (in that order).

However, si::*load-types* also include ".lisp".  So why do I get an
error that file foo cannot be opened?  I assume that means that the
file was not found?

Also is there a way to compile foo.lsp if the file-write-date on the
".lsp" file was newer than the ".o" file or if the ".o" file does not exist?

Thanks,






                                          myriam



From owner-gcl@cli.com  Thu May  9 08:43:11 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA11380; Thu, 9 May 1996 08:43:10 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA06072; Thu, 9 May 96 08:38:21 CDT
Received: from london.visi.net by cli.com (4.1/SMI-4.1)
	id AA06066; Thu, 9 May 96 08:38:18 CDT
Received: from mango.galaxy.gmu.edu (imran@mango.galaxy.gmu.edu [129.174.8.211]) by london.visi.net (8.7.1/8.7.1) with SMTP id JAA06779 for <gcl@cli.com>; Thu, 9 May 1996 09:37:40 -0400 (EDT)
Received: (from imran@localhost) by mango.galaxy.gmu.edu (8.6.12/8.6.10) id JAA00674; Thu, 9 May 1996 09:44:14 -0400
Date: Thu, 9 May 1996 09:44:14 -0400
From: Imran Shah <imran@science.gmu.edu>
Message-Id: <199605091344.JAA00674@mango.galaxy.gmu.edu>
To: gcl@cli.com
Subject: ilisp
Reply-To: imran@science.gmu.edu
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1317


I am sure some has had better luck working with ilisp under xemacs
19.13. I'd be grateful if some one could let me know if there are any
tricks to it beyond the following initialization:-


(require 'completer)
(autoload 'run-ilisp "ilisp" "Select a new inferior LISP." t)
(autoload 'gcl       "ilisp" "Inferior GNU Common LISP." t)
(setq gcl-program   "/usr/local/bin/gcl")

(setq lisp-mode-hook '(lambda () (require 'ilisp)))

;;; Sample load hook
(add-hook 'ilisp-load-hook 
	  (function
	   (lambda ()
	     ;; Change default key prefix to C-c
	     (setq ilisp-prefix "\C-c")

	     ;; Make sure that you don't keep popping up the 'inferior
	     ;; lisp' buffer window when this is already visible in
	     ;; another frame. Actually this variable has more impact
	     ;; than that. Watch out.
	     ;(setq pop-up-frames t)

	     (message "Running ilisp-load-hook")
	     ;; Define LispMachine-like key bindings, too.
	     ;; (ilisp-lispm-bindings) Sample initialization hook.

	     ;; Set the inferior LISP directory to the directory of
	     ;; the buffer that spawned it on the first prompt.
	     (add-hook 'ilisp-init-hook
		       (function
			(lambda ()
			  (default-directory-lisp ilisp-last-buffer))))
	     )))

(setq load-path (cons "/usr/local/lib/gcl-2.2/lsp" load-path))



Thank you

Imran

From owner-gcl@cli.com  Thu May  9 09:27:27 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id JAA11401; Thu, 9 May 1996 09:27:27 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA06191; Thu, 9 May 96 09:24:22 CDT
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA06185; Thu, 9 May 96 09:24:20 CDT
Date: Thu, 9 May 96 09:23:59 CDT
From: bshults@math.utexas.edu
Posted-Date: Thu, 9 May 96 09:23:59 CDT
Message-Id: <9605091423.AA15248@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA15248; Thu, 9 May 96 09:23:59 CDT
To: imran@science.gmu.edu
Cc: gcl@cli.com
In-Reply-To: <199605091344.JAA00674@mango.galaxy.gmu.edu> (message from Imran Shah on Thu, 9 May 1996 09:44:14 -0400)
Subject: Re: ilisp
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 828

You absolutely must apply the patches to ilisp or gcl will not work
under ilisp.

You can find them at:

http://www.c2.org/~campbell/ilisp/index.html

Also, the path to the ilisp files must be in load-path.  Put this line
(or something like it) before the autoload lines:

(setq load-path (cons "/usr/local/lib/emacs/site-lisp/ilisp" load-path))

The change you made to the load-path at the end of your post doesn't
help (unless I'm missing something) but it doesn't really hurt either.

I hope that solves the problem with your system.

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli.com  Thu May  9 11:41:47 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA11459; Thu, 9 May 1996 11:41:47 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA07012; Thu, 9 May 96 11:35:45 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA07004; Thu, 9 May 96 11:35:42 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id LAA11330 for <gcl@cli.com>; Thu, 9 May 1996 11:35:23 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id LAA11625 for <gcl@cli.com>; Thu, 9 May 1996 11:35:22 -0500 (CDT)
Received: from rcur (rcur18.rtp.ericsson.se [147.117.133.138]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id MAA08141 for <gcl@cli.com>; Thu, 9 May 1996 12:30:21 -0400
To: GCL Mailing List <gcl@cli.com>
Subject: Number bug in most-positive-single-float
Date: Thu, 09 May 1996 12:29:57 -0400
Message-Id: <1911.831659397@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1867

Let junk.lsp contain the following function:

	(defun junk () (* 0.99 most-positive-single-float))

Consider the following gcl session, run under Solaris 2.4 (the same
happens on Linux/ELF too):

	Starting gcl-pcl ...
	GCL (GNU Common Lisp)  Version(2.2) Thu Apr  4 15:16:21 EST 1996
	Licensed under GNU Public Library License
	Contains Enhancements by W. Schelter

	>(load "junk.lsp")
	Loading junk.lsp
	Finished loading junk.lsp
	T

	>(junk)
	1.7797162035136925E308

	>(compile-file "junk" :load t :c-file "junk.c")
	Compiling junk.lsp.
	End of Pass 1.  
	End of Pass 2.  
	Loading junk.o
	start address -T 677dd8 Finished loading junk.o
	OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
	Finished compiling junk.
	#"junk.o"

	>(junk)
	Error: Can't print a non-number.
	Fast links are on: do (si::use-fast-links nil) for debugging
	Error signalled by SYSTEM:TOP-LEVEL.
	Broken at LISP:PRIN1.  Type :H for Help.
	>>:r
	Top level.
	>(setf system:*print-nans* t)
	T

	>(junk)
	#<Inf>

	>

Thus, the compiled version behaves differently from the interpreted
one.  A look at junk.c gives us a hint about why this happens.  The
relevant part of junk.c is:

	/*	function definition for JUNK	*/

	static L1()
	{register object *base=vs_base;
		register object *sup=base+VM1; VC1
		vs_check;
		check_arg(0);
		vs_top=sup;
	TTL:;
		base[0]= make_longfloat((double)(  0.99    )*(double)(1.7976931348623160e+308));
		vs_top=(vs_base=base+0)+1;
		return;
	}

Notice that most-positive-single-float has the value

	1.7976931348623160e+308		(above)
	1.7976931348623157E+308		(true value)

That difference means that the compiled value is very likely converted
to IEEE infinity, and, hence, we get #<Inf> printed out.

I don't know where the problem lies.  I suspect it is in the
the lisp compiler when it prints out numbers---it needs more
precision. 

Ray

From owner-gcl@cli.com  Thu May  9 15:52:53 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA11555; Thu, 9 May 1996 15:52:53 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA18579; Thu, 9 May 96 15:48:21 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA18573; Thu, 9 May 96 15:48:12 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA04090; Thu, 9 May 96 16:47:54 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id QAA14346; Thu, 9 May 1996 16:48:15 -0400
Date: Thu, 9 May 1996 16:48:15 -0400
Message-Id: <199605092048.QAA14346@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: run-process
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 421


I am trying to bring up our system on SGI IRIX 5.3.

GCL seems to be compiled ok, but run-process is not there.
SYSTEM>(fboundp 'run-process)
NIL

the CFLAGs seemed to have been set to:

CC = cc -xansi -D__STDC__ -DVOL=volatile -common -I${GCLDIR}/o  -I/usr/include/bsd -signed


What should I do to get this function as defined in the gcl info?

Thanks as always,




                                          myriam



From owner-gcl@cli.com  Sat May 11 14:00:54 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id OAA13125; Sat, 11 May 1996 14:00:54 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA28066; Sat, 11 May 96 13:57:57 CDT
Received: from ng.netgate.net by cli.com (4.1/SMI-4.1)
	id AA28060; Sat, 11 May 96 13:57:54 CDT
Received: from gulch.spe.com (mail.spe.com [205.214.175.7]) by ng.netgate.net (8.7.4/8.6.9) with SMTP id LAA14577 for <gcl@cli.com>; Sat, 11 May 1996 11:58:17 -0700 (PDT)
Received: (from pjm@localhost) by gulch.spe.com (8.6.12/8.6.12) id LAA01028; Sat, 11 May 1996 11:56:01 -0700
Date: Sat, 11 May 1996 11:56:01 -0700
Message-Id: <199605111856.LAA01028@gulch.spe.com>
From: Patrick May <pjm@spe.com>
To: gcl@cli.com
Subject: problem building GCL under Linux
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1360

-----BEGIN PGP SIGNED MESSAGE-----

     I'm getting the following error when attempting to build GCL 2.2
under Linux 1.2.13 (ELF) with GCC 2.7.2:

Building symbol table for ../unixport/raw_gcl ..
Loading ../cmpnew/cmpmain.lsp
Warning: COMPILE-FILE is being redefined.
Warning: COMPILE is being redefined.
Warning: DISASSEMBLE is being redefined.
Finished loading ../cmpnew/cmpmain.lsp
Loading ../cmpnew/lfun_list.lsp
Finished loading ../cmpnew/lfun_list.lsp
Loading ../cmpnew/cmpopt.lsp
Finished loading ../cmpnew/cmpopt.lsp
Loading ../lsp/auto.lsp
Finished loading ../lsp/auto.lsp
Warning: LISP-IMPLEMENTATION-VERSION is being redefined.
Can't mmap (saved_gcl): errno 22
make[1]: *** [saved_gcl] Error 1
make[1]: Leaving directory `/usr/local/gcl-2.2/unixport'
make: *** [all] Error 2

Has anyone else run into this?

Thanks,

Patrick

-----BEGIN PGP SIGNATURE-----
Version: 2.6.2
Comment: Processed by Mailcrypt 3.4, an Emacs/PGP interface

iQEVAwUBMZTitmAA81GB0e9dAQGAMAf+IiDs4XpT8Lvirst02274Y707rGrIbR3+
/mSk2uAnOi/0qValZMNieL36+rVjwQHg7dfxoAM1IlVN9Z4YoeuhdfAJYP1e6Mk/
7DfF+rzIuBW/jEp6jGhDzuMfN8Fg7ASTkVd5cfwEQw3PXEt/UzTdVytr3p6UkTA9
tq2FvmOJsor8z7uXsYnnkUcu8lUN8RAkv/CH0zXKKzWSHJR3iS5XgBuiP26pTzNm
ScNGGqnt20BF+TbVrteYQUDykZcJgsOOSCREzB5IXrIMKj7fNKPAZLUbU6JimXhk
tXSS0QTJqdMi1DU+X0Dm9A///sGSVt6ZjQxVUx2vhd2GPgUJDo5slg==
=VM4g
-----END PGP SIGNATURE-----

From owner-gcl@cli.com  Sun May 12 15:42:00 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA13969; Sun, 12 May 1996 15:42:00 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA24857; Sun, 12 May 96 15:34:33 CDT
Received: from server.indra.com by cli.com (4.1/SMI-4.1)
	id AA24851; Sun, 12 May 96 15:34:31 CDT
Received: from indra.com by server.indra.com (8.7.4/Spike-8-1.0)
	id OAA20702; Sun, 12 May 1996 14:34:11 -0600 (MDT)
Received: from jeh.indra.com by indra.com (8.7.4/Spike-8-1.0)
	id OAA15980; Sun, 12 May 1996 14:34:06 -0600 (MDT)
Received: by jeh.indra.com with Microsoft Mail
	id <01BB400F.E86152C0@jeh.indra.com>; Sun, 12 May 1996 14:32:55 -0600
Message-Id: <01BB400F.E86152C0@jeh.indra.com>
From: "James E. Hargrave III" <jhargrav@indra.com>
To: "'gcl@cli.com'" <gcl@cli.com>
Subject: GCL 2.2 with RedHat 2.1 Linux ELF system (standard kernel)
Date: Sun, 12 May 1996 14:32:50 -0600
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: quoted-printable
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 524

I have a problem compiling GCL 2.2 on my RedHat 2.1 ELF linux (standard =
kernel):

1. Get this message at the end of the make: "Can't mmap save_gcl"

The raw_gcl seems to run OK

I also don't have the file "asm/sigcontext.h" on my system which the =
default configuration seems to need.  I fixed this by playing around =
with the defines.  But not sure if I broke something or not.

I'm by no means a C hacker, but if there is a known patch for this =
problem I would appreciate it greatly.

				Regards,

				Jim Hargrave

From owner-gcl@cli.com  Sun May 12 19:08:21 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id TAA14039; Sun, 12 May 1996 19:08:21 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA25070; Sun, 12 May 96 19:04:01 CDT
Received: from wintermute.hip.cam.org (vbykov.HIP.CAM.ORG) by cli.com (4.1/SMI-4.1)
	id AA25064; Sun, 12 May 96 19:03:48 CDT
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id UAA00295; Sun, 12 May 1996 20:05:04 -0400
Date: Sun, 12 May 1996 20:05:04 -0400
From: Vassili Bykov <vbykov@cam.org>
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199605130005.UAA00295@wintermute.hip.cam.org>
To: gcl@cli.com, jhargrav@indra.com
Subject: Re: GCL 2.2 with RedHat 2.1 Linux ELF system (standard kernel)
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 299

You can get an RPM of GCL 2.2 at the RedHat site or any mirror,
under "contrib" directory.

There used to be a patch for that error on utexas GCL site, which did fix
the problem.  The site is no longer accessible, though, and I have not
seen that patch anywhere else (I haven't kept it).

--Vassili

From owner-gcl@cli.com  Mon May 13 23:30:58 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id XAA14635; Mon, 13 May 1996 23:30:57 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA28181; Mon, 13 May 96 23:21:16 CDT
Received: from wintermute.hip.cam.org (vbykov.HIP.CAM.ORG) by cli.com (4.1/SMI-4.1)
	id AA28175; Mon, 13 May 96 23:21:11 CDT
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id AAA03875; Tue, 14 May 1996 00:06:20 -0400
Date: Tue, 14 May 1996 00:06:20 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199605140406.AAA03875@wintermute.hip.cam.org>
To: gcl@cli.com
Subject: HOWTO: Building GCL 2.2 under Linux
Reply-To: vbykov@cam.org
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 621

There were two reports recently about an error building GCL 2.2 under
Linux (in particular, SI::SAVESYSTEM failed to save the image).
Contrary to what I wrote yesterday, RPM on RedHat site is not a
solution: though it is pre-built, SI::SAVESYSTEM is still broken, and
building an image with CLX or PCL is not an issue.

The right solution is to pick up the fixes at utexas site (which is no
longer accessible under "math.utexas.edu" listed everywhere):

	ftp://ftp.ma.utexas.edu/pub/gcl/gcl-2.2-fixes.tgz

and unpack them over the 2.2 source tree.  The whole thing then builds
with a simple "make" (amazing!).

--Vassili

From owner-gcl@cli.com  Tue May 14 01:14:20 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id BAA14725; Tue, 14 May 1996 01:14:20 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA04471; Tue, 14 May 96 01:08:45 CDT
Received: from hhipe.uia.ac.be by cli.com (4.1/SMI-4.1)
	id AA04465; Tue, 14 May 96 01:08:39 CDT
Received: from localhost by hhipe.uia.ac.be; (8.7.1/1.1.8.2/22Feb95-0943AM)
	id IAA12293; Tue, 14 May 1996 08:07:48 +0200 (MET DST)
Date: Tue, 14 May 1996 08:07:48 +0200 (MET DST)
From: Peter Van Eynde <natst3@uia.ua.ac.be>
X-Sender: natst3@hhipe.uia.ac.be
To: Vassili Bykov <vbykov@cam.org>
Cc: gcl@cli.com
Subject: Re: HOWTO: Building GCL 2.2 under Linux
In-Reply-To: <199605140406.AAA03875@wintermute.hip.cam.org>
Message-Id: <Pine.OSF.3.93.960514080117.28050A-100000@hhipe.uia.ac.be>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1500

On Tue, 14 May 1996, Vassili Bykov wrote:

> There were two reports recently about an error building GCL 2.2 under
> Linux (in particular, SI::SAVESYSTEM failed to save the image).
> Contrary to what I wrote yesterday, RPM on RedHat site is not a
> solution: though it is pre-built, SI::SAVESYSTEM is still broken, and
> building an image with CLX or PCL is not an issue.
> 
> The right solution is to pick up the fixes at utexas site (which is no
> longer accessible under "math.utexas.edu" listed everywhere):
> 
> 	ftp://ftp.ma.utexas.edu/pub/gcl/gcl-2.2-fixes.tgz

I found the fixes on another site, and if they're the same, then they
don't work:

1 In o/gbc.c and o/sgbc.c there are #ifdef DEBUG #endif lines missing
around places where the source want's to use debug.

2 If you keep #define DEBUG in o/gbc.c the program fails to compile.

3 In h/386-linux.h the #include <asm/sig????> line is commented out, but
you need the definitions for GET_SIG??? for gbc.
 
> 
> and unpack them over the 2.2 source tree.  The whole thing then builds
> with a simple "make" (amazing!).
> 
> --Vassili
> 

Groetjes, Peter

--
It's logic Jim, but not as we know it. finger natst3@hipe.uia.ac.be for pgp public key.
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GS/CS/L/C d->? s+:++>+@ a-- C++(+++)>$ ULOS++>++++$ P+>++++ L+++>++++
E>++ W+(--) U++>+++ o>+ K? w--- O>+@ M-? V? PS++ PE(--) Y+ PGP+>++
t++>+++ 5++ X++>+++ R tv b+++>++++ DI? D++@ G+>++ e++>++++ h!>+ r-@ y>+++**@
------END GEEK CODE BLOCK------


From owner-gcl@cli.com  Tue May 14 06:39:50 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id GAA14830; Tue, 14 May 1996 06:39:50 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09575; Tue, 14 May 96 06:35:18 CDT
Received: from wintermute.hip.cam.org (vbykov.HIP.CAM.ORG) by cli.com (4.1/SMI-4.1)
	id AA09569; Tue, 14 May 96 06:35:13 CDT
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id HAA00341; Tue, 14 May 1996 07:34:44 -0400
Date: Tue, 14 May 1996 07:34:44 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199605141134.HAA00341@wintermute.hip.cam.org>
To: Peter Van Eynde <natst3@uia.ua.ac.be>
Subject: Re: HOWTO: Building GCL 2.2 under Linux
In-Reply-To: <Pine.OSF.3.93.960514080117.28050A-100000@hhipe.uia.ac.be>
References: <199605140406.AAA03875@wintermute.hip.cam.org>
	<Pine.OSF.3.93.960514080117.28050A-100000@hhipe.uia.ac.be>
Reply-To: vbykov@cam.org
Cc: gcl@cli.com
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 347

Peter Van Eynde writes:
 > > 
 > > 	ftp://ftp.ma.utexas.edu/pub/gcl/gcl-2.2-fixes.tgz
 > 
 > I found the fixes on another site, and if they're the same, then they
 > don't work:

Well, at least the system built and then I successfully built CLX and
PCL and saved the image.  How do the three problems you listed show up
later?

Cheers,

--Vassili

From owner-gcl@cli.com  Wed May 15 09:10:39 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id JAA15430; Wed, 15 May 1996 09:10:38 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA23637; Wed, 15 May 96 09:05:59 CDT
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA23631; Wed, 15 May 96 09:05:57 CDT
Date: Wed, 15 May 96 09:05:27 CDT
From: bshults@math.utexas.edu
Posted-Date: Wed, 15 May 96 09:05:27 CDT
Message-Id: <9605151405.AA27322@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA27322; Wed, 15 May 96 09:05:27 CDT
To: gcl@cli.com
Subject: gcl 2.2 on Linux: trouble with xp-code and gazonk
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1396

I have intermittent trouble compiling and loading R. Water's xp-code
file on gcl.  This is the file which implements ANSI pretty printing.
Sometimes it works just fine; other times, it gives errors.  I have
not made changes to the xp-code file.

Sometimes it gives me errors in compiling and sometimes it gives me
errors when it loads the file it has compiled.

Here is the error I've been getting recently when loading the compiled
file.

>:m
NIL is not of type HASH-TABLE.

Error: NIL is not of type HASH-TABLE.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by LISP:PRIN1.
Backtrace: system:universal-error-handler > LISP:PRIN1

Broken at LISP:PRINC.
XP>>

Compiling OR loading xp-code makes gcl create a file called gazonk
and compile it.  I think that's where the problem is.  I can't
reproduce the problem all the time.

If any expert can reproduce this and figure it out, I would appreciate
it.

In order to fix it, I just have to exit lisp and try again because the
error causes problems with the printer (and sometimes damages memory)
and so nothing works.

Thanks,

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli.com  Wed May 15 10:50:25 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA15462; Wed, 15 May 1996 10:50:25 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA23836; Wed, 15 May 96 10:48:39 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA23830; Wed, 15 May 96 10:48:35 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id KAA04855; Wed, 15 May 1996 10:47:31 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id KAA24510; Wed, 15 May 1996 10:47:30 -0500 (CDT)
Received: from rcur (rcur18.rtp.ericsson.se [147.117.133.138]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id LAA27883; Wed, 15 May 1996 11:42:30 -0400
To: bshults@fireant.ma.utexas.edu
Cc: gcl@cli.com
References: <9605151405.AA27322@marie.ma.utexas.edu> 
Subject: Re: gcl 2.2 on Linux: trouble with xp-code and gazonk 
In-Reply-To: (Your message of Wed, 15 May 1996 09:05:27 CDT.)
             <9605151405.AA27322@marie.ma.utexas.edu> 
Date: Wed, 15 May 1996 11:42:10 -0400
Message-Id: <7861.832174930@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 852

>>>>> "bshults" == bshults  <bshults@fireant.ma.utexas.edu> writes:


    bshults> I have intermittent trouble compiling and loading
    bshults> R. Water's xp-code file on gcl.  This is the file which
    bshults> implements ANSI pretty printing. Sometimes it works just
    bshults> fine; other times, it gives errors.  I have not made
    bshults> changes to the xp-code file.

    bshults> Sometimes it gives me errors in compiling and sometimes
    bshults> it gives me errors when it loads the file it has
    bshults> compiled.

[desc deleted]

I don't have this problem.  However, I like xp enough that as part of
my standard build, I load up xp, dump gcl with it (along with
defpackage and ansi-loop), and use THAT as my default gcl.  

I know it doesn't really solve what you are asking, but perhaps the
end result is acceptable to you.

Ray

From owner-gcl@cli.com  Wed May 15 14:45:49 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id OAA15556; Wed, 15 May 1996 14:45:49 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA24457; Wed, 15 May 96 14:42:37 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA24451; Wed, 15 May 96 14:42:34 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA24178; Wed, 15 May 96 15:42:10 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id PAA19805; Wed, 15 May 1996 15:42:38 -0400
Date: Wed, 15 May 1996 15:42:38 -0400
Message-Id: <199605151942.PAA19805@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: Calling a C function
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 454



I would like to call a c function.  

I am on an SGI, Irix 5.3.
Just loading the ".o" file won't do.  I get "Can't open dynamic link"
error.  

I then tried to build raw_gcl with the code.  Everything seems to
compile right.  However, the function is not defined in the Lisp.  

I have an init_foo () with make_si_function that gets called in
main.c. What else do I need for the interface?  

Thanks,
                                          myriam



From owner-gcl@cli.com  Wed May 15 15:03:36 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA15566; Wed, 15 May 1996 15:03:36 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA24501; Wed, 15 May 96 14:59:41 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA24495; Wed, 15 May 96 14:59:38 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA24611; Wed, 15 May 96 15:59:15 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id PAA19811; Wed, 15 May 1996 15:59:43 -0400
Date: Wed, 15 May 1996 15:59:43 -0400
Message-Id: <199605151959.PAA19811@play.nlm.nih.gov>
From: Myriam Abramson <mabramson@nlm.nih.gov>
To: gcl@cli.com
Subject: calling a c function
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 122



Sorry, the call is working just fine.  I had the wrong lisp image.


                                          myriam



From owner-gcl@cli.com  Wed May 15 16:15:34 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id QAA15589; Wed, 15 May 1996 16:15:34 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA24667; Wed, 15 May 96 16:11:53 CDT
Received: from ng.netgate.net by cli.com (4.1/SMI-4.1)
	id AA24661; Wed, 15 May 96 16:11:31 CDT
Received: from gulch.spe.com (mail.spe.com [205.214.175.7]) by ng.netgate.net (8.7.4/8.6.9) with SMTP id OAA05298; Wed, 15 May 1996 14:12:04 -0700 (PDT)
Received: (from pjm@localhost) by gulch.spe.com (8.6.12/8.6.12) id OAA00800; Wed, 15 May 1996 14:08:38 -0700
Date: Wed, 15 May 1996 14:08:38 -0700
Message-Id: <199605152108.OAA00800@gulch.spe.com>
From: Patrick May <pjm@spe.com>
To: vbykov@cam.org
Cc: gcl@cli.com
Subject: HOWTO: Building GCL 2.2 under Linux
In-Reply-To: <199605140406.AAA03875@wintermute.hip.cam.org>
References: <199605140406.AAA03875@wintermute.hip.cam.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1033

Vassili Bykov writes:
 > There were two reports recently about an error building GCL 2.2 under
 > Linux (in particular, SI::SAVESYSTEM failed to save the image).
 > Contrary to what I wrote yesterday, RPM on RedHat site is not a
 > solution: though it is pre-built, SI::SAVESYSTEM is still broken, and
 > building an image with CLX or PCL is not an issue.
 > 
 > The right solution is to pick up the fixes at utexas site (which is no
 > longer accessible under "math.utexas.edu" listed everywhere):
 > 
 > 	ftp://ftp.ma.utexas.edu/pub/gcl/gcl-2.2-fixes.tgz
 > 
 > and unpack them over the 2.2 source tree.  The whole thing then builds
 > with a simple "make" (amazing!).

     First, a public thank you to Mr. Bykov for all his help on this
issue.

     Unfortunately, after retrieving the file specified above,
untaring it over the gcl-2.2 source tree, and running 'make clean' (to
start fresh), 'make' resulted in the same errors as before.  Has
anyone else got it to work under Linux 1.2.13 (ELF) and gcc 2.7.2?

Thanks,

Patrick

From owner-gcl@cli.com  Wed May 15 21:38:53 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id VAA15709; Wed, 15 May 1996 21:38:53 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA25359; Wed, 15 May 96 21:36:53 CDT
Received: from wintermute.hip.cam.org (vbykov.HIP.CAM.ORG) by cli.com (4.1/SMI-4.1)
	id AA25353; Wed, 15 May 96 21:36:48 CDT
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id VAA00792; Wed, 15 May 1996 21:10:35 -0400
Date: Wed, 15 May 1996 21:10:35 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199605160110.VAA00792@wintermute.hip.cam.org>
To: Patrick May <pjm@spe.com>
Cc: gcl@cli.com
Subject: Re: HOWTO: Building GCL 2.2 under Linux
In-Reply-To: <199605152108.OAA00800@gulch.spe.com>
References: <199605140406.AAA03875@wintermute.hip.cam.org>
	<199605152108.OAA00800@gulch.spe.com>
Reply-To: vbykov@cam.org
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 505

Patrick May writes:
 > [...]
 >      Unfortunately, after retrieving the file specified above,
 > untaring it over the gcl-2.2 source tree, and running 'make clean' (to
 > start fresh), 'make' resulted in the same errors as before.  Has
 > anyone else got it to work under Linux 1.2.13 (ELF) and gcc 2.7.2?
 > 
 > Thanks,
 > 
 > Patrick

Exactly, my setup is (RedHat 2.0 with some packages upgraded):

1.2.13 (ELF)
gcc 2.7.0
libc 5.2.18
binutils 2.6
ld.so 1.7.14

The patches *do* work for me!

--Vassili

From owner-gcl@cli.com  Thu May 16 10:31:54 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA16002; Thu, 16 May 1996 10:31:54 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA08497; Thu, 16 May 96 10:26:20 CDT
Received: from haymarket.ed.ac.uk ([129.215.128.53]) by cli.com (4.1/SMI-4.1)
	id AA08491; Thu, 16 May 96 10:26:13 CDT
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id QAA09746; Thu, 16 May 1996 16:24:48 +0100
Received: from subnode.aiai.ed.ac.uk (ebay) by aiai.ed.ac.uk; Thu, 16 May 96 16:22:36 BST
Date: Thu, 16 May 96 16:22:35 BST
Message-Id: <3335.9605161522@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: HOWTO: Building GCL 2.2 under Linux
To: Patrick May <pjm@spe.com>, vbykov@cam.org
In-Reply-To: Patrick May's message of Wed, 15 May 1996 14:08:38 -0700
Cc: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 445

>      Unfortunately, after retrieving the file specified above,
> untaring it over the gcl-2.2 source tree, and running 'make clean' (to
> start fresh), 'make' resulted in the same errors as before.  Has
> anyone else got it to work under Linux 1.2.13 (ELF) and gcc 2.7.2?

Have you tried unpacking again from the original .tar files in an
empty directory rather than using "make clean"?  It's possible that
"make clean" isn't enough.

-- jeff

From owner-gcl@cli.com  Thu May 16 13:15:10 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA16061; Thu, 16 May 1996 13:15:10 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09117; Thu, 16 May 96 13:12:51 CDT
Received: from ng.netgate.net by cli.com (4.1/SMI-4.1)
	id AA09111; Thu, 16 May 96 13:12:45 CDT
Received: from gulch.spe.com (mail.spe.com [205.214.175.7]) by ng.netgate.net (8.7.4/8.6.9) with SMTP id LAA17413; Thu, 16 May 1996 11:13:30 -0700 (PDT)
Received: (from pjm@localhost) by gulch.spe.com (8.6.12/8.6.12) id LAA02636; Thu, 16 May 1996 11:10:52 -0700
Date: Thu, 16 May 1996 11:10:52 -0700
Message-Id: <199605161810.LAA02636@gulch.spe.com>
From: Patrick May <pjm@spe.com>
To: vbykov@cam.org
Cc: gcl@cli.com
Subject: Re: HOWTO: Building GCL 2.2 under Linux
In-Reply-To: <199605160110.VAA00792@wintermute.hip.cam.org>
References: <199605140406.AAA03875@wintermute.hip.cam.org>
	<199605152108.OAA00800@gulch.spe.com>
	<199605160110.VAA00792@wintermute.hip.cam.org>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 860

Vassili Bykov writes:
 > Patrick May writes:
 >  > [...]
 >  >      Unfortunately, after retrieving the file specified above,
 >  > untaring it over the gcl-2.2 source tree, and running 'make clean' (to
 >  > start fresh), 'make' resulted in the same errors as before.  Has
 >  > anyone else got it to work under Linux 1.2.13 (ELF) and gcc 2.7.2?
 > 
 > Exactly, my setup is (RedHat 2.0 with some packages upgraded):
 > 
 > 1.2.13 (ELF)
 > gcc 2.7.0
 > libc 5.2.18
 > binutils 2.6
 > ld.so 1.7.14
 > 
 > The patches *do* work for me!

     Apparently either 'make clean' was insufficient or I should have
rerun 'add-defs 386-linux'.  I rm'd the whole build directory,
unpackaged the distribution, immediately unpackaged the fixes on top
of the source tree, followed the README directions, and now have a
working gcl.  Thanks again for the help.

Regards,

pjm

From owner-gcl@cli.com  Thu May 16 13:37:50 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA16067; Thu, 16 May 1996 13:37:50 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09149; Thu, 16 May 96 13:35:53 CDT
Received: from marie.ma.utexas.edu by cli.com (4.1/SMI-4.1)
	id AA09143; Thu, 16 May 96 13:35:51 CDT
Date: Thu, 16 May 96 13:35:16 CDT
From: bshults@math.utexas.edu
Posted-Date: Thu, 16 May 96 13:35:16 CDT
Message-Id: <9605161835.AA03408@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA03408; Thu, 16 May 96 13:35:16 CDT
To: pjm@spe.com
Cc: vbykov@cam.org, gcl@cli.com
In-Reply-To: <199605152108.OAA00800@gulch.spe.com> (message from Patrick May on Wed, 15 May 1996 14:08:38 -0700)
Subject: Re: HOWTO: Building GCL 2.2 under Linux
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 555

You ask:
   Has
   anyone else got it to work under Linux 1.2.13 (ELF) and gcc 2.7.2?

I haven't followed your problems carefully but I can say that I
compiled gcl 2.2 on Linux 1.2.13 ELF with gcc 2.7.0 without a problem.
(Other than trouble with xp-code.)

Benji

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli.com  Wed May 22 08:27:47 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA04005; Wed, 22 May 1996 08:27:47 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA25195; Wed, 22 May 96 08:21:44 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA25189; Wed, 22 May 96 08:21:41 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA04402; Wed, 22 May 96 09:21:39 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id JAA27531; Wed, 22 May 1996 09:22:13 -0400
Date: Wed, 22 May 1996 09:22:13 -0400
Message-Id: <199605221322.JAA27531@play.nlm.nih.gov>
From: mabramson@nlm.nih.gov (Myriam Abramson)
To: gcl@cli.com
Subject: init.lsp
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 254


I am having some problems getting the init.lsp file to load automatically.  

In some cases, even the -load does not work.  Has anybody experienced
this problem (and corrected it)?

Thanks as always,


                                          myriam



From owner-gcl@cli.com  Fri May 24 08:16:08 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA05081; Fri, 24 May 1996 08:16:08 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA13762; Fri, 24 May 96 08:13:34 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA13756; Fri, 24 May 96 08:13:30 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA29723; Fri, 24 May 96 09:13:27 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id JAA02261; Fri, 24 May 1996 09:14:04 -0400
Date: Fri, 24 May 1996 09:14:04 -0400
Message-Id: <199605241314.JAA02261@play.nlm.nih.gov>
From: mabramson@nlm.nih.gov (Myriam Abramson)
To: gcl@cli.com
Subject: number bug?
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 253


#+Irix 5.3

Can anybody point me to a fix for this apparent bug?  


>(read-from-string "0.06")
0.059999999999999998
4

Thanks as always,


PS. A new make did wonders for my initialization problem.



                                          myriam



From owner-gcl@cli.com  Sat May 25 11:41:08 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA06145; Sat, 25 May 1996 11:41:08 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA00256; Sat, 25 May 96 11:38:16 CDT
Received: from neurocog.lrdc.pitt.edu by cli.com (4.1/SMI-4.1)
	id AA00250; Sat, 25 May 96 11:38:12 CDT
Received: by neurocog.lrdc.pitt.edu
	(1.37.109.10G/16.2) id AA092762282; Sat, 25 May 1996 12:38:02 -0400
Date: Sat, 25 May 1996 12:38:02 -0400 (EDT)
From: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
To: gcl@cli.com
Subject: make lossage under RedHat 3.0.3
Message-Id: <Pine.HPP.3.91.960525123207.9240A-100000@neurocog.lrdc.pitt.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 2018

I've been trying to make gcl (2.1 or 2.2; whatever I can get at this
point!) under RedHat 3.0.3 but it's lossage right and left.  Can
someone help me through this trying time?

Thanks in advance,
'Jeff

-------------------------------------
2.1 fails to link because there's a math library missing:

<most of the make deleted>

../o/big.o: In function `add_int_big':
../o/big.o(.text+0x31b): undefined reference to `addsi'
../o/big.o: In function `mul_int_big':
../mp/mpi-386d.o(.text+0x3ea): undefined reference to `_cgeti'
../mp/mpi-386d.o(.text+0x4c9): undefined reference to `_avma'

<several hundred lines of undef. refs. deleted>

../mp/mpi-386d.o(.text+0x15a5): undefined reference to `_gerepile'
../mp/mpi-386d.o(.text+0x15c9): undefined reference to `_gerepile'
make[1]: *** [raw_gcl] Error 1
make[1]: Leaving directory `/usr/local/gcl/gcl-2.1/unixport'
make: *** [all] Error 2

-------------------------------------
Once you fix that, it compiles and links but simply doesn't work:

<most of the make deleted>

-e "s:GCL-1:GCL-"`cat ../majvers`":g" 	> foo 
../unixport/raw_gcl ../unixport/ -libdir /usr/local/gcl/gcl-2.1/ < foo
GCL (GNU Common Lisp)  April 1994  32768 pages

Unrecoverable error: Segmentation violation..
make[1]: *** [saved_gcl] Error 134
make[1]: Leaving directory `/usr/local/gcl/gcl-2.1/unixport'
make: *** [all] Error 2

-------------------------------------
2.2 Loses immediately:

cat h/config.h | sed -e "1,/Begin for cmpincl/d" \
	-e "/End for cmpinclude/,50000d" > tmpx

<...normal junk deleted...>

../h/config.h:45: asm/sigcontext.h: No such file or directory
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1124: dereferencing pointer to incomplete type
make[1]: *** [gbc.o] Error 1
make[1]: Leaving directory `/usr/local/gcl/gcl-2.2/o'
make: *** [all] Error 2

From owner-gcl@cli.com  Mon Jun  3 01:04:45 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id BAA11721; Mon, 3 Jun 1996 01:04:45 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA25361; Mon, 3 Jun 96 00:56:23 CDT
Received: from ican.net (zardoz.ican.net) by cli.com (4.1/SMI-4.1)
	id AA25355; Mon, 3 Jun 96 00:56:20 CDT
Received: from ns.ulix.net(really [206.231.214.8]) by ican.net
	via smail with esmtp
	id <m0uQSr5-001i5gC@ican.net>
	for <gcl@cli.com>; Mon, 3 Jun 96 02:11:07 -0400 (EDT)
	(/\##/\ Smail3.1.30.13 #30.36 built 4-nov-95)
Received: from Xts01-10.ulix.net (Xts01-10 [206.231.214.40]) by ns.ulix.net (8.6.12/8.6.9) with SMTP id AAA10733 for <gcl@cli.com>; Mon, 3 Jun 1996 00:56:44 -0400
Date: Mon, 3 Jun 1996 00:56:44 -0400
Message-Id: <199606030456.AAA10733@ns.ulix.net>
X-Sender: mproulx@ulix.net
X-Mailer: Windows Eudora Version 1.4.3
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: gcl@cli.com
From: mproulx@ulix.net (Martin Proulx)
Subject: Problems compiling...
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1210


        Hello,

        I'm encountering some problems compiling compiling GCL 2.2 on a
Linux ELF system , Red Hat 3.0.3 distribution (kernel 1.2.13).  I got the
sources of GCL from you site (ftp.cli.com).

        The exact problem is that the raw_gcl cannot save the image (after
loading succesfully all the extra stuff) to make saved_gcl.  When it attemps
to do so, I get the error "Can't mmap (saved_gcl) :errno 22".

        I believe this error messages comes from unexelf.c, which would turn
the running lisp with the extra stuff into an elf executable.

        I didn't change anything at all from the make files.  I just told
the system that I was running a 386-linux, and then ran make.  I first had
to get the "sigcontext.h" file and add it in my Linux /include/asm sources.
I grabbed this on another linux system, not knowing exactly where this file
came from, and what version it is (or what kernel version it goes with...).
        
        So.. can anyone help me out with this?

        I know GCL can be compiled on an ELF system, since that slackware
distributes GCL 2.1 on an ELF system.  I'd just like to be able to use the
latest version.

        Thanks to all of you!

        Martin


From owner-gcl@cli.com  Mon Jun  3 09:21:45 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id JAA11882; Mon, 3 Jun 1996 09:21:44 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA25984; Mon, 3 Jun 96 09:17:56 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA25978; Mon, 3 Jun 96 09:17:54 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA28333; Mon, 3 Jun 96 10:17:50 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id KAA03704; Mon, 3 Jun 1996 10:18:33 -0400
Date: Mon, 3 Jun 1996 10:18:33 -0400
Message-Id: <199606031418.KAA03704@play.nlm.nih.gov>
From: mabramson@nlm.nih.gov (Myriam Abramson)
To: gcl@cli.com
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 407


I got this error when compiling a lambda function. 
I couldn't duplicate the error when compiling the function in a fresh
lisp.  Does anyone know what this message means and what could cause
it?


Compiling gazonk13.lsp.
End of Pass 1.  
Error: Caught fatal error [memory may be damaged]
Error signalled by COMPILER::WT-FASD-DATA-FILE.


Thanks to all,


                                          myriam



From owner-gcl@cli.com  Mon Jun  3 12:44:04 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id MAA11938; Mon, 3 Jun 1996 12:44:04 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA26367; Mon, 3 Jun 96 12:41:34 CDT
Received: from piglet.splode.com (piglet.cli.com) by cli.com (4.1/SMI-4.1)
	id AA26361; Mon, 3 Jun 96 12:41:31 CDT
Received: (from friedman@localhost) by piglet.splode.com (8.6.12/8.6.12) id MAA04339; Mon, 3 Jun 1996 12:41:20 -0500
Date: Mon, 3 Jun 1996 12:41:20 -0500
Message-Id: <199606031741.MAA04339@piglet.splode.com>
From: friedman@splode.com (Noah Friedman)
To: mproulx@ulix.net
Cc: gcl@cli.com
Subject: Problems compiling...
Reply-To: friedman@splode.com
In-Reply-To: <mproulx@ulix.net> Mon, 3 Jun 1996 00:56:44 -0400
References: <199606030456.AAA10733@ns.ulix.net>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 644

>        I'm encountering some problems compiling compiling GCL 2.2 on a
>Linux ELF system , Red Hat 3.0.3 distribution (kernel 1.2.13).  I got the
>sources of GCL from you site (ftp.cli.com).
>
>        The exact problem is that the raw_gcl cannot save the image (after
>loading succesfully all the extra stuff) to make saved_gcl.  When it attemps
>to do so, I get the error "Can't mmap (saved_gcl) :errno 22".

Unfortunately, in linux 1.2.13 you cannot mmap using MAP_WRITE|MAP_SHARED,
which perhaps gcl 2.2 is using to dump the image to file.

I have no personal knowledge of whether modifying mmapped files works in
linux 1.3.x or pre-2.0.

From owner-gcl@cli.com  Mon Jun  3 12:45:16 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id MAA11942; Mon, 3 Jun 1996 12:45:15 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA26377; Mon, 3 Jun 96 12:43:35 CDT
Received: from ng.netgate.net by cli.com (4.1/SMI-4.1)
	id AA26371; Mon, 3 Jun 96 12:43:21 CDT
Received: from gulch.spe.com (mail.spe.com [205.214.175.7]) by ng.netgate.net (8.7.4/8.6.9) with SMTP id KAA06209; Mon, 3 Jun 1996 10:45:34 -0700 (PDT)
Received: (from pjm@localhost) by gulch.spe.com (8.6.12/8.6.12) id KAA00306; Mon, 3 Jun 1996 10:39:07 -0700
Date: Mon, 3 Jun 1996 10:39:07 -0700
Message-Id: <199606031739.KAA00306@gulch.spe.com>
From: Patrick May <pjm@spe.com>
To: mproulx@ulix.net (Martin Proulx)
Cc: gcl@cli.com
Subject: Problems compiling...
In-Reply-To: <199606030456.AAA10733@ns.ulix.net>
References: <199606030456.AAA10733@ns.ulix.net>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1345

Martin Proulx writes:
 >         I'm encountering some problems compiling compiling GCL 2.2 on a
 > Linux ELF system , Red Hat 3.0.3 distribution (kernel 1.2.13).  I got the
 > sources of GCL from you site (ftp.cli.com).
 > 
 >         The exact problem is that the raw_gcl cannot save the image (after
 > loading succesfully all the extra stuff) to make saved_gcl.  When it attemps
 > to do so, I get the error "Can't mmap (saved_gcl) :errno 22".
 > 
 >         I believe this error messages comes from unexelf.c, which would turn
 > the running lisp with the extra stuff into an elf executable.
 > 
 >         I didn't change anything at all from the make files.  I just told
 > the system that I was running a 386-linux, and then ran make.  I first had
 > to get the "sigcontext.h" file and add it in my Linux /include/asm sources.
 > I grabbed this on another linux system, not knowing exactly where this file
 > came from, and what version it is (or what kernel version it goes with...).
 >         
 >         So.. can anyone help me out with this?
 > 
 >         I know GCL can be compiled on an ELF system, since that slackware
 > distributes GCL 2.1 on an ELF system.  I'd just like to be able to use the
 > latest version.

     Apply the 2.2 fix available from the ftp site.  This must be done
on a fresh copy of the 2.2 source.

pjm

From owner-gcl@cli.com  Tue Jun  4 08:40:34 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA12383; Tue, 4 Jun 1996 08:40:33 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA08726; Tue, 4 Jun 96 08:36:26 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA08720; Tue, 4 Jun 96 08:36:23 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA00603; Tue, 4 Jun 96 09:36:21 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id JAA04974; Tue, 4 Jun 1996 09:37:09 -0400
Date: Tue, 4 Jun 1996 09:37:09 -0400
Message-Id: <199606041337.JAA04974@play.nlm.nih.gov>
From: mabramson@nlm.nih.gov (Myriam Abramson)
To: gcl@cli.com
Subject: Time Zone
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 327



Could somebody tell me if they have problems with the time zones and
how they fixed it? GCL does not seem to have picked up $TZ very well:

echo $TZ
EST5EDT

(get-decoded-time)
36
15
7
4
6
1996
1
NIL
6

BTW, when could we expect the next GCL version?  

Thanks as always,


                                          myriam



From owner-gcl@cli.com  Tue Jun  4 09:18:08 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id JAA12419; Tue, 4 Jun 1996 09:18:08 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA08833; Tue, 4 Jun 96 09:16:48 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA08827; Tue, 4 Jun 96 09:16:41 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id JAA01983 for <gcl@cli.com>; Tue, 4 Jun 1996 09:16:39 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id JAA24518 for <gcl@cli.com>; Tue, 4 Jun 1996 09:16:39 -0500 (CDT)
Received: from rcur (rcur18.rtp.ericsson.se [147.117.133.138]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id KAA13751 for <gcl@cli.com>; Tue, 4 Jun 1996 10:11:48 -0400
To: GCL Mailing List <gcl@cli.com>
Subject: Some bugs in elementary functions
Date: Tue, 04 Jun 1996 10:11:39 -0400
Message-Id: <18103.833897499@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 2399

While doing some numerical computations (gasp!) in gcl, I came across
the following bugs:

(abs #c(1e300 1e300)) signals an error instead of returning
1.414...e300.

(sinh 1e-20) returns zero instead of 1e-20.

Looking at the numlib.lsp, the reasons for these errors are obvious.
Thus, here are "fixed" versions of these functions.  abs won't
overflow unless the result overflows, and sinh and cosh should be more
accurate now.  These fixes are not probably not perfect, but the
answers should be better than before

I hope this will be useful to someone.

Ray

P.S.  Looks like some of the other elementary functions could also use
a little tuning.

(defun abs (z)
  (cond ((complexp z)
	 ;; Compute (sqrt (+ (* x x) (* y y))) carefully to prevent
	 ;; overflow!
	 (let* ((x (abs (realpart z)))
		(y (abs (imagpart z))))
	   (if (< x y)
	       (rotatef x y))
	   (if (zerop x)
	       x
	       (let ((r (/ x y)))
		 (* x (sqrt (+ 1 (* r r))))))))
	(t				; Should this be (realp z) instead of t?
	 (if (minusp z)
	     (- z)
	     z))))

(defun sinh (z)
  (cond ((complexp z)
	 ;; For complex Z, compute the real and imaginary parts
	 ;; separately to get better precision.
	 (let ((x (realpart z))
	       (y (imagpart z)))
	   (complex (* (sinh x) (cos y))
		    (* (cosh x) (sin y)))))
	(t				; Should this be (realp z) instead of t?
	 (let ((limit #.(expt (* double-float-epsilon 45/2) 1/5)))
	   (if (< (- limit) z limit)
	       ;; For this region, write use the fact that sinh z =
	       ;; z*exp(z)*[(1 - exp(-2z))/(2z)].  Then use the first
	       ;; 4 terms in the Taylor series expansion of
	       ;; (1-exp(-2z))/2/z.  series expansion of (1 -
	       ;; exp(2*x)).  This is needed because there is severe
	       ;; roundoff error calculating (1 - exp(-2z)) for z near
	       ;; 0.
	       (* z (exp z)
		  (- 1 (* z
			  (- 1 (* z
				  (- 2/3 (* z
					    (- 1/3 (* 2/15 z)))))))))
	       (let ((e (exp z)))
		 (* 1/2 (- e (/ e)))))))))

(defun cosh (z)
  (cond ((complexp z)
	 ;; For complex Z, compute the real and imaginary parts
	 ;; separately to get better precision.
	 (let ((x (realpart z))
	       (y (imagpart z)))
	   (complex (* (cosh x) (cos y))
		    (* (sinh x) (sin y)))))
	(t				; Should this be (realp z) instead of t?
	 ;; For real Z, there's no chance of round-off error, so
	 ;; direct evaluation is ok.
	 (let ((e (exp z)))
	   (* 1/2 (+ e (/ e)))))))



From owner-gcl@cli.com  Tue Jun  4 10:17:23 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA12446; Tue, 4 Jun 1996 10:17:23 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA08991; Tue, 4 Jun 96 10:14:52 CDT
Received: from colossus.cse.psu.edu by cli.com (4.1/SMI-4.1)
	id AA08985; Tue, 4 Jun 96 10:14:47 CDT
Received: from trantor.cse.psu.edu ([130.203.1.10]) by colossus.cse.psu.edu with SMTP id <78784>; Tue, 4 Jun 1996 11:14:39 -0400
To: gcl@cli.com
Subject: Building GCL 2.2 under Solaris 2.5
X-Uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: 	Tue, 4 Jun 1996 11:15:18 -0400
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Message-Id: <96Jun4.111439edt.78784@colossus.cse.psu.edu>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 2969

Hello all,

I have a couple of questions.  I am trying to build gcl-2.2 under Solaris 2.5
with gcc 2.7.2, tcl 7.5, tk 4.1.  The following error is generated when compiling gbc.c:

gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -I../g
cl-tk -I../h/ -O4  gbc.c
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1124: void value not ignored as it ought to be
gmake[1]: *** [gbc.o] Error 1

The problem is the definition of the GET_FAULT_ADDR macro in h/solaris.h:

#define GET_FAULT_ADDR(sig,code,scp,addr) \
  (code ? ((siginfo_t *)code )->si_addr : error("no address info"))

The routine error() is defined as void in o/main.c and h/cmpinclude.h.  I have
yet to come up with a fix for this.  Has this been fixed by someone else?

The following error occurs when compiling socket.c:

gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -I../gcl-tk -I../h/ -O4  -I/usr/openwin/include -c  sockets.c
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from sockets.c:30:
/local/gnu/lib/gcc-lib/sparc-sun-solaris2/2.7.2/include/sys/param.h:164: warning: `MAXPATHLEN' redefined
../h/../h/notcomp.h:37: warning: this is the location of the previous definition
In file included from /usr/include/sys/turnstile.h:11,
                 from /usr/include/sys/t_lock.h:20,
                 from /usr/include/sys/vnode.h:37,
                 from /usr/include/sys/stream.h:16,
                 from /usr/include/netinet/in.h:28,
                 from sockets.c:30:
/local/gnu/lib/gcc-lib/sparc-sun-solaris2/2.7.2/include/sys/param.h:380: warning: `PAGESIZE' redefined
../h/../h/object.h:41: warning: this is the location of the previous definition
sockets.c: In function `fSset_sigio_for_fd':
sockets.c:459: `FASYNC' undeclared (first use this function)
sockets.c:459: (Each undeclared identifier is reported only once
sockets.c:459: for each function it appears in.)
gmake: *** [sockets.o] Error 1

This error is fixed by applying the following patch to o/sockets.c:

===================================================================
RCS file: RCS/sockets.c,v
retrieving revision 1.1
retrieving revision 1.3
diff -c -r1.1 -r1.3
*** /tmp/T0a001zX       Tue Jun  4 11:09:13 1996
--- /tmp/T1a001zX       Tue Jun  4 11:09:13 1996
***************
*** 45,50 ****
--- 45,54 ----
  
  #include <errno.h> 
  
+ #if   !defined(FASYNC) && defined(__svr4__)
+ #include <sys/file.h>
+ #endif        /* !defined(FASYNC) && defined(__svr4__) */
+ 
  void write_timeout_error();
  void connection_failure();




From owner-gcl@cli.com  Tue Jun  4 11:09:45 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA12469; Tue, 4 Jun 1996 11:09:44 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09143; Tue, 4 Jun 96 11:07:42 CDT
Received: from mailserver.di.unipi.it (memphis.di.unipi.it) by cli.com (4.1/SMI-4.1)
	id AA09133; Tue, 4 Jun 96 11:06:32 CDT
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.7.5/8.7.3) with ESMTP id SAA02740; Tue, 4 Jun 1996 18:04:18 +0200 (MET DST)
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id SAA26105; Tue, 4 Jun 1996 18:04:17 +0200
Date: Tue, 4 Jun 1996 18:04:17 +0200
Message-Id: <199606041604.SAA26105@omega.di.unipi.it>
To: toy@rtp.ericsson.se
Cc: gcl@cli.com
In-Reply-To: <18103.833897499@rtp.ericsson.se> (message from Raymond Toy on Tue, 04 Jun 1996 10:11:39 -0400)
Subject: Re: Some bugs in elementary functions
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 445


You probabily meant this:

(defun abs (z)
  (cond ((complexp z)
	 ;; Compute (sqrt (+ (* x x) (* y y))) carefully to prevent
	 ;; overflow!
	 (let* ((x (abs (realpart z)))
		(y (abs (imagpart z))))
	   (if (< x y)
	       (rotatef x y))
	   (if (zerop y)	;;; y instead of x
	       x
	       (let ((r (/ x y)))
		 (* x (sqrt (+ 1 (* r r))))))))
	(t				; Should this be (realp z) instead of t?
	 (if (minusp z)
	     (- z)
	     z))))

-- Beppe

From owner-gcl@cli.com  Tue Jun  4 11:35:50 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA12477; Tue, 4 Jun 1996 11:35:50 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09230; Tue, 4 Jun 96 11:34:05 CDT
Received: from gwa.ericsson.com by cli.com (4.1/SMI-4.1)
	id AA09224; Tue, 4 Jun 96 11:34:00 CDT
Received: from mr2.exu.ericsson.se (mr2.exu.ericsson.com [138.85.147.12]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id LAA08043; Tue, 4 Jun 1996 11:29:43 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr2.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id LAA27107; Tue, 4 Jun 1996 11:29:43 -0500 (CDT)
Received: from rcur (rcur18.rtp.ericsson.se [147.117.133.138]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id MAA14958; Tue, 4 Jun 1996 12:24:53 -0400
To: Giuseppe Attardi <attardi@DI.Unipi.IT>
Cc: gcl@cli.com
References: <199606041604.SAA26105@omega.di.unipi.it> 
Subject: Re: Some bugs in elementary functions 
In-Reply-To: (Your message of Tue, 04 Jun 1996 18:04:17 +0200.)
             <199606041604.SAA26105@omega.di.unipi.it> 
Date: Tue, 04 Jun 1996 12:24:41 -0400
Message-Id: <18344.833905481@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1341

>>>>> "Giuseppe" == Giuseppe Attardi <attardi@DI.Unipi.IT> writes:


    Giuseppe> You probabily meant this:

    Giuseppe> (defun abs (z)
    Giuseppe>   (cond ((complexp z)
    Giuseppe> 	 ;; Compute (sqrt (+ (* x x) (* y y))) carefully to prevent
    Giuseppe> 	 ;; overflow!
    Giuseppe> 	 (let* ((x (abs (realpart z)))
    Giuseppe> 		(y (abs (imagpart z))))
    Giuseppe> 	   (if (< x y)
    Giuseppe> 	       (rotatef x y))
    Giuseppe> 	   (if (zerop y)	;;; y instead of x
    Giuseppe> 	       x
    Giuseppe> 	       (let ((r (/ x y)))
    Giuseppe> 		 (* x (sqrt (+ 1 (* r r))))))))
    Giuseppe> 	(t				; Should this be (realp z) instead of t?
    Giuseppe> 	 (if (minusp z)
    Giuseppe> 	     (- z)
    Giuseppe> 	     z))))

Oops!  The code itself is wrong!  It should really read

(defun abs (z)
  (cond ((complexp z)
	 ;; Compute sqrt(x*x + y*y) carefully to prevent overflow.
	 ;; Assume |x| >= |y|. Then sqrt(x*x + y*y) = |x|*sqrt(1
	 ;; +(y/x)^2).
	 (let* ((x (abs (realpart z)))
		(y (abs (imagpart z))))
	   ;; Swap x and y so that |x| >= |y|.
	   (if (< x y)
	       (rotatef x y))
	   (if (zerop x)
	       x
	       (let ((r (/ y x)))
		 (* x (sqrt (+ 1 (* r r))))))))
	(t				; Should this be (realp z) instead of t?
	 (if (minusp z)
	     (- z)
	     z))))

The key change is r = y / x instead of r = x / y.

Ray

From owner-gcl@cli.com  Tue Jun  4 12:49:07 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id MAA12507; Tue, 4 Jun 1996 12:49:06 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09397; Tue, 4 Jun 96 12:47:26 CDT
Received: from Hayek.gli.com (dd75-031.compuserve.com) by cli.com (4.1/SMI-4.1)
	id AA09391; Tue, 4 Jun 96 12:47:00 CDT
Received: (from jh@localhost) by Hayek.gli.com (8.6.12/8.6.9) id TAA02214; Tue, 4 Jun 1996 19:44:50 +0200
Date: Tue, 4 Jun 1996 19:44:50 +0200
Message-Id: <199606041744.TAA02214@Hayek.gli.com>
From: Jochen Hayek <jh@Hayek.gli.com>
To: gcl@cli.com
In-Reply-To: <96Jun4.111439edt.78784@colossus.cse.psu.edu> (message from
	Daniel R Ehrlich on Tue, 04 Jun 1996 11:15:18 -0400)
Subject: Re: Building GCL 2.2 under Solaris 2.5
Organization: The Berlin Ada Competence Centre
X-Url: http://www.ACM.org/~Jochen_Hayek/
X-Mailer: GNU emacs 19.30.1 sendmail
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
X-Attribution: JH
Reply-To: Jochen_Hayek@ACM.org
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 823

>>>>> On Tue, 04 Jun 1996 11:15:18 -0400,
>>>>> Daniel R Ehrlich
>>>>> who can be reached at: ehrlich@cse.psu.edu
>>>>> (whose comments are cited below with "    DRE> "),
>>>>> had this to say in article <96Jun4.111439edt.78784@colossus.cse.psu.edu>
>>>>> concerning the subject of Building GCL 2.2 under Solaris 2.5

    DRE> Hello all,
    DRE> I have a couple of questions.
    DRE> I am trying to build gcl-2.2 under Solaris 2.5

    DRE> with gcc 2.7.2, tcl 7.5, tk 4.1.

I thought I recently found a hint in the gcl-2.2 package,
stating it only works with Tk 3.6 .

(And because of that I decided not use gcl-2.2 so far.)

Is that true?

cheers

jh
--
Jochen_Hayek@ACM.org - http://www.ACM.org/~Jochen_Hayek/
phone: universal: +49(171)350.28.73
phone: @Berlin  : +49(30)214.798.80
fax  : @Berlin  : +49(30)214.798.81

From owner-gcl@cli.com  Tue Jun  4 15:28:05 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA12547; Tue, 4 Jun 1996 15:28:04 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA09807; Tue, 4 Jun 96 15:25:38 CDT
Received: from pongo.cs.wisc.edu by cli.com (4.1/SMI-4.1)
	id AA09801; Tue, 4 Jun 96 15:25:34 CDT
Received: (from thomas@localhost) by pongo.cs.wisc.edu (8.6.12/8.6.12) id PAA26941; Tue, 4 Jun 1996 15:25:28 -0500
Date: Tue, 4 Jun 1996 15:25:28 -0500
Message-Id: <199606042025.PAA26941@pongo.cs.wisc.edu>
From: David Thompson <thomas@cs.wisc.edu>
To: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Cc: gcl@cli.com
Subject: Building GCL 2.2 under Solaris 2.5
In-Reply-To: <96Jun4.111439edt.78784@colossus.cse.psu.edu>
References: <96Jun4.111439edt.78784@colossus.cse.psu.edu>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1879

Daniel R. Ehrlich writes:
 > Hello all,
 > 
 > I have a couple of questions.  I am trying to build gcl-2.2 under Solaris 2.5
 > with gcc 2.7.2, tcl 7.5, tk 4.1.  The following error is generated when compiling gbc.c:
 > 
 > gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -I../g
 > cl-tk -I../h/ -O4  gbc.c
 > sgbc.c: In function `sgc_quit':
 > In file included from gbc.c:1321:
 > sgbc.c:1072: warning: assignment makes pointer from integer without a cast
 > sgbc.c:1074: warning: assignment makes integer from pointer without a cast
 > sgbc.c: In function `memprotect_handler':
 > sgbc.c:1124: void value not ignored as it ought to be
 > gmake[1]: *** [gbc.o] Error 1
 > 
 > The problem is the definition of the GET_FAULT_ADDR macro in h/solaris.h:
 > 
 > #define GET_FAULT_ADDR(sig,code,scp,addr) \
 >   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
 > 
 > The routine error() is defined as void in o/main.c and h/cmpinclude.h.  I have
 > yet to come up with a fix for this.  Has this been fixed by someone else?
 > 

==============================================================================

The following workaround worked at our site (solaris 2.4/gcc 2.6.3).
Change h/solaris.h to force error to have a type other than void (also
force the ?: operator to evaluate operands of the same type).  This is
ugly...

From.....
  
  #define GET_FAULT_ADDR(sig,code,scp,addr) \
   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))

To.....
  
  #define GET_FAULT_ADDR(sig,code,scp,addr) \
   (code ? (void *)(((siginfo_t *)code )->si_addr) : (void *)(error("no address info"),0))


-- 
David Thompson  <thomas@cs.wisc.edu>

Associate Researcher			Department of Computer Science
University of Wisconsin-Madison		Phone:    (608)-262-1017
1210 West Dayton Street			Fax:      (608)-262-9997
Madison, WI 53706-1685
--



From owner-gcl@cli.com  Thu Jun  6 08:33:52 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA14094; Thu, 6 Jun 1996 08:33:52 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA15565; Thu, 6 Jun 96 08:29:55 CDT
Received: from colossus.cse.psu.edu by cli.com (4.1/SMI-4.1)
	id AA15559; Thu, 6 Jun 96 08:29:52 CDT
Received: from trantor.cse.psu.edu ([130.203.1.10]) by colossus.cse.psu.edu with SMTP id <79027>; Thu, 6 Jun 1996 09:29:44 -0400
To: David Thompson <thomas@cs.wisc.edu>
Cc: gcl@cli.com
Subject: Re: Building GCL 2.2 under Solaris 2.5 
X-Uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
In-Reply-To: Your message of Tue, 04 Jun 1996 16:25:28 EDT.
             <199606042025.PAA26941@pongo.cs.wisc.edu> 
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: 	Thu, 6 Jun 1996 09:22:23 -0400
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Message-Id: <96Jun6.092944edt.79027@colossus.cse.psu.edu>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 2373

>Daniel R. Ehrlich writes:
> > Hello all,
> > 
> > I have a couple of questions.  I am trying to build gcl-2.2 under Solaris 2
.5
> > with gcc 2.7.2, tcl 7.5, tk 4.1.  The following error is generated when com
piling gbc.c:
> > 
> > gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -
I../g
> > cl-tk -I../h/ -O4  gbc.c
> > sgbc.c: In function `sgc_quit':
> > In file included from gbc.c:1321:
> > sgbc.c:1072: warning: assignment makes pointer from integer without a cast
> > sgbc.c:1074: warning: assignment makes integer from pointer without a cast
> > sgbc.c: In function `memprotect_handler':
> > sgbc.c:1124: void value not ignored as it ought to be
> > gmake[1]: *** [gbc.o] Error 1
> > 
> > The problem is the definition of the GET_FAULT_ADDR macro in h/solaris.h:
> > 
> > #define GET_FAULT_ADDR(sig,code,scp,addr) \
> >   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
> > 
> > The routine error() is defined as void in o/main.c and h/cmpinclude.h.  I h
ave
> > yet to come up with a fix for this.  Has this been fixed by someone else?
> > 
>
>==============================================================================
>
>The following workaround worked at our site (solaris 2.4/gcc 2.6.3).
>Change h/solaris.h to force error to have a type other than void (also
>force the ?: operator to evaluate operands of the same type).  This is
>ugly...
>
>From.....
>  
>  #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
>
>To.....
>  
>  #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? (void *)(((siginfo_t *)code )->si_addr) : (void *)(error("no addres
s info"),0))
>
>

I tried something similar and also this suggestion and still get the same
error message:

gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -I../g
cl-tk -I../h/ -O4  gbc.c  
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1124: void value not ignored as it ought to be

Might be a bug in gcc 2.7.2.  Does anyone know if gcl 2.2 can be compiled with
SunPRO C 4.0?  In the mean time I will send off a bug report to the FSF.

Thanks,
Dan



From owner-gcl@cli.com  Thu Jun  6 08:43:17 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id IAA14103; Thu, 6 Jun 1996 08:43:17 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA15591; Thu, 6 Jun 96 08:41:45 CDT
Received: from colossus.cse.psu.edu by cli.com (4.1/SMI-4.1)
	id AA15585; Thu, 6 Jun 96 08:41:42 CDT
Received: from trantor.cse.psu.edu ([130.203.1.10]) by colossus.cse.psu.edu with SMTP id <79025>; Thu, 6 Jun 1996 09:41:39 -0400
To: David Thompson <thomas@cs.wisc.edu>
Cc: gcl@cli.com
Subject: Re: Building GCL 2.2 under Solaris 2.5 
X-Uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
In-Reply-To: Your message of Tue, 04 Jun 1996 16:25:28 EDT.
             <199606042025.PAA26941@pongo.cs.wisc.edu> 
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: 	Thu, 6 Jun 1996 09:30:18 -0400
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Message-Id: <96Jun6.094139edt.79025@colossus.cse.psu.edu>
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1845

>Daniel R. Ehrlich writes:
> > Hello all,
> > 
> > I have a couple of questions.  I am trying to build gcl-2.2 under Solaris 2
.5
> > with gcc 2.7.2, tcl 7.5, tk 4.1.  The following error is generated when com
piling gbc.c:
> > 
> > gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O -
I../g
> > cl-tk -I../h/ -O4  gbc.c
> > sgbc.c: In function `sgc_quit':
> > In file included from gbc.c:1321:
> > sgbc.c:1072: warning: assignment makes pointer from integer without a cast
> > sgbc.c:1074: warning: assignment makes integer from pointer without a cast
> > sgbc.c: In function `memprotect_handler':
> > sgbc.c:1124: void value not ignored as it ought to be
> > gmake[1]: *** [gbc.o] Error 1
> > 
> > The problem is the definition of the GET_FAULT_ADDR macro in h/solaris.h:
> > 
> > #define GET_FAULT_ADDR(sig,code,scp,addr) \
> >   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
> > 
> > The routine error() is defined as void in o/main.c and h/cmpinclude.h.  I h
ave
> > yet to come up with a fix for this.  Has this been fixed by someone else?
> > 
>
>==============================================================================
>
>The following workaround worked at our site (solaris 2.4/gcc 2.6.3).
>Change h/solaris.h to force error to have a type other than void (also
>force the ?: operator to evaluate operands of the same type).  This is
>ugly...
>
>From.....
>  
>  #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
>
>To.....
>  
>  #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? (void *)(((siginfo_t *)code )->si_addr) : (void *)(error("no addres
s info"),0))
>

This is definitely a bug in the optimizer.  If I compile everything '-O' instead
of '-O4' no error.  Well,  time to send off that bug report.

-- Dan



From owner-gcl@cli.com  Thu Jun  6 11:19:24 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA14167; Thu, 6 Jun 1996 11:19:24 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA16043; Thu, 6 Jun 96 11:16:49 CDT
Received: from msx2.pha.jhu.edu by cli.com (4.1/SMI-4.1)
	id AA16037; Thu, 6 Jun 96 11:16:46 CDT
Received: by msx2.pha.jhu.edu (940816.SGI.8.6.9/940406.SGI)
	 id MAA07376; Thu, 6 Jun 1996 12:15:06 -0400
From: "Jeffrey M. Odom" <zeus@msx2.pha.jhu.edu>
Message-Id: <9606061215.ZM7374@msx2.pha.jhu.edu>
Date: Thu, 6 Jun 1996 12:15:01 -0400
In-Reply-To: Daniel R Ehrlich <ehrlich@cse.psu.edu>
        "Re: Building GCL 2.2 under Solaris 2.5" (Jun  6,  9:30am)
References: <96Jun6.094139edt.79025@colossus.cse.psu.edu>
X-Mailer: Z-Mail (3.2.1 6apr95 MediaMail)
To: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Subject: Re: Building GCL 2.2 under Solaris 2.5
Cc: gcl@cli.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 2296

On Jun 6,  9:30am, Daniel R Ehrlich wrote:
> Subject: Re: Building GCL 2.2 under Solaris 2.5
> >Daniel R. Ehrlich writes:
> > > Hello all,
> > >
> > > I have a couple of questions.  I am trying to build gcl-2.2 under Solaris
2
> .5
> > > with gcc 2.7.2, tcl 7.5, tk 4.1.  The following error is generated when
com
> piling gbc.c:
> > >
> > > gcc -I/usr/local/src/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O
-
> I../g
> > > cl-tk -I../h/ -O4  gbc.c
> > > sgbc.c: In function `sgc_quit':
> > > In file included from gbc.c:1321:
> > > sgbc.c:1072: warning: assignment makes pointer from integer without a
cast
> > > sgbc.c:1074: warning: assignment makes integer from pointer without a
cast
> > > sgbc.c: In function `memprotect_handler':
> > > sgbc.c:1124: void value not ignored as it ought to be
> > > gmake[1]: *** [gbc.o] Error 1
> > >
> > > The problem is the definition of the GET_FAULT_ADDR macro in h/solaris.h:
> > >
> > > #define GET_FAULT_ADDR(sig,code,scp,addr) \
> > >   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
> > >
> > > The routine error() is defined as void in o/main.c and h/cmpinclude.h.  I
h
> ave
> > > yet to come up with a fix for this.  Has this been fixed by someone else?
> > >
> >
> >==============================================================================
> >
> >The following workaround worked at our site (solaris 2.4/gcc 2.6.3).
> >Change h/solaris.h to force error to have a type other than void (also
> >force the ?: operator to evaluate operands of the same type).  This is
> >ugly...
> >
> >From.....
> >
> >  #define GET_FAULT_ADDR(sig,code,scp,addr) \
> >   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
> >
> >To.....
> >
> >  #define GET_FAULT_ADDR(sig,code,scp,addr) \
> >   (code ? (void *)(((siginfo_t *)code )->si_addr) : (void *)(error("no
addres
> s info"),0))
> >
>
> This is definitely a bug in the optimizer.  If I compile everything '-O'
instead
> of '-O4' no error.  Well,  time to send off that bug report.
>
> -- Dan
>
>-- End of excerpt from Daniel R Ehrlich

I got around that problem by actually putting in the code in place of the
definition.  My section went something like

if (code)
  faddr = ((siginfo_t *) code)->si_addr;
else
  error("no address info");

---
Jeffrey M. Odom

From owner-gcl@cli.com  Thu Jun  6 15:42:03 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA14303; Thu, 6 Jun 1996 15:42:02 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA16796; Thu, 6 Jun 96 15:39:24 CDT
Received: from amber.ccs.neu.edu by cli.com (4.1/SMI-4.1)
	id AA16790; Thu, 6 Jun 96 15:39:19 CDT
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.80])
	by amber.ccs.neu.edu (8.7.1/8.7.1) with ESMTP id QAA15539; Thu, 6 Jun 1996 16:39:16 -0400 (EDT)
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.12/8.6.4) id QAA18498; Thu, 6 Jun 1996 16:39:15 -0400
Date: Thu, 6 Jun 1996 16:39:15 -0400
Message-Id: <199606062039.QAA18498@highpoint.ccs.neu.edu>
To: gcl@cli.com, mabramson@nlm.nih.gov
Subject: Re:  Time Zone
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 1021

I once developed some C code that seemed to figure out the correct
time zone.  I believe that this could be easily integrated into
the gcl distribution, but I have not done that.  Here is the C code:

/* The following code demonstrates how one can compute a local timezone
   in UNIX.  This could be used to patch gcl, which currently assumes
   that the timezone is for Austin. */

/* This code was tested successfully on SunOS 4.1, on Solaris 2,
   on DEC Ultrix (MIPS), on DEC OSF/1 (alpha), and on IBM RIOS */

#include <time.h>

main() {
  time_t time = 0;
  int diff, local = localtime(&time)->tm_hour, gmt = gmtime(&time)->tm_hour;
  diff = local - gmt + localtime(&time)->tm_isdst;
  /* The number 12 below should be adjusted if living near international
     date line (??), since the international date line is crooked. */
  printf("time zones from GMT: %d\n", ( diff >= 12 ? diff - 24 : diff ) );
  printf("Daylight savings time in effect if next number = 1: %d\n",
          localtime(&time)->tm_isdst );
  }

From owner-gcl@cli.com  Fri Jun  7 02:55:28 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id CAA14692; Fri, 7 Jun 1996 02:55:28 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA00168; Fri, 7 Jun 96 02:53:07 CDT
Received: from mailserver.di.unipi.it (memphis.di.unipi.it) by cli.com (4.1/SMI-4.1)
	id AA00161; Fri, 7 Jun 96 02:51:25 CDT
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.7.5/8.7.3) with ESMTP id JAA22544; Fri, 7 Jun 1996 09:16:30 +0200 (MET DST)
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id JAA00889; Fri, 7 Jun 1996 09:16:29 +0200
Date: Fri, 7 Jun 1996 09:16:29 +0200
Message-Id: <199606070716.JAA00889@omega.di.unipi.it>
To: gene@ccs.neu.edu
Cc: gcl@cli.com, mabramson@nlm.nih.gov
In-Reply-To: <199606062039.QAA18498@highpoint.ccs.neu.edu> (message from Gene Cooperman on Thu, 6 Jun 1996 16:39:15 -0400)
Subject: Re:  Time Zone
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 725


I tired your code unsuccesfully.
Here is the output I get under both SunOS 4.1.3 and Solaris 2.3:

time zones from GMT: 1
Daylight savings time in effect if next number = 1: 0

and this is what the true time is:

> date
Fri Jun  7 09:06:52 MET DST 1996

I tried changing:

	time_t time = 0;

to

	time_t now = time(0);

which at least gives me the correct local time from localtime(&now),
but still the field tm_isdst is 0.

My current solution in ECL is:

Lget_local_time_zone(int narg)
{
#ifdef BSD
        struct timeb tb;
        check_arg(0);
        ftime(&tb);
        VALUES(0) = make_longfloat((longfloat)tb.timezone/60);
#else
        VALUES(0) = MAKE_FIXNUM(TIME_ZONE);
#endif BSD
        RETURN(1);
}


-- Beppe

From owner-gcl@cli.com  Fri Jun  7 10:42:36 1996
Return-Path: <owner-gcl@cli.com>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA14893; Fri, 7 Jun 1996 10:42:36 -0500
Received: by cli.com (4.1/SMI-4.1)
	id AA01019; Fri, 7 Jun 96 10:38:48 CDT
Received: from lhc.nlm.nih.gov by cli.com (4.1/SMI-4.1)
	id AA01013; Fri, 7 Jun 96 10:38:44 CDT
Received: from play.nlm.nih.gov by lhc.nlm.nih.gov (4.1/SMI-4.0)
	id AA00412; Fri, 7 Jun 96 11:38:42 EDT
Received: by play.nlm.nih.gov (940816.SGI.8.6.9/5.6)
	id LAA00728; Fri, 7 Jun 1996 11:39:31 -0400
Date: Fri, 7 Jun 1996 11:39:31 -0400
Message-Id: <199606071539.LAA00728@play.nlm.nih.gov>
From: mabramson@nlm.nih.gov (Myriam Abramson)
To: gcl@cli.com
Subject: timezone
Sender: owner-gcl@cli.com
Precedence: bulk
content-length: 507


Thanks to all who replied about the timezone. Unixtime.c needs to be
fixed up.  I see what needs to be done is not too hard.  

More importantly, however, is this compiler error I keep getting:

Compiling gazonk0.lsp.
; (DEFUN COMPILER::CMP-ANON ...) is being compiled.
End of Pass 1.  
Error: Caught fatal error [memory may be damaged]
Error signalled by COMPILER::WT-FASD-DATA-FILE.

Does anyone know the reason for this error?

Thanks to all,









                                          myriam



From owner-gcl@cli  Fri Jun 14 14:36:17 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id OAA14540; Fri, 14 Jun 1996 14:36:16 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA19107; Fri, 14 Jun 1996 14:25:23 -0500
Received: from Grafin.fujimori.cache.waseda.ac.jp by cli.com (SMI-8.6/SMI-SVR4)
	id OAA19102; Fri, 14 Jun 1996 14:25:18 -0500
Received: (from fujimori@localhost) by Grafin.fujimori.cache.waseda.ac.jp (8.6.12/8.6.9) id EAA23023 for gcl@cli.com; Sat, 15 Jun 1996 04:19:18 +0900
Date: Sat, 15 Jun 1996 04:19:18 +0900
From: Y Fujimori <fujimori@Grafin.fujimori.cache.waseda.ac.jp>
Message-Id: <199606141919.EAA23023@Grafin.fujimori.cache.waseda.ac.jp>
To: gcl@cli.com
Subject: gcl-2.2, HOL on OSF/1
Sender: owner-gcl@cli
Precedence: bulk
content-length: 240


If someone has already compiled HOL 2.02 on gcl-2.2 for DecAlpha OSF/1 3.2,
please write about how-to to this mailing list.  As far as I tried, gcl2.2
cannot compile f-format.l properly.

Thanks in advance for your attention.

Y. Fujimori

From owner-gcl@cli  Mon Jun 17 12:37:51 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id MAA16818; Mon, 17 Jun 1996 12:37:51 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA15958; Mon, 17 Jun 1996 12:17:29 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id MAA15888; Mon, 17 Jun 1996 12:17:24 -0500
From: bshults@math.utexas.edu
Date: Mon, 17 Jun 96 12:16:49 CDT
Posted-Date: Mon, 17 Jun 96 12:16:49 CDT
Message-Id: <9606171716.AA20598@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA20598; Mon, 17 Jun 96 12:16:49 CDT
To: gcl@cli.com
Subject: gcl.info not found by 'describe
Sender: owner-gcl@cli
Precedence: bulk
content-length: 895


The 'describe function seems to be looking for gcl.info in
the current directory instead of /usr/local/info or whatever.
Is there a fix for this?

Here is a script of the error:

IPR>(describe 'do-symbols)
DO-SYMBOLS - external symbol in LISP package
-----------------------------------------------------------------------------
DO-SYMBOLS                                                            [Macro]

Error: Cannot open the file /home/bshults/work/budget/gcl.info.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at DESCRIBE.  Type :H for Help.
IPR>>

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl@cli  Mon Jun 17 22:30:34 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id WAA17468; Mon, 17 Jun 1996 22:30:33 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id WAA04177; Mon, 17 Jun 1996 22:20:17 -0500
Received: from wintermute.hip.cam.org by cli.com (SMI-8.6/SMI-SVR4)
	id WAA03946; Mon, 17 Jun 1996 22:20:04 -0500
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id XAA03175; Mon, 17 Jun 1996 23:20:47 -0400
Date: Mon, 17 Jun 1996 23:20:47 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199606180320.XAA03175@wintermute.hip.cam.org>
To: bshults@fireant.ma.utexas.edu
CC: gcl@cli.com
Subject: Re: gcl.info not found by 'describe
In-Reply-To: <9606171716.AA20598@marie.ma.utexas.edu>
References: <9606171716.AA20598@marie.ma.utexas.edu>
Reply-To: vbykov@cam.org
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl@cli
Precedence: bulk
content-length: 267

bshults@fireant.ma.utexas.edu writes:
 > 
 > The 'describe function seems to be looking for gcl.info in
 > the current directory instead of /usr/local/info or whatever.
 > Is there a fix for this?

si::*info-paths* holds the list of directories to search.

--Vassili

From owner-gcl@cli  Thu Jun 20 16:48:04 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id QAA19514; Thu, 20 Jun 1996 16:48:03 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA12564; Thu, 20 Jun 1996 16:39:41 -0500
Received: from cgl.ucsf.EDU by cli.com (SMI-8.6/SMI-SVR4)
	id QAA12559; Thu, 20 Jun 1996 16:39:37 -0500
From: yue@maxwell.ucsf.EDU
Received: from stockmayer.ucsf.edu (stockmayer.ucsf.EDU [128.218.2.14]) by cgl.ucsf.EDU (8.6.12/GSC4.25) with SMTP
	id OAA08320 for <gcl@cli.com>; Thu, 20 Jun 1996 14:39:36 -0700
Received: by stockmayer.ucsf.edu (4.1/GSC4.23)
	id AA07801; Thu, 20 Jun 96 14:40:22 PDT
Date: Thu, 20 Jun 96 14:40:22 PDT
Message-Id: <9606202140.AA07801@stockmayer.ucsf.edu>
To: gcl@cli.com
Subject: Compiling a profilable-version of gcl on linux
Sender: owner-gcl@cli
Precedence: bulk
content-length: 2757

Hi,

  I can not make a saved_gcp image for my linux machine (so that I can run
the profiler). Your help would be greatly appreciated.

  My problem is that I can find a proper target to make. In the
makefile in unixport directory, I can only find two targets for "gcp":
gcp-bsd and gcp-sun.

  For my linux running kernel 1.2.13 and GCC 2.7.0, I decided to try
"make gcp-bsd" instead of "make gcp-sun", following the script given
in ./lsp/gprof.lsp.  But in my /lib or /usr/lib directories, I can
only find ncrt1.o and gcrt1.o instead of ncrt0.o and gcrt0.o which are used in
the makefile. In my old GCC distribution (perhaps 2.5.7) I did find
ncrt0.o and gcrt0.o. I tried using both and in both cases, got several
undefined reference errors in making raw_gcp. The error messages are
shown below:

 Using ncrt1.o and gcrt1.o [renamed as ncrt0.o and gcrt0.o below]:

gcc -nostdlib  ncrt0.o   -o raw_gcp ../go/main.o .......[omitted]... sys_gcl.o -lc	 -lm   ../go/gcllib.a
gcrt0-mod.o(.text+0x0): multiple definition of `___crt_dummy__'
ncrt0.o(.text+0x0): first defined here
gcrt0-mod.o(.text+0x0): multiple definition of `_start'
ncrt0.o(.text+0x0): first defined here
../go/main.o(.text+0x22): undefined reference to `mcount'
../go/main.o(.text+0x459): undefined reference to `mcount'
../go/main.o(.text+0x47a): undefined reference to `mcount'
../go/main.o(.text+0x4fc): undefined reference to `mcount'
../go/main.o(.text+0x7ca): undefined reference to `mcount'
../go/main.o(.text+0x809): more undefined references to `mcount' follow
gcrt0-mod.o(.text+0x31): undefined reference to `_mcleanup'
gcrt0-mod.o(.text+0x48): undefined reference to `monstartup'
user_init.o(.text+0x19): undefined reference to `mcount'
make[1]: *** [raw_gcp] Error 1
make[1]: Leaving directory `/usr/local/gcl-2.2/unixport'


Using old ncrt0.o ang gcrt0.o:

gcc -nostdlib  ncrt0.o   -o raw_gcp ../go/main.o .......[omitted]... sys_gcl.o -lc	 -lm   ../go/gcllib.a
 /usr/i486-linux/bin/ld: warning: cannot find entry symbol _start; defaulting to 08001bb0
ncrt0.o(.text+0x1): undefined reference to `___load_shared_libraries'
ncrt0.o(.text+0x12): undefined reference to `____brk_addr'
ncrt0.o(.text+0x1b): undefined reference to `___environ'
ncrt0.o(.text+0x22): undefined reference to `___fpu_control'
ncrt0.o(.text+0x28): undefined reference to `___setfpucw'
ncrt0.o(.text+0x30): undefined reference to `___libc_init'
ncrt0.o(.text+0x35): undefined reference to `_main'
gcc: Internal compiler error: program ld got fatal signal 11
make[1]: *** [raw_gcp] Error 1
make[1]: Leaving directory `/usr/local/gcl-2.2/unixport'

  Thanks a lot in advance.

         Kai Yue

p.s.,   I  also tried "make kcp". It compiled the files in "./go" but its
subsequent call "make gcp" did nothing.

From owner-gcl@cli  Mon Jun 24 13:50:34 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA22479; Mon, 24 Jun 1996 13:50:33 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA15799; Mon, 24 Jun 1996 13:05:46 -0500
Received: from neurocog.lrdc.pitt.edu by cli.com (SMI-8.6/SMI-SVR4)
	id NAA15794; Mon, 24 Jun 1996 13:05:16 -0500
Received: by neurocog.lrdc.pitt.edu
	(1.37.109.10G/16.2) id AA239477768; Mon, 24 Jun 1996 13:36:08 -0400
Date: Mon, 24 Jun 1996 13:36:08 -0400 (EDT)
From: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
To: gcl@cli.com
Subject: tcl7.5/tk4.1 
Message-Id: <Pine.HPP.3.91.960624133554.23934A-100000@neurocog.lrdc.pitt.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli
Precedence: bulk
content-length: 139

Anyone have the patches for gcl-tk for the latest versions for tcl/tk
(7.5, 4.1; at least that's what I have at the moment)?

Tnx,
'Jeff



From owner-gcl@cli  Tue Jun 25 09:02:52 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id JAA23012; Tue, 25 Jun 1996 09:02:52 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id IAA27498; Tue, 25 Jun 1996 08:55:07 -0500
Received: from pongo.cs.wisc.edu by cli.com (SMI-8.6/SMI-SVR4)
	id IAA27493; Tue, 25 Jun 1996 08:55:04 -0500
Received: (from thomas@localhost) by pongo.cs.wisc.edu (8.6.12/8.6.12) id IAA00508; Tue, 25 Jun 1996 08:55:02 -0500
Date: Tue, 25 Jun 1996 08:55:02 -0500
Message-Id: <199606251355.IAA00508@pongo.cs.wisc.edu>
From: David Thompson <thomas@cs.wisc.edu>
To: gcl@cli.com
Subject: gcl.info not found
Sender: owner-gcl@cli
Precedence: bulk
content-length: 500


gcl newbie question...  The gcl-2.2 distribution create an info/dir
file that contains 

'* GCL Ansi Doc: (gcl.info).  Ansi Common Lisp Specification.'

There are no gcl.info files in the distribution we obtained.  Can
anyone provide a pointer to this information?

-- 
David Thompson  <thomas@cs.wisc.edu>

Associate Researcher			Department of Computer Science
University of Wisconsin-Madison		Phone:    (608)-262-1017
1210 West Dayton Street			Fax:      (608)-262-9997
Madison, WI 53706-1685
--



From owner-gcl@cli  Wed Jun 26 16:54:36 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id QAA23851; Wed, 26 Jun 1996 16:54:36 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA10400; Wed, 26 Jun 1996 16:41:45 -0500
Received: from pongo.cs.wisc.edu by cli.com (SMI-8.6/SMI-SVR4)
	id QAA10395; Wed, 26 Jun 1996 16:41:42 -0500
Received: (from thomas@localhost) by pongo.cs.wisc.edu (8.6.12/8.6.12) id QAA28300; Wed, 26 Jun 1996 16:41:31 -0500
Date: Wed, 26 Jun 1996 16:41:31 -0500
Message-Id: <199606262141.QAA28300@pongo.cs.wisc.edu>
From: David Thompson <thomas@cs.wisc.edu>
To: gcl@cli.com
Subject: Solaris x86 build
Sender: owner-gcl@cli
Precedence: bulk
content-length: 794


I have run into a dead end compiling gcl-2.2 for Solaris 2.4 x86 with
gcc 2.6.3 (also gcc 2.7.2).  Trying to build .../unixport/saved_gcl, I
receive the following:

../unixport/raw_gcl ../unixport/ -libdir /s/gcl-2.2-2/src/sunx86_54/gcl-2.2/ < foo
GCL (GNU Common Lisp)  April 1994  32768 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
This file was dumped with FASD version ~a not ~a.
Lisp initialization failed.

Has anyone else out there had any experience with this?  As always, I
will post a summary of responses.  Thanks for the help...

-- 
David Thompson  <thomas@cs.wisc.edu>

Associate Researcher			Department of Computer Science
University of Wisconsin-Madison		Phone:    (608)-262-1017
1210 West Dayton Street			Fax:      (608)-262-9997
Madison, WI 53706-1685
--



From owner-gcl@cli  Sat Jun 29 03:16:52 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id DAA26056; Sat, 29 Jun 1996 03:16:51 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id CAA21207; Sat, 29 Jun 1996 02:49:08 -0500
Received: from smtp-gw01.ny.us.ibm.net by cli.com (SMI-8.6/SMI-SVR4)
	id CAA21202; Sat, 29 Jun 1996 02:49:05 -0500
Received: (from uucp@localhost) by smtp-gw01.ny.us.ibm.net (8.6.9/8.6.9) id HAA82475 for <gcl@cli.com>; Sat, 29 Jun 1996 07:49:02 GMT
Received: from slip139-92-41-20.ut.nl.ibm.net(139.92.41.20) by smtp-gw01.ny.us.ibm.net via smap (V1.3mjr)
	id sma2yICkR; Sat Jun 29 07:48:55 1996
Message-ID: <31D39B6B.5B94C7D7@ibm.net>
Date: Fri, 28 Jun 1996 09:44:27 +0100
From: Mertens Marc <mmerten@ibm.net>
X-Mailer: Mozilla 3.0b4Gold (X11; I; Linux 1.2.13 i586)
MIME-Version: 1.0
To: gcl@cli.com
Subject: Using GCL and TK
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl@cli
Precedence: bulk
content-length: 572

Hello,

     Can someone help me . I'm trying to get the position where you
click in a text widget. To do this I bounded a lisp function to a text
widget using the following code : 
       (tk::bind '.text.text "<Button-1>" '(test %X %Y)) where
.text.text is the text widget and test is a simple function I defined.
The moment I click in the text widget I get an error about %X beeing
unbound , although the documentation said that %X and %Y must be
replaced by the X,Y coordinates before the call to test . 

Any help will be appreciated .


Mertens Marc
mmerten@ibm.net

From owner-gcl@cli  Sat Jun 29 15:30:29 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA26298; Sat, 29 Jun 1996 15:30:29 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA00168; Sat, 29 Jun 1996 15:28:40 -0500
Received: from piglet.splode.com by cli.com (SMI-8.6/SMI-SVR4)
	id PAA00145; Sat, 29 Jun 1996 15:28:36 -0500
Received: (from friedman@localhost) by piglet.splode.com (8.7.5/8.7.3) id PAA07231; Sat, 29 Jun 1996 15:28:34 -0500
Date: Sat, 29 Jun 1996 15:28:34 -0500
Message-Id: <199606292028.PAA07231@piglet.splode.com>
From: friedman@splode.com (Noah Friedman)
To: gcl@cli.com
Subject: trivial patch to gcl 2.2+fixes for linux 2.0
Reply-To: friedman@splode.com
Sender: owner-gcl@cli
Precedence: bulk
content-length: 1177

The file o/gbc.c would not compile with the linux 2.0 header files unless I
made the following change to h/386-linux.h.  

Linux 1.2.13 does not have sigcontext.h.  Linux 1.3.61 (and possibly
earlier) do, but asm/signal.h only includes it if __KERNEL__ is defined;
thus, 386-linux.h needs to include it explicitly.  Linux's header files
have always been designed to guard against multiple inclusion, so that is
not something to worry about.

What is more worrisome is that the system header files for linux 1.2 and
2.0 are just not the same to begin with.  Perhaps it would be better to use
autoconf to configure gcl as much as possible?

/usr/local/src/gnu/gcl/gcl-2.2/h $ diff -bu 386-linux.h{.~1~,}
--- 386-linux.h.~1~	Fri Nov 17 23:44:10 1995
+++ 386-linux.h	Sat Jun 29 11:51:55 1996
@@ -42,8 +42,8 @@
       sigaction(SIGSEGV,&action,0); \
       sigaction(SIGBUS,&action,0);} while (0)
 
-/* #include <asm/sigcontext.h> */
 #include <asm/signal.h>
+#include <asm/sigcontext.h>
 
 #define GET_FAULT_ADDR(sig,code,sv,a) \
     ((void *)(((struct sigcontext_struct *)(&code))->cr2))
@@ -210,4 +210,3 @@
  */
 
 /* End for cmpinclude */
-
/usr/local/src/gnu/gcl/gcl-2.2/h $ 

From owner-gcl@cli  Sun Jun 30 17:08:19 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id RAA27175; Sun, 30 Jun 1996 17:08:19 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA19489; Sun, 30 Jun 1996 16:52:39 -0500
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id QAA19484; Sun, 30 Jun 1996 16:52:32 -0500
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id OAA27048; Sun, 30 Jun 1996 14:52:24 -0700
Date: Sun, 30 Jun 1996 14:52:24 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199606302152.OAA27048@aurora.romoidoy.com>
To: gcl@cli.com
subject: GCL under IRIX 6
Sender: owner-gcl@cli
Precedence: bulk
content-length: 186

Has anyone gotten GCL working under IRIX 6?

Has anyone tried and failed?

Does anyone have an opinion about whether it ought to work (without
significant system hacking)?

Thanks much!

From owner-gcl@cli  Mon Jul  1 03:26:06 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id DAA27537; Mon, 1 Jul 1996 03:26:05 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA20274; Mon, 1 Jul 1996 03:21:35 -0500
Received: from mail.cs.tu-berlin.de by cli.com (SMI-8.6/SMI-SVR4)
	id DAA20269; Mon, 1 Jul 1996 03:21:27 -0500
Received: from wintermute.cs.tu-berlin.de (simons@wintermute.cs.tu-berlin.de [130.149.19.141]) by mail.cs.tu-berlin.de (8.6.12/8.6.12) with ESMTP id KAA16010 for <gcl@cli.com>; Mon, 1 Jul 1996 10:21:22 +0200
Received: (from simons@localhost) by wintermute.cs.tu-berlin.de (8.7.2/8.7.2) id KAA12131; Mon, 1 Jul 1996 10:21:16 +0200 (MET DST)
Date: Mon, 1 Jul 1996 10:21:16 +0200 (MET DST)
Message-Id: <199607010821.KAA12131@wintermute.cs.tu-berlin.de>
From: Martin Simons <simons@cs.tu-berlin.de>
To: gcl@cli.com
Subject: Auto-notification in gcl installation procedure
Mime-Version: 1.0 (generated by tm-edit 7.14)
Content-Type: text/plain; charset=US-ASCII
Sender: owner-gcl@cli
Precedence: bulk
content-length: 1023

Hi,

I was a bit surprised to find that during the gcl installation, the
makefile generates and sends a message automatically to
`gcl@nicolas.ma.utexas.edu' without user interaction.  There is no
mention of this behavior in the top README file but the makefile has
this to say about it:

# 	After making successfully send in a notification to
#	gcl@nicolas.ma.utexas.edu.   This is extremely helpful in
#	tracking on which machines and OS versions there are problems.
#	This will be done automatically by the  xbin/notify line.

I guess that it must be an omission that users are not asked for their
permssion before a message containing machine/OS specific information
is send under their account to a third party?

Martin
--
Martin Simons           Software Engineering Research Group (Sekr. FR5-6)
Technische Universitaet Berlin, Franklinstr 28/29, 10587 Berlin - Germany
Tel: +49.30.314 25213                               Fax: +49.30.314 73488
e-mail: simons@cs.tu-berlin.de       WWW: http://cs.tu-berlin.de/~simons/

From owner-gcl@cli  Tue Jul  2 13:48:08 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id NAA28375; Tue, 2 Jul 1996 13:48:08 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA03155; Tue, 2 Jul 1996 13:33:31 -0500
Received: from ns.ulix.net by cli.com (SMI-8.6/SMI-SVR4)
	id NAA03150; Tue, 2 Jul 1996 13:33:29 -0500
Received: from Xts01-24.ulix.net (Xts01-24 [206.231.214.54]) by ns.ulix.net (8.6.12/8.6.9) with SMTP id NAA32279 for <gcl@cli.com>; Tue, 2 Jul 1996 13:45:12 -0400
Date: Tue, 2 Jul 1996 13:45:12 -0400
Message-Id: <199607021745.NAA32279@ns.ulix.net>
X-Sender: mproulx@ulix.net
X-Mailer: Windows Eudora Version 1.4.3
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: gcl@cli.com
From: mproulx@ulix.net (Martin Proulx)
Subject: Using tix through gcl's tk connection?
Sender: owner-gcl@cli
Precedence: bulk
content-length: 191


        I'd be interested in knowing if it's possible to use tix's
super-widgets using GCL's tk connection.

        If so, please help be doing so!

        Thanks!

        Martin Proulx


From owner-gcl@cli  Wed Jul  3 01:19:02 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id BAA28760; Wed, 3 Jul 1996 01:19:01 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id BAA09664; Wed, 3 Jul 1996 01:16:25 -0500
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id BAA09646; Wed, 3 Jul 1996 01:16:19 -0500
Received: (from karlheg@localhost) by cherryflower.or.us (8.6.12/8.6.9) id XAA06216; Tue, 2 Jul 1996 23:07:05 -0700
Date: Tue, 2 Jul 1996 23:07:05 -0700
Message-Id: <199607030607.XAA06216@cherryflower.or.us>
From: "Karl M. Hegbloom" <karlheg@teleport.com>
To: gcl@cli.com
Subject: Using tix through gcl's tk connection?
In-Reply-To: <199607021745.NAA32279@ns.ulix.net>
References: <199607021745.NAA32279@ns.ulix.net>
Comments: Hyperbole mail buttons accepted, v04.01.
Sender: owner-gcl@cli
Precedence: bulk
content-length: 2148

>>>>> "Martin" == Martin Proulx <mproulx@ulix.net> writes:

    Martin>         I'd be interested in knowing if it's possible to
    Martin> use tix's super-widgets using GCL's tk connection.

    Martin>         If so, please help be doing so!


 I'm just beginning to learn about LISP and Scheme right now.  I think
that maybe in about 6 months to a year or so, I will be ready to start
playing with GUI user interface stuff, and will perhaps want to use
TiX widgets also.

 AFAIK, adding TiX to Tcl/Tk is just a matter of adding a few lines to
the TkAppInit.c file, and linking to the libtix.so.  I don't know if
that automagicly makes TiX available from GCL though; the underlying
mechanism is still a mystery to me, and it will be some time before
I'll feel ready to try and understand the code. (I will for sure UTSL
when the time comes.)

 In the GNU Guile Scheme snapshot, there is a .ps 'paper' that
discusses the Guile interface to Tk, and tells about some
modifications made to Tk (the snapshot I have uses Tk patchlevel
4.0b3) to make it so 'anonymous functions' can serve as callbacks for
Tk events...  I think I got some understanding of it--- it sounds like
that would be a good thing to make happen for GCL as well, esp. if we
could have TiX, BLT, and MESA too.

 Wouldn't an XEmacs widget be useful?

 Has anyone managed to get the Garnet GUI kit to compile and run with
GCL yet?  Here it kept failing because DEFPACKAGE is not defined yet,
amoung other problems.  I'm not even sure what that is yet, so I put
it on a back burner.

 I'd like to hear from some of the others on this list, to learn who's
out there, to make some contacts.  Are you in programming jobs?  In
college?  Learning at home?  What does the software you write with
LISP do?  Who uses it, and what is it for?  Fill me in.  What are the
best books?  What is the state of the development of GCL itself?  What
are the plans for it?  Is the GCL project related in any way to the
GNU Guile project?

-- 
Karl M. Hegbloom
<karlheg@teleport.com>
http://www.teleport.com/~karlheg
(K0D) AYG-GE01  Portland, OR, USA
Proudly running Linux 2.0.0 and GNU public software!

From owner-gcl@cli  Wed Jul  3 03:16:51 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id DAA28798; Wed, 3 Jul 1996 03:16:51 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA13819; Wed, 3 Jul 1996 03:13:14 -0500
Received: from scrooge.ee.swin.oz.au by cli.com (SMI-8.6/SMI-SVR4)
	id DAA13814; Wed, 3 Jul 1996 03:13:10 -0500
Received: (from dtc@localhost) by scrooge.ee.swin.oz.au (8.6.9/8.6.9) id SAA16116 for gcl@cli.com; Wed, 3 Jul 1996 18:14:17 +1000
From: Douglas Thomas Crosher  <dtc@scrooge.ee.swin.oz.au>
Message-Id: <199607030814.SAA16116@scrooge.ee.swin.oz.au>
Subject: bug with integers
To: gcl@cli.com
Date: Wed, 3 Jul 1996 18:14:17 +1000 (EST)
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Sender: owner-gcl@cli
Precedence: bulk
content-length: 797


I've noticed the following bug in gcl 2.2.

Regards
Douglas Crosher
-=-=-

;;; The function below illustrates a bug with integers under gcl.
;;;
(declaim (optimize (speed 3) (safety 0)))

;;; Try (tst 3 3) the answer should be 6 10 by I get 8 23 on gcl.
;;;
;;; The bug seems to depend on the integer declaration noted below.
;;;
(defun tst (x y)
  (declare (fixnum x y))

  (let ( (s1 0)
	 (s2 y) )
    (dotimes (i (1- y))
        (unless (= 1 x)
	    (do ( (j x (1- j)) )
		( (zerop j) )
		(unless (= x j)
		    (multiple-value-bind
		     (n1 n2)
		     (tst (- x j) (- y (1+ i)))
		     (declare (integer n1 n2)) ; With this
					       ; declarartion gcl
					       ; gives an incorrect
					       ; result.
		     (incf s1 n1)
		     (incf s2 n2))))))
    (incf s1)
    (values s1 s2)))


From owner-gcl@cli  Wed Jul  3 10:36:22 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA28923; Wed, 3 Jul 1996 10:36:21 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id KAA14298; Wed, 3 Jul 1996 10:31:57 -0500
Received: from unvax.union.edu by cli.com (SMI-8.6/SMI-SVR4)
	id KAA14293; Wed, 3 Jul 1996 10:31:54 -0500
Received: by unvax.union.edu id AA19789
  (5.65c+/IDA-1.4.4 for gcl@cli.com); Wed, 3 Jul 1996 11:31:49 -0400
Date: Wed, 3 Jul 1996 11:31:48 -0400 (EDT)
From: David Shear <sheard@unvax.union.edu>
To: gcl@cli.com
Subject: gcl & Alpha/Digital Unix
Message-Id: <Pine.ULT.3.91.960703112536.12909A-100000@unvax.union.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli
Precedence: bulk
content-length: 475

Has anyone built gcl for a DEC Alpha machine running Digital Unix 3.2 
(formerly known as DEC OSF)??

Thank you in advance for any info,
DCS
=====================================================================
David C. Shear,  Academic Systems Manager
Office of Computer Services
Union College			Phone  (518)388-6665
Union St.			Fax    (518)388-6458
Schenectady, NY 12308		E-mail sheard@unvax.union.edu
=====================================================================


From owner-gcl@cli  Wed Jul  3 10:51:13 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id KAA28932; Wed, 3 Jul 1996 10:51:13 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id KAA14356; Wed, 3 Jul 1996 10:48:41 -0500
Received: from london.visi.net by cli.com (SMI-8.6/SMI-SVR4)
	id KAA14351; Wed, 3 Jul 1996 10:48:38 -0500
Received: from mango.galaxy.gmu.edu (root@ppp-nn-1-23.visi.net [206.151.65.23]) by london.visi.net (8.7.1/8.7.1) with SMTP id LAA29061 for <gcl@cli.com>; Wed, 3 Jul 1996 11:48:09 -0400 (EDT)
Received: (from imran@localhost) by mango.galaxy.gmu.edu (8.6.12/8.6.10) id LAA02223; Wed, 3 Jul 1996 11:48:03 -0400
Date: Wed, 3 Jul 1996 11:48:03 -0400
From: Imran Shah <imran@science.gmu.edu>
Message-Id: <199607031548.LAA02223@mango.galaxy.gmu.edu>
To: gcl@cli.com
Subject: Sockets
Reply-To: imran@visi.net
Sender: owner-gcl@cli
Precedence: bulk
content-length: 135


Hello -

I am looking for example code for using sockets in gcl. Any useful
tips will be greatly appreciated.

Thank you.

Imran Shah

From owner-gcl@cli  Wed Jul  3 11:19:52 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA28944; Wed, 3 Jul 1996 11:19:51 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA14430; Wed, 3 Jul 1996 11:11:56 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id LAA14425; Wed, 3 Jul 1996 11:11:54 -0500
From: bshults@math.utexas.edu
Date: Wed, 3 Jul 96 11:11:06 CDT
Posted-Date: Wed, 3 Jul 96 11:11:06 CDT
Message-Id: <9607031611.AA05424@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA05424; Wed, 3 Jul 96 11:11:06 CDT
To: gcl@cli.com
Subject: condition handling
Sender: owner-gcl@cli
Precedence: bulk
content-length: 379

Apparently handler-bind is not implemented in gcl 2.2.  Is there a way
to continue automatically from an error.

With handlers I might do:

(handler-bind
 ((t #'(lambda (c) (declare (ignore c))
  (when (find-restart 'continue) (invoke-restart 'continue)))))
 (load ...))

Can I do somthing like this in gcl so that the user does not have to
continue from errors manually?

Benji

From owner-gcl@cli  Thu Jul  4 03:24:07 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id DAA29445; Thu, 4 Jul 1996 03:24:07 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA26425; Thu, 4 Jul 1996 03:18:49 -0500
Received: from spa.kuis.kyoto-u.ac.jp by cli.com (SMI-8.6/SMI-SVR4)
	id DAA26420; Thu, 4 Jul 1996 03:18:19 -0500
Received: from beppu.kuis.kyoto-u.ac.jp (beppu.kuis.kyoto-u.ac.jp [130.54.22.141]) by spa.kuis.kyoto-u.ac.jp (8.7.5+2.6Wbeta6/3.4W4spa) with ESMTP id RAA08199; Thu, 4 Jul 1996 17:14:25 +0900 (JST)
Received: (from yuasa@localhost) by beppu.kuis.kyoto-u.ac.jp (8.7.5+2.6Wbeta6/3.4W4-lab4kuis) id RAA03930; Thu, 4 Jul 1996 17:17:51 +0900 (JST)
Date: Thu, 4 Jul 1996 17:17:51 +0900 (JST)
From: YUASA Taiichi <yuasa@kuis.kyoto-u.ac.jp>
Message-Id: <199607040817.RAA03930@beppu.kuis.kyoto-u.ac.jp>
To: sheard@unvax.union.edu
Subject: RE: gcl & Alpha/Digital Unix
Cc: gcl@cli.com
Sender: owner-gcl@cli
Precedence: bulk
content-length: 418

>> Has anyone built gcl for a DEC Alpha machine running Digital Unix 3.2 
>> (formerly known as DEC OSF)??

One of my former students has ported the original KCL (not gcl) onto Alpha.
It was a hard job because KCL assumes pointers are 32-bit long, whereas
pointers in Alpha are 64-bit long.  Merging the code for this 64-bit version of
KCL with gcl seems useful, but I do not know how much work it may be.

-- Taiichi

From owner-gcl@cli  Thu Jul  4 11:32:06 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA29608; Thu, 4 Jul 1996 11:32:06 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA26725; Thu, 4 Jul 1996 11:30:11 -0500
Received: from ns.ulix.net by cli.com (SMI-8.6/SMI-SVR4)
	id LAA26720; Thu, 4 Jul 1996 11:30:07 -0500
Received: from Xts01-17.ulix.net (Xts01-17 [206.231.214.47]) by ns.ulix.net (8.6.12/8.6.9) with SMTP id LAA17287; Thu, 4 Jul 1996 11:41:58 -0400
Date: Thu, 4 Jul 1996 11:41:58 -0400
Message-Id: <199607041541.LAA17287@ns.ulix.net>
X-Sender: mproulx@ulix.net
X-Mailer: Windows Eudora Version 1.4.3
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: gcl@cli.com
From: mproulx@ulix.net (Martin Proulx)
Subject: GCL's Tk connection, capitals, and Tix.
Cc: tix-info@graphics.cis.upenn.edu
Sender: owner-gcl@cli
Precedence: bulk
content-length: 4493


        A few days ago, I let all of you know that I wanted to use Tix from
GLC's tk connection.
        
        I finally figured out that the simple addition of a few lines to
tkAppinit.c (in the /gcl-tk directory) would do the job (more details on
this later).

        Only, I still cannot use Tix from GCL!  I included BLT the same way
as I did with Tix, and BLT seems to work fine.  Why?  Tix has CaPiTaLs in
its widget names! (like: tixOptionMenu).  Looking in the messages, using
(debuging T), we clearly see that everything sent to the tcl interpreter is
in lower case...

        So I'd like to know if my reasonning is right!  Would we have to
change the def-widget macro so that it takes a string rather than a symbol,
and then create the capital-less function inside lisp, as it does now, but
remembers to call the tcl interpreter with the capitalized function names?

        Thanks!

        Martin Proulx
        mproulx@ulix.net
       

P.S  Following is a transcript of my compilation of the gcl-tk directory,
with Tix and blt functionnality added to the server.  I only had to add the
following inside tkAppInit.c  Look inside the file, you'll clearly see
where.  As a matter of fact, mine from the distribution already had the BLT
stuff commented out.

-----------------------------------
Added:

if (Blt_Init(interp) == TCL_ERROR) {
            return TCL_ERROR;
}

if (Tix_Init(interp) == TCL_ERROR) {
            return TCL_ERROR;
}
-----------------------------------
Once tkAppInit is modified, recompile linking
with BLT, tix and Xpm libraries.

I'm compiling GCL 2.2 on a Linux Elf
------------------------------------
Transcript...

cd /usr/gcl-2.2/gcl-tk/
make -k 
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/gcl-2.2/o -fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   guis.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/gcl-2.2/o -fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkAppInit.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/usr/gcl-2.2/o -fsigned-char
-c  -I../o -I../h -I/usr/include -I/usr/include/tcl -O4   tkMain.c
make gcltkaux "CC=`echo gcc -pipe -fwritable-strings  -DVOL=volatile
-I/usr/gcl-2.2/o -fsigned-char | sed -e 's: -static : :g' -e 's:-Bstatic : :g'`"
make[1]: Entering directory `/usr/gcl-2.2/gcl-tk'
gcc -pipe -fwritable-strings -DVOL=volatile -I/usr/gcl-2.2/o -fsigned-char
guis.o tkAppInit.o tkMain.o  -o gcltkaux  -L/usr/lib -ltk -L/usr/lib -ltcl
-L/usr/X11/lib -lX11 -lm  ../o/gcllib.a -ltix -lXpm -lBLT 
make[1]: Leaving directory `/usr/gcl-2.2/gcl-tk'
echo "(compile-file \"tkl.lisp\" :c-file nil :c-debug nil)" |
../unixport/saved_gcl
GCL (GNU Common Lisp)  Version(2.2) Thu Jul  4 00:50:38 EDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>Compiling tkl.lisp.
Loading ./cmpinit.lsp
Loading tk-package.lsp
Finished loading tk-package.lsp
Finished loading ./cmpinit.lsp
End of Pass 1.  
;; Note: Tail-recursive call of GET-PER-CENT-SYMBOLS was replaced by iteration.
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling tkl.lisp.
#"tkl.o"

>echo "(compile-file \"tinfo.lsp\" :c-file t :c-debug t)" |
../unixport/saved_gcl
GCL (GNU Common Lisp)  Version(2.2) Thu Jul  4 00:50:38 EDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>Compiling tinfo.lsp.
Loading ./cmpinit.lsp
Loading tk-package.lsp
Finished loading tk-package.lsp
Finished loading ./cmpinit.lsp
End of Pass 1.  
;; Note: Tail-recursive call of INFO-SHOW-HISTORY was replaced by iteration.
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling tinfo.lsp.
#"tinfo.o"

>cat gcltksrv.in | sed -e "s:TK_LIBRARY=.*:TK_LIBRARY=/usr/lib/tk:g" \
-e "s:DIR=.*:DIR=/usr/gcl-2.2/gcl-tk:g" > gcltksrv
chmod a+x gcltksrv
echo "(compile-file \"demos/gc-monitor.lisp\" :c-file nil :c-debug nil)" |
../unixport/saved_gcl
GCL (GNU Common Lisp)  Version(2.2) Thu Jul  4 00:50:38 EDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>Compiling demos/gc-monitor.lisp.
Loading ./cmpinit.lsp
Loading tk-package.lsp
Finished loading tk-package.lsp
Finished loading ./cmpinit.lsp
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling demos/gc-monitor.lisp.
#"demos/gc-monitor.o"

>
Compilation finished at Thu Jul  4 11:43:48


From owner-gcl@cli  Thu Jul  4 14:02:57 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id OAA29673; Thu, 4 Jul 1996 14:02:57 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA26854; Thu, 4 Jul 1996 14:00:47 -0500
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id OAA26849; Thu, 4 Jul 1996 14:00:38 -0500
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id MAA28753; Thu, 4 Jul 1996 12:00:25 -0700
Date: Thu, 4 Jul 1996 12:00:25 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199607041900.MAA28753@aurora.romoidoy.com>
To: mproulx@ulix.net
CC: gcl@cli.com
In-reply-to: <199607041541.LAA17287@ns.ulix.net> (mproulx@ulix.net)
Subject: Re: GCL's Tk connection, capitals, and Tix.
Sender: owner-gcl@cli
Precedence: bulk
content-length: 3481

I ran into the same problem in making GCL talk to [incr widgets]
(which is similar to TiX).  I patched tkl.lsp in a gross but effective way
to make it work.  Here is the relevant patch:

;;; Code is as defined by SI::PRINT-TO-STRING1.
(defun print-to-string (str x code)
  (cond ((consp x)
	 (cond ((eq (car x) 'a)
		(setq x (cdr x)
		      code (pos no_quote *print-arglist-codes*)))
	       ((eq (car x) 'd)
		(setq x (cdr x)
		      code (pos no_quote_downcase *print-arglist-codes*)))
	       (t (error ``bad arg ~a'' x)))))
  (macrolet ((adjust-it (amount)
	       `(setq str (adjust-array str
		                        (the fixnum
					     (+ (the fixnum (array-total-size str))
						(the fixnum (+ ,amount 70))))
				        :fill-pointer (fill-pointer str)
				        :element-type 'string-char)))
	     (print-adjusting (thing code)
	       ;; SI::PRINT-TO-STRING1 is a hideous kludge defined in gcl-2.2/o/sockets.c
	       `(while (null (si::print-to-string1 str ,thing ,code))
		  ;; string not big enough; adjust and try again
		  (adjust-it (if (stringp x) (length (the string x)) 0)))))
    (typecase x
      (symbol
       ;; Horrifying kludge added by Zvona.  tk demands that the *first* character of each
       ;; pathname component be lowercase, so the original version of this simply downcased all symbols.
       ;; But that loses when dealing with iWidgets scrolledfoo components, which are full of mixed  
       ;; case, just to be cute.  First thing after the revolution, let's slaughter
       ;; all the C programmers.  Aargh!  [Plausibly the Right Thing would be to rationalize
       ;; PRINT-TO-STRING1, but that would entail messing around in the guts of things I'd rather not.]
       (let* ((string (symbol-name x))
	      (length (length string)))
	 (cond ((and (> length 0)
		     (char= (aref string 0) #\.))
		;; Looks like a pathname.  Let's cross our fingies and treat it like one.
		(let* ((pointer (fill-pointer str))
		       (leading-space?
			(not (or (= code #.(pos no_leading_space *print-arglist-codes*))
				 (= code #.(pos begin_join_no_leading_space *print-arglist-codes*))
				 (= code #.(pos no_quote_no_leading_space *print-arglist-codes*))
				 (= code #.(pos no_quotes_and_no_leading_space
						*print-arglist-codes*)))))
		       (final-pointer (+ pointer length (if leading-space? 1 0))))
		  (when (< (array-total-size str) final-pointer)
		    ;; make output str big enough
		    (adjust-it length))
		  (setf (fill-pointer str) final-pointer)
		  (when leading-space?
		    (setf (aref str pointer) #\ )
		    (incf pointer))
		  (sloop with downcase? = nil
			 for i from 0 to (1- length)
			 for char = (aref string i)
			 do
			 (setf (aref str (+ i pointer))
			       (if downcase?
				   (char-downcase char)
				   char))
			 (setq downcase? (char= char #\.)))))
	       (t
		(print-adjusting x code)))))
      (bignum
       ;; Not handled by SI::PRINT-TO-STRING1
       (print-adjusting (format nil ``~a'' x) code))
      (otherwise
       (print-adjusting x code))))
  str)

;;; Added by Zvona.  Needed when generating tcl from Lisp functions
;;; outside this file, to make compatible with the gross kludge in
;;; PRINT-TO-STRING.
(defun downcase-pathname (symbol)
  (let ((string (copy-seq (symbol-name symbol))))
    (sloop for i from 0 to (- (length string) 2)
	   for char = (aref string i)
	   when (char= char #\.)
	   do (setf (aref string (1+ i)) (char-downcase (aref string (1+ i)))))
    string))

From owner-gcl@cli  Mon Jul  8 11:22:34 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA11973; Mon, 8 Jul 1996 11:22:33 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA23262; Mon, 8 Jul 1996 11:15:19 -0500
Received: from blanco by cli.com (SMI-8.6/SMI-SVR4)
	id LAA23257; Mon, 8 Jul 1996 11:15:16 -0500
From: sandel@cli (Charles Sandel)
Received: by blanco (SMI-8.6) id LAA29042; Mon, 8 Jul 1996 11:15:15 -0500
Date: Mon, 8 Jul 1996 11:15:15 -0500
Message-Id: <199607081615.LAA29042@blanco>
Subject: BOUNCE gcl message: Imbalanced parentheses or angle brackets
To: gcl@cli.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: quoted-printable
Content-MD5: feeoQpa+6qUodLLIHrKqHg==
Sender: owner-gcl@cli
Precedence: bulk
content-length: 1692


This message was bounced due to imbalanced mail-header delimiters.


------------- Begin Forwarded Message -------------

=46rom karlheg@cherryflower.or.us  Tue Jun 25 16:17:40 1996
Return-Path: <karlheg@cherryflower.or.us>
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id QAA28296; Tue, 25 Jun 1996 16:16:15 -0500
Received: (from karlheg@localhost) by cherryflower.or.us (8.6.12/8.6.9) =
id GAA00446; Tue,=20
25 Jun 1996 06:03:44 -0700
Date: Tue, 25 Jun 1996 06:03:44 -0700
Message-Id: <199606251303.GAA00446@cherryflower.or.us>
From: "\"Karl M. Hegbloom\" <Karl M. Hegbloom" <karlheg@teleport.com>
To: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
Cc: gcl@cli.com
Subject: tcl7.5/tk4.1=20
In-Reply-To: =
<Pine.HPP.3.91.960624133554.23934A-100000@neurocog.lrdc.pitt.edu>
References: =
<Pine.HPP.3.91.960624133554.23934A-100000@neurocog.lrdc.pitt.edu>
content-length: 740

>>>>> "Jeff" =3D=3D Jeff Shrager <shrager@neurocog.lrdc.pitt.edu> =
writes:

    Jeff> Anyone have the patches for gcl-tk for the latest versions
    Jeff> for tcl/tk (7.5, 4.1; at least that's what I have at the
    Jeff> moment)?

    Jeff> Tnx, 'Jeff

 I'd like them too, If anyone's done it.  I started, but haven't
finished, and am not certain that I'm up to the task.  It seems like
all that needs to be done is to copy in the Tk4.1 TkMain.c and
TkAppInit.c, and then diffedit to add the GCL specific changes.

 I've just started to learn to read code; it will take a while.

--=20
Karl M. Hegbloom
<karlheg@teleport.com>
http://www.teleport.com/~karlheg
(K0D) AYG-GE01  Portland, OR, USA
Proudly running Linux 2.0.0 and GNU public software!
------------- End Forwarded Message -------------


From owner-gcl@cli  Mon Jul  8 11:22:55 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA11978; Mon, 8 Jul 1996 11:22:50 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA23282; Mon, 8 Jul 1996 11:16:56 -0500
Received: from blanco by cli.com (SMI-8.6/SMI-SVR4)
	id LAA23277; Mon, 8 Jul 1996 11:16:54 -0500
From: sandel@cli (Charles Sandel)
Received: by blanco (SMI-8.6) id LAA29052; Mon, 8 Jul 1996 11:16:53 -0500
Date: Mon, 8 Jul 1996 11:16:53 -0500
Message-Id: <199607081616.LAA29052@blanco>
Subject: BOUNCE gcl: Imbalanced parentheses or angle brackets
To: gcl@cli.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: quoted-printable
Content-MD5: hkcmM7gFz0hG9fctpbs0/A==
Sender: owner-gcl@cli
Precedence: bulk
content-length: 2709


Another message bounced because of imbalanced mail-header delimiters.

------------- Begin Forwarded Message -------------

=46rom owner-gcl Wed Jun 26 01:36:10 1996
Date: Wed, 26 Jun 1996 01:36:10 -0500
From: owner-gcl
To: owner-gcl
Subject: BOUNCE gcl: Imbalanced parentheses or angle brackets

=46rom karlheg@cherryflower.or.us  Wed Jun 26 01:36:06 1996
Return-Path: <karlheg@cherryflower.or.us>
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id BAA06588; Wed, 26 Jun 1996 01:35:59 -0500
Received: (from karlheg@localhost) by cherryflower.or.us (8.6.12/8.6.9) =
id XAA13420; Tue,=20
25 Jun 1996 23:35:39 -0700
Date: Tue, 25 Jun 1996 23:35:39 -0700
Message-Id: <199606260635.XAA13420@cherryflower.or.us>
From: "\"Karl M. Hegbloom\" <Karl M. Hegbloom" <karlheg@teleport.com>
To: David Thompson <thomas@cs.wisc.edu>
Cc: gcl@cli.com
Subject: gcl.info not found
In-Reply-To: <199606251355.IAA00508@pongo.cs.wisc.edu>
References: <199606251355.IAA00508@pongo.cs.wisc.edu>
content-length: 1642

>>>>> "David" =3D=3D David Thompson <thomas@cs.wisc.edu> writes:

    David> gcl newbie question...  The gcl-2.2 distribution create an
    David> info/dir file that contains

    David> '* GCL Ansi Doc: (gcl.info).  Ansi Common Lisp
    David> SpecFrom owner-gcl@cli  Wed Jul 17 15:42:40 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id PAA13170; Wed, 17 Jul 1996 15:42:35 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA06910; Wed, 17 Jul 1996 15:19:41 -0500
Received: from oaklands.demon.co.uk by cli.com (SMI-8.6/SMI-SVR4)
	id PAA06905; Wed, 17 Jul 1996 15:19:36 -0500
Received: (from horrocks@localhost) by oaklands.demon.co.uk (8.6.9/8.6.9) id VAA08691; Wed, 17 Jul 1996 21:09:07 +0100
Date: Wed, 17 Jul 1996 21:09:05 +0200
From: Ian Horrocks <horrocks@cs.man.ac.uk>
Subject: value stack overflow
To: gcl@cli.com
Message-ID: <Pine.3.89.9607172054.A8660-0100000@oaklands.demon.co.uk>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl@cli
Precedence: bulk
content-length: 665

I know this is probably trivial, but could anyone tell me how I can 
increase the size of the value stack and other system parameters.

Thanks

Ian


===============================================================================
Ian Horrocks, Medical Informatics Group, Department of Computer Science,
University of Manchester, Manchester M13 9PL, United Kingdom.
-------------------------------------------------------------------------------
Tel: (+44 161) 275 6239  Fax: (+44 161) 275 6932  E-Mail: horrocks@cs.man.ac.uk
WWW: http://www.cs.man.ac.uk/mig/people/horrocks/index.html
===============================================================================

From owner-gcl@cli  Thu Jul 18 12:20:03 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id LAA22904; Thu, 18 Jul 1996 11:47:17 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA21759; Thu, 18 Jul 1996 11:40:15 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id LAA21754; Thu, 18 Jul 1996 11:40:07 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id RAA12409; Thu, 18 Jul 1996 17:39:59 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 18 Jul 96 17:36:59 BST
Date: Thu, 18 Jul 96 17:36:53 BST
Message-Id: <26776.9607181636@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: value stack overflow
To: Ian Horrocks <horrocks@cs.man.ac.uk>, gcl@cli.com
In-Reply-To: Ian Horrocks's message of Wed, 17 Jul 1996 21:09:05 +0200
Sender: owner-gcl@cli
Precedence: bulk
content-length: 891

> I know this is probably trivial, but could anyone tell me how I can 
> increase the size of the value stack and other system parameters.

The following wil help for stacks:

   (setq si::*multiply-stacks* 4)

So it at the top level (it can be in a file you load).  Anyway,
it takes effect the next time the GCL top level gets control,
and the system will look like it's restarting.  Eg:

----------------------------------------------------------------------
ebay 141% gcl-1.1  
GCL (GNU Common Lisp)  Version(1.1) Tue Dec 12 17:35:28 GMT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>  (setq si::*multiply-stacks* 4)
4

>GCL (GNU Common Lisp)  Version(1.1) Tue Dec 12 17:35:28 GMT 1995
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>
----------------------------------------------------------------------

-- jeff

From owner-gcl@cli  Thu Jul 18 17:14:04 1996
Return-Path: <owner-gcl@cli>
Received: from cli.com by ftp.cli.com. (SMI-8.6/SMI-SVR4)
	id RAA01558; Thu, 18 Jul 1996 17:14:00 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA22664; Thu, 18 Jul 1996 16:54:40 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id QAA22659; Thu, 18 Jul 1996 16:54:35 -0500
Date: Thu, 18 Jul 96 16:53:41 CDT
Posted-Date: Thu, 18 Jul 96 16:53:41 CDT
Message-Id: <9607182153.AA27905@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA27905; Thu, 18 Jul 96 16:53:41 CDT
From: Benjamin Price Shults <bshults@math.utexas.edu>
To: gcl@cli.com
Subject: format directive ~? broken with XP?
Sender: owner-gcl@cli
Precedence: bulk
content-length: 1617

Use of the ~? directive in combination with pretty printing directives
seems to break GCL:

--begin script--

IPR>(format nil "~<HEIGH ~s~:>" '(ho))
"HEIGH HO"

IPR>(format nil "~?" "~<HEIGH ~s~:>" '((ho)))
Error: Format error: ~> expected.
                    V
       "~<HEIGH ~s~:>"
       
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at FORMAT.  Type :H for Help.
IPR>>
Top level.
IPR>(format nil "~<heigh ~s~:>" '(ho))
"heigh HO"

IPR>

--end script--

I have tried it with simpler directives such as ~:@_ and it gives the
unknown directive error:

--begin script--

IPR>(format nil "~<hi ~:@_ ho ~:>" nil)
"hi
 ho "

IPR>(format nil "~?" "~<hi ~:@_ ho ~:>" '(nil))
Error: Format error: illegal directive.
                V
       "~<hi ~:@_ ho ~:>"
       
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by EVAL.
Broken at FORMAT.  Type :H for Help.
IPR>>

--end script--

Apparently the recursive call to format does not know that it has been
redefined.

I am using GCL 2.2 patched and compiled on Linux 1.2.13.

I use a saved image which has the xp-code compiled in.  I did:

--begin script--

>(load "xp-code")
>(push :xp *features*)
>(si::save-system "gcl-xp")

--end script--

And put

  (setq gcl-program "gcl-xp")

in my .emacs file.

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From sandel  Mon Jul 29 17:24:07 1996
Return-Path: <sandel>
Received: from blanco by cli.com (SMI-8.6/SMI-SVR4)
	id RAA05421; Mon, 29 Jul 1996 17:24:07 -0500
From: sandel (Charles Sandel)
Received: by blanco (SMI-8.6) id RAA25454; Mon, 29 Jul 1996 17:24:06 -0500
Date: Mon, 29 Jul 1996 17:24:06 -0500
Message-Id: <199607292224.RAA25454@blanco>
To: gcl-archive
Subject: test
content-length: 29


Just a test, please ignore.

From owner-gcl  Mon Jul 29 18:50:13 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id SAA06044; Mon, 29 Jul 1996 18:48:30 -0500
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id SAA06039; Mon, 29 Jul 1996 18:48:25 -0500
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id QAA03351; Mon, 29 Jul 1996 16:48:32 -0700
Date: Mon, 29 Jul 1996 16:48:32 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199607292348.QAA03351@aurora.romoidoy.com>
To: gcl@cli.com
subject: more on race condition in tk interface
Sender: owner-gcl
Precedence: bulk
content-length: 637

I've verified that the problem actually is a race condition by putting
a timeout in the call on SI::CHECK-STATE-INPUT right after TOP in
READ-AND-ACT.  With a timeout of 20 units (.2 seconds), everything
works correctly -- it's just very slow.  (It's .2 seconds per trip
around READ-AND-ACT, which can add up to several seconds for simple
interactions.) 

I've also determined that the SIGUSR1 interrupt is being signalled at
the appropriate times.  

So, the problem is that it takes up to .2 seconds for
SI::CHECK-STATE-INPUT to see data on the tk connection after SIGUSR1
has been signalled.  Any idea why this might be?  

Thanks...

From owner-gcl  Mon Jul 29 21:48:18 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA06324; Mon, 29 Jul 1996 21:36:30 -0500
Received: from fountain.village.org by cli.com (SMI-8.6/SMI-SVR4)
	id VAA06319; Mon, 29 Jul 1996 21:36:26 -0500
Received: from localhost (localhost [127.0.0.1]) by fountain.village.org (8.6.11/8.6.6) with SMTP id UAA11317 for <gcl@cli.com>; Mon, 29 Jul 1996 20:36:24 -0600
Message-Id: <199607300236.UAA11317@fountain.village.org>
To: gcl@cli.com
Subject: Re: more on race condition in tk interface 
In-reply-to: Your message of Mon, 29 Jul 1996 16:48:32 PDT
Date: Mon, 29 Jul 1996 20:36:23 -0600
From: Dieter Dworkin Muller <dworkin@village.org>
Sender: owner-gcl
Precedence: bulk
content-length: 426


David Chapman <zvona@zoom.com> wrote:
:  So, the problem is that it takes up to .2 seconds for
:  SI::CHECK-STATE-INPUT to see data on the tk connection after SIGUSR1
:  has been signalled.  Any idea why this might be?  

I believe it is somewhere within Tk itself, as I can get similar
behaviour with TCL/Tk by having something happen asynchronously while
clicking a button with a non-trivial callback repeatedly.

	Dworkin

From owner-gcl  Thu Aug  1 11:56:46 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA15248; Thu, 1 Aug 1996 11:46:41 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id LAA15243; Thu, 1 Aug 1996 11:46:33 -0500
Date: Thu, 1 Aug 96 11:45:16 CDT
Posted-Date: Thu, 1 Aug 96 11:45:16 CDT
Message-Id: <9608011645.AA01319@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA01319; Thu, 1 Aug 96 11:45:16 CDT
From: Benjamin Price Shults <bshults@math.utexas.edu>
To: gcl@cli.com
Subject: compile errors
Sender: owner-gcl
Precedence: bulk
content-length: 940

I am getting compile errors.  One strange thing about this is that it
says that gcc returns the "non-zero value 0."

>:m
(SYSTEM "(cd /u/bshults/work/ipr/test/newest/src/ ;gcc -pipe -fwritable-strings  -DVOL=volatile -I/install/gcl-2.2/o -fsigned-char  -O -c -I. gamma-steps.c -w)") returned a non-zero value 0.
NIL
IPR>>:bl
>> CERROR():
Local(0): Continues anyway.
Local(1): (SYSTEM ~S) returned a non-zero value ~D.
Local(2): (cd /u/bshults/work/ipr/test/newest/src/ ;gcc -pipe -fwritable-strings  -DVOL=volatile -I/install/gcl-2.2/o -fsigned-char  -O -c -I. gamma-steps.c -w)
Local(3): 0
NIL
IPR>>

I will supply more info to interested parties.

-- 
Benjamin Shults                 Email:  bshults@math.utexas.edu
Department of Mathematics       Phone:  (512) 471-7711 ext. 208
University of Texas at Austin   WWW:    http://www.ma.utexas.edu/users/bshults
Austin, TX  78712   USA         FAX:    (512) 471-9038 (attn: Benjamin Shults)

From owner-gcl  Thu Aug  1 12:18:33 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA15383; Thu, 1 Aug 1996 12:17:26 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id MAA15378; Thu, 1 Aug 1996 12:17:24 -0500
Date: Thu, 1 Aug 96 12:16:15 CDT
Posted-Date: Thu, 1 Aug 96 12:16:15 CDT
Message-Id: <9608011716.AA01500@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA01500; Thu, 1 Aug 96 12:16:15 CDT
From: Benjamin Price Shults <bshults@math.utexas.edu>
To: gcl@cli.com
Subject: ";;; A bug was found in the compiler.  Contact Taiichi."
Sender: owner-gcl
Precedence: bulk
content-length: 1366

Does this mean that I need to send my code to somebody?  The change I
made to the code before this error occurred was to replace some calls
to nconc with calls to append.

; (DEFUN SPLICING-BROWNS-RULE) is being compiled.
;;; A bug was found in the compiler.  Contact Taiichi.

Break.
Broken at CATCH.  Type :H for Help.
IPR>>:bt
#0   COMPILER-PASS2 {} [ihs=29]
#1   COMPILE-FILE1 {} [ihs=20]
#2   APPLY {loc0=compiler::compile-file1,loc1=("/u/bshults/work/ipr/test/newest/src/brown-s...} [ihs=19]
#3   APPLY {loc0=compiler::compile-file1,loc1=("/u/bshults/work/ipr/test/newest/src/brown-s...} [ihs=18]
#4   COMPILE-FILE {} [ihs=15]
#5   MAPC {loc0=(lambda-closure ((force-src nil) (force-binary nil) (files #)) nil ...),lo...} [ihs=9]
#6   LOAD-FILES {} [ihs=8]
#7   LOAD-IPR {} [ihs=7]
#8   EVAL {loc0=nil,loc1=nil,loc2=nil,loc3=(lambda-block load-ipr (&key force-binary force...} [ihs=6]
#9   TOP-LEVEL {loc0=nil,loc1=0,loc2=0,loc3=nil,loc4=nil,loc5=nil,loc6=nil,loc7="Contains Enhan...} [ihs=5]
#10   FUNCALL {loc0=#<compiled-function system:top-level>} [ihs=4]
NIL
IPR>>:bl
>> (CATCH *CMPERR-TAG* (CTOP-WRITE *INIT-NAME*))():
C-PATHNAME: #"/u/bshults/work/ipr/test/newest/src/brown-steps.c"
H-PATHNAME: #"/u/bshults/work/ipr/test/newest/src/brown-steps.h"
SYSTEM-P : NIL
ST       : #<output stream "/u/bshults/work/ipr/test/newest/src/brown-steps.c">
NIL
IPR>>

From root  Thu Aug  1 13:02:31 1996
Return-Path: <root>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA15623; Thu, 1 Aug 1996 13:02:31 -0500
Date: Thu, 1 Aug 1996 13:02:31 -0500
From: root (Super-User)
Message-Id: <199608011802.NAA15623@cli.com>
To: gcl-archive
Subject: test
content-length: 6


test

From sandel  Thu Aug  1 13:02:42 1996
Return-Path: <sandel>
Received: from blanco by cli.com (SMI-8.6/SMI-SVR4)
	id NAA15626; Thu, 1 Aug 1996 13:02:42 -0500
From: sandel (Charles Sandel)
Received: by blanco (SMI-8.6) id MAA18756; Thu, 1 Aug 1996 12:25:46 -0500
Date: Thu, 1 Aug 1996 12:25:46 -0500
Message-Id: <199608011725.MAA18756@blanco>
To: gcl-archive
Subject: Test
content-length: 6


test

From owner-gcl  Thu Aug  1 15:58:11 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA21129; Thu, 1 Aug 1996 15:56:05 -0500
Received: from sargasso.cps.msu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id PAA21124; Thu, 1 Aug 1996 15:56:01 -0500
Received: from ariel.cps.msu.edu (ariel.cps.msu.edu [35.9.35.130]) by sargasso.cps.msu.edu (8.7.5/8.7.3) with ESMTP id QAA13910; Thu, 1 Aug 1996 16:55:43 -0400 (EDT)
Received: (from punch@localhost) by ariel.cps.msu.edu (8.7.5/8.7.3) id QAA05054; Thu, 1 Aug 1996 16:55:43 -0400 (EDT)
Date: Thu, 1 Aug 1996 16:55:43 -0400 (EDT)
Message-Id: <199608012055.QAA05054@ariel.cps.msu.edu>
From: Bill Punch <punch@cps.msu.edu>
To: jeff@aiai.ed.ac.uk
CC: gcl@cli.com
In-reply-to: <1614.9607290152@subnode.aiai.ed.ac.uk> (message from Jeff Dalton
	on Mon, 29 Jul 96 02:52:32 BST)
Subject: Re: making GCL on UltraSparcs
Sender: owner-gcl
Precedence: bulk
content-length: 183


A number of people have reported getting gcl-2.2 up under solaris (including
me) and I think it is fairly well documented in the mail archive. If not, let
me know. 

					>>>bill<<<

From owner-gcl  Tue Aug  6 19:20:46 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA15607; Tue, 6 Aug 1996 19:06:10 -0500
Received: from huckleberry.sfsu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id TAA15602; Tue, 6 Aug 1996 19:06:07 -0500
Received: by huckleberry.sfsu.edu (NX5.67e/NX3.0M)
	id AA01234; Tue, 6 Aug 96 17:06:05 -0700
Message-Id: <9608070006.AA01234@huckleberry.sfsu.edu>
Content-Type: text/plain
Mime-Version: 1.0 (NeXT Mail 3.3 v118.2)
Received: by NeXT.Mailer (1.118.2)
From: Jack Hodges <hodges@huckleberry.sfsu.edu>
Date: Tue,  6 Aug 96 17:06:04 -0700
To: gcl@cli.com
Subject: compilation problems for gcl2.2 on Sun Solaris 2.5x ... any
	suggestions
Cc: carpente@futon.SFSU.EDU
Sender: owner-gcl
Precedence: bulk
content-length: 186

I am trying to compile gcl 2.2 on a Sparc 5 running
Solaris 2.5x. Does anyone know if patches are
available for getting through this? Thanks.

Jack Hodges
San Francisco State University

From owner-gcl  Tue Aug  6 20:52:33 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id UAA15881; Tue, 6 Aug 1996 20:45:04 -0500
Received: from cs.utah.edu by cli.com (SMI-8.6/SMI-SVR4)
	id UAA15876; Tue, 6 Aug 1996 20:44:58 -0500
From: ganesh@facility.cs.utah.edu
Received: from durga.cs.utah.edu by cs.utah.edu (8.6.12/utah-2.21-cs)
	id TAA13179; Tue, 6 Aug 1996 19:44:50 -0600
Received: by durga.cs.utah.edu (8.6.12/utah-2.15sun-leaf)
	id TAA03686; Tue, 6 Aug 1996 19:44:45 -0600
Date: Tue, 6 Aug 1996 19:44:45 -0600
Message-Id: <199608070144.TAA03686@durga.cs.utah.edu>
To: gcl@cli.com, hodges@huckleberry.sfsu.edu
Subject: Re: compilation problems for gcl2.2 on Sun Solaris 2.5x ... any suggestions
Cc: carpente@futon.SFSU.EDU, ganesh@facility.cs.utah.edu
Sender: owner-gcl
Precedence: bulk
content-length: 698

Following a recent tip about the existence of patches (which I
had overlooked and had posted a help msg), gcl make went further
along and stopped at raw_gcl output where it detected a conflict:
multiple shift()s defined; I found the conflict was with a library
function with the same name. When I commented out the shift() in
mp/mp2.c (actually function GEN shifts(x,y)), make finished
writing out lisp, booted lisp, and then more or less ended fine
(the last fatal was "library -ltcl: not found" which I suspect
to be a path problem). I don't know if it's OK to comment out
the shifts() function, but gcl "seems" to run on limited tests.
All this is on my Ultra-1 running Solaris. Thanks,

Ganesh

From owner-gcl  Sun Aug 11 12:19:00 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA05301; Sun, 11 Aug 1996 12:14:25 -0500
Received: from neurocog.lrdc.pitt.edu by cli.com (SMI-8.6/SMI-SVR4)
	id MAA05294; Sun, 11 Aug 1996 12:14:22 -0500
Received: by neurocog.lrdc.pitt.edu
	(1.37.109.10G/16.2) id AA098263657; Sun, 11 Aug 1996 13:14:17 -0400
Date: Sun, 11 Aug 1996 13:14:17 -0400 (EDT)
From: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
To: gcl@cli.com
Subject: gcl tk instability
Message-Id: <Pine.HPP.3.91.960811130908.9772A-100000@neurocog.lrdc.pitt.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 424

I am running gcl/Tk on our hp9000/735.  It seems at first glance to
have basic sanity - windows pack up appropriately and display,
scrolling work, etc., but the call back interface hangs and crashes
and is jut generally badly behaved, regularly failing so hard that it
causes lisp to coredump.  Has anyone seen such misbehavior and can
tell me what might be causing it?  The compile seems to have gone
okay.

Thanks,
'Jeff


From owner-gcl  Thu Aug 15 11:05:36 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id KAA15966; Thu, 15 Aug 1996 10:58:26 -0500
Received: from amdext.amd.com by cli.com (SMI-8.6/SMI-SVR4)
	id KAA15960; Thu, 15 Aug 1996 10:58:10 -0500
Received: from amdint.amd.com by amdext.amd.com with SMTP id AA19490
  (5.67a/IDA-1.5+AMD for <gcl@cli.com>); Thu, 15 Aug 1996 08:58:08 -0700
Received: from beast.amd.com by amdint.amd.com with SMTP id AA20969
  (5.67a/IDA-1.5+AMD for <gcl@cli.com>); Thu, 15 Aug 1996 08:58:07 -0700
Received: from dalhart.amd.com (dalhart) by beast.amd.com (1.37.109.18/AMDSH-1.20)
	id AA037254688; Thu, 15 Aug 1996 10:58:09 -0500
Received: by dalhart.amd.com (1.37.109.16/AMDC-1.20)
	id AA212024685; Thu, 15 Aug 1996 10:58:05 -0500
Date: Thu, 15 Aug 1996 10:58:05 -0500
From: Arthur.Flatau@amd.com (Arthur Flatau)
Message-Id: <199608151558.AA212024685@dalhart.amd.com>
To: gcl@cli.com
Subject: CLOS in GCL
Reply-To: Arthur.Flatau@amd.com
Sender: owner-gcl
Precedence: bulk
content-length: 489

It used to be the case that GCL (or at least AKCL) did not support
CLOS.  Has this changed?  Is it possible to run CLOS in GCL?  If not,
does anyone have plans to run implement CLOS in GCL?

Thanks for any info,
Art

-- 
Arthur Flatau                           Texas Microprocessor Division
Arthur.Flatau@amd.com                   Advanced Micro Devices
                                        5900 East Ben White Boulevard
                                        M/S 521 Austin TX 78741


From owner-gcl  Thu Aug 15 14:03:15 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA16738; Thu, 15 Aug 1996 14:02:14 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id OAA16732; Thu, 15 Aug 1996 14:02:05 -0500
Received: from aiai.ed.ac.uk ([192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id UAA02304; Thu, 15 Aug 1996 20:01:53 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Thu, 15 Aug 96 19:58:23 BST
Date: Thu, 15 Aug 96 19:58:16 BST
Message-Id: <29456.9608151858@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: CLOS in GCL
To: Arthur.Flatau@amd.com, gcl@cli.com
In-Reply-To: Arthur Flatau's message of Thu, 15 Aug 1996 10:58:05 -0500
Sender: owner-gcl
Precedence: bulk
content-length: 773

> It used to be the case that GCL (or at least AKCL) did not support
> CLOS.  Has this changed?  Is it possible to run CLOS in GCL?  If not,
> does anyone have plans to run implement CLOS in GCL?

PCL works in GCL.  It's also possible (with some work) to use
the CLOS from ECL.  I mention the latter because I've done a
basic version of the "some work" and might be able to make it
available, if anyone is interested.  It's a simpler implementation
than PCL and might work better in some ways.  (PCL is a big
pain in GCL because it so often calls COMPILE, which then runs
the C compiler, which is annoyingly slow.  Unless someone has
fixed this.)  However, PCL almost certainly does faster method
lookup (when COMPILE isn't called, that is) than my port from
ECL.

-- jeff

From owner-gcl  Mon Aug 19 03:40:50 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA25272; Mon, 19 Aug 1996 03:26:18 -0500
Received: from linux1.ce.ntu.edu.tw by cli.com (SMI-8.6/SMI-SVR4)
	id DAA25266; Mon, 19 Aug 1996 03:25:58 -0500
Received: (from d791013@localhost) by linux1.ce.ntu.edu.tw (8.7.5/8.6.9) id QAA08049; Mon, 19 Aug 1996 16:35:42 +0800
Date: Mon, 19 Aug 1996 16:35:42 +0800
From: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
Message-Id: <199608190835.QAA08049@linux1.ce.ntu.edu.tw>
To: gcl@cli.com
Subject: [Q] with-open-file & read-line ...
Sender: owner-gcl
Precedence: bulk
content-length: 1095

Hi gurus,

I'm new to this mailing list. I have two questions that need your helps.
(sorry if this problem had been posted before, but I had browsed the
file mail-archive and found without any answers :-)

The sample below is when I use with-open-file and has its response with
gcl 2.2 (patched). But I've been tried it in CLISP (1995-12-08 (December
1995)) and Allegro CL (Allegro CL 3.1.12.1 [Hewlett Packard]
(10/28/91)), they all leave smoothly:

Top level.
>(with-open-file (foo "no-such-file" :if-does-not-exist nil))

Error: NIL is not of type STREAM.
Fast links are on: do (si::use-fast-links nil) for debugging
Error signalled by CLOSE.
Broken at CLOSE.  Type :H for Help.
>>


Another question is how can I use read-line in a function such that it
could read data at the _proper_ time instead of reading just after I end
up the right parenthesis. E.g. I have a fun

(defun foo ()
  (let (file)
    (format t ("~%file name: "))
    (setq file (read-line)))
    file)

This also behaviors different with CLISP and Allegro CL.

Thank in advance.

Chun-Yu Lee
d791013@linux1.ce.ntu.edu.tw

From owner-gcl  Fri Sep  6 20:13:54 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id UAA02687; Fri, 6 Sep 1996 20:07:42 -0500
Received: from linux1.ce.ntu.edu.tw by cli.com (SMI-8.6/SMI-SVR4)
	id UAA02681; Fri, 6 Sep 1996 20:07:32 -0500
Received: (from d791013@localhost) by linux1.ce.ntu.edu.tw (8.7.5/8.6.9) id JAA04416; Sat, 7 Sep 1996 09:17:08 +0800
Date: Sat, 7 Sep 1996 09:17:08 +0800
From: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
Message-Id: <199609070117.JAA04416@linux1.ce.ntu.edu.tw>
To: gcl@cli.com
Subject: about declaration.
Sender: owner-gcl
Precedence: bulk
content-length: 2194

Hello,

It's me again :-)

I'm confused about a concept of declaration, although which is not specific
to GCL, but I know you can give me hints. Thanks in advance!

A function is defined as below. When compiled by gcl, some warnings are
shown as follows:

linux1:~/admin/PERT> gcl -batch -compile pert.lsp
Compiling pert.lsp.
; (DEFUN CHECK-ROUTE-ERROR ...) is being compiled.
;; The variable ID is undefined.
;; The compiler will assume this variable is a global.
;; The variable PRE-ID is undefined.
;; The compiler will assume this variable is a global.
;; The variable PRE-IDS is undefined.
;; The compiler will assume this variable is a global.
End of Pass 1.  
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling pert.lsp.
linux1:~/admin/PERT>

I know I'm mis-using the declare special form. But I don't know how to
modify them.

Regards,

Chun-Yu Lee

;;;;;;;;;;;;;;;;;
(defun check-route-error (ev-hash)
  "Check if an event's predecessors contains invalid events.

If one of the predecessors of an event ev, when tracing its predecessors
back, occurs that one of its predecessors appeared to be one of its
ancestor, it concludes that the event is invalid.
  "
  (let (check-event ret)
    (declare (special ret))
    (setq
     check-event
     #'(lambda (ev-hash ev)
	 "this function must run in conjunction with check-route-error."
	 (let ((ppre-ids (event-predecessor ev)) result)
	   (cond ((null ppre-ids) nil)
		 ((member id ppre-ids) 
		  (format t
		    "~%PERT Error: infinitive event loop: ~
                     event ~A and ~A." id pre-id)
		  (setq ret 'inf))
		 ((intersection ppre-ids pre-ids) t)
		 (t (dolist (ppre-id ppre-ids)
		      (if (setq result 
				(funcall
				 check-event 
				 ev-hash
				 (gethash ppre-id ev-hash)))
			  (return result))))))))
    (maphash
     #'(lambda (id ev)
	 (declare (special id))
	 (let ((pre-ids (event-predecessor ev)))
	   (declare (special pre-ids))
	   (dolist (pre-id pre-ids)
	     (declare (special pre-id))
	     (when (setf (event-invalid-p ev)
			 (funcall check-event
				  ev-hash
				  (gethash pre-id ev-hash)))
	       (return)))))
     ev-hash)
    ret))

From owner-gcl  Sun Sep  8 19:08:54 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA25037; Sun, 8 Sep 1996 19:02:07 -0500
Received: from grendel.csc.smith.edu by cli.com (SMI-8.6/SMI-SVR4)
	id TAA25031; Sun, 8 Sep 1996 19:02:04 -0500
Received: from localhost (orourke@localhost) by grendel.csc.smith.edu (8.6.5/8.6.5) id UAA22839; Sun, 8 Sep 1996 20:08:14 -0400
From: orourke@cs.smith.edu (Joseph O'Rourke)
Message-Id: <199609090008.UAA22839@grendel.csc.smith.edu>
Subject: Touretzky's SDRAW in gcl?
To: gcl@cli.com
Date: Sun, 8 Sep 1996 20:08:14 -0400 (EDT)
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 1077

Can anyone tell me how to get Touretzky's software that he distributes
with his "Common Lisp" book to work under gcl?  I ftp'ed from cmu
the sdraw.generic file, but I get this upon loading it: 
----------------------------------------------------------------
GCL (GNU Common Lisp)  Version(2.2) Wed Aug 21 16:58:21 EDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter

>(load "sdraw.generic")
Loading sdraw.generic

Error: The function DEFPACKAGE is undefined.
[etc.]
----------------------------------------------------------------
I also tried some other versions: sdraw.gc1, sdraw.gc3.  All give
various errors.  The book says the generic version should work under any
common lisp.
	The immediate source of the error in the file is this:
----------------------------------------------------------------
(defpackage "SDRAW"
  (:use "COMMON-LISP")
  (:export sdraw sdraw-loop scrawl *sdraw-print-circle* *sdraw-leading-arrow*))
----------------------------------------------------------------
Thanks for any help anyone can offer!
						:-j

From owner-gcl  Sun Sep  8 21:32:10 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA25514; Sun, 8 Sep 1996 21:29:16 -0500
Received: from Rincewind.arch.su.edu.au by cli.com (SMI-8.6/SMI-SVR4)
	id VAA25508; Sun, 8 Sep 1996 21:29:01 -0500
Received: from Rincewind.arch.su.edu.au (thorsten@Rincewind [127.0.0.1]) by Rincewind.arch.su.edu.au (8.7.5/8.6.9) with SMTP id MAA00634; Mon, 9 Sep 1996 12:28:53 +1000
Message-ID: <323380E3.6E8470D@arch.su.edu.au>
Date: Mon, 09 Sep 1996 12:28:51 +1000
From: Thorsten Schnier <thorsten@arch.su.edu.au>
X-Mailer: Mozilla 3.0b6 (X11; I; Linux 1.99.8 i486)
MIME-Version: 1.0
To: gcl@cli.com
CC: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>
Subject: Re: Touretzky's SDRAW in gcl?
References: <199609090008.UAA22839@grendel.csc.smith.edu>
Content-Type: multipart/mixed; boundary="------------1E4073BD58CFCDFA1B037EEF"
Sender: owner-gcl
Precedence: bulk
content-length: 13411

This is a multi-part message in MIME format.

--------------1E4073BD58CFCDFA1B037EEF
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

J
> 
> >(load "sdraw.generic")
> Loading sdraw.generic
> 


The defpackage macro is missing in GCL. It is available from the CMU
lisp archive, but I think I had to modify it slightly, so I attach it to
this mail. (BTW. you also might want to get the loop macro, as sloop is
not quite up to standard, either).

You can automatically load it into gcl by modifying the shell script
that starts gcl: (you will have to adapt this to your locations, the
last two lines are for the loop package).


#!/bin/sh
exec /opt/gcl-2.2/lib/gcl-2.2/unixport/saved_gcl \
   -dir /opt/gcl-2.2/lib/gcl-2.2/unixport/ \
   -libdir /opt/gcl-2.2/lib/gcl-2.2/ \
   -eval '(setq si::*allow-gzipped-file* t)' \
   -eval '(setq si::*tk-library* "/usr/lib/tk4.0")' \
   -eval '(setq si::*default-info-files* (quote ("gcl-si.info"
"gcl-tk.info")))'
\
   -eval '(rename-package :lisp :common-lisp (quote ("CL" "LISP")))'\
   -eval '(rename-package :user :common-lisp-user (quote ("CL-USER"
"USER")))'\
   -eval '(load "/opt/gcl-2.2/lib/gcl-2.2/lsp/defpackage.o")'\
   -eval '(use-package "DEFPACKAGE")'\
   -eval '(load "/opt/gcl-2.2/lib/gcl-2.2/lsp/ansi-loop.o")'\
   -eval '(use-package "ANSI-LOOP")'\
     "$@"


thorsten

----------------------------------------------------------------------- 
       \    C                                       
        \   O                                          Thorsten Schnier
         \  M                       
     /\   \ P                            Key Centre of Design Computing
    /     / U                                      University of Sydney
    \    /  T                                                  NSW 2006
     \  /   I                      
      \/    N                                 thorsten@arch.usyd.edu.au 
    DESIGN  G                    http://www.arch.usyd.edu.au/~thorsten/
  key centre

--------------1E4073BD58CFCDFA1B037EEF
Content-Type: text/plain; charset=us-ascii; name="defpackage.lisp"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline; filename="defpackage.lisp"

;;; -*- Mode: LISP; Syntax: Common-lisp; Base: 10; Package: (DEFPACKAGE :COLON-MODE :EXTERNAL) -*-
;;;
;;;				 THE BOEING COMPANY
;;;			      BOEING COMPUTER SERVICES
;;;			       RESEARCH AND TECHNOLOGY
;;;				  COMPUTER SCIENCE
;;;			      P.O. BOX 24346, MS 7L-64
;;;			       SEATTLE, WA 98124-0346
;;;
;;;
;;; Copyright (c) 1990, 1991 The Boeing Company, All Rights Reserved.
;;;
;;; Permission is granted to any individual or institution to use,
;;; copy, modify, and distribute this software, provided that this
;;; complete copyright and permission notice is maintained, intact, in
;;; all copies and supporting documentation and that modifications are
;;; appropriately documented with date, author and description of the
;;; change.
;;;
;;; Stephen L. Nicoud (snicoud@boeing.com) provides this software "as
;;; is" without express or implied warranty by him or The Boeing
;;; Company.
;;;
;;; This software is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY.  No author or distributor accepts
;;; responsibility to anyone for the consequences of using it or for
;;; whether it serves any particular purpose or works at all.
;;;
;;;	Author:	Stephen L. Nicoud
;;;
;;; -----------------------------------------------------------------
;;;
;;;	Read-Time Conditionals used in this file.
;;;
;;;	#+LISPM
;;;	#+EXCL
;;;	#+SYMBOLICS
;;;	#+TI
;;; 
;;; -----------------------------------------------------------------

;;; -----------------------------------------------------------------
;;;
;;;	DEFPACKAGE - This files attempts to define a portable
;;;	implementation for DEFPACKAGE, as defined in "Common LISP, The
;;;	Language", by Guy L. Steele, Jr., Second Edition, 1990, Digital
;;;	Press.
;;;
;;;	Send comments, suggestions, and/or questions to:
;;;
;;;		Stephen L Nicoud <snicoud@boeing.com>
;;;
;;;	An early version of this file was tested in Symbolics Common
;;;	Lisp (Genera 7.2 & 8.0 on a Symbolics 3650 Lisp Machine),
;;;	Franz's Allegro Common Lisp (Release 3.1.13 on a Sun 4, SunOS
;;;	4.1), and Sun Common Lisp (Lucid Common Lisp 3.0.2 on a Sun 3,
;;;	SunOS 4.1).
;;;
;;;	91/5/23 (SLN) - Since the initial testing, modifications have
;;;	been made to reflect new understandings of what DEFPACKAGE
;;;	should do.  These new understandings are the result of
;;;	discussions appearing on the X3J13 and Common Lisp mailing
;;;	lists.  Cursory testing was done on the modified version only
;;;	in Allegro Common Lisp (Release 3.1.13 on a Sun 4, SunOS 4.1).
;;;
;;; -----------------------------------------------------------------

(lisp:in-package :DEFPACKAGE)
(export 'defpackage)

(eval-when (compile load eval)
  (unless (find-package :common-lisp)
     (rename-package :lisp :common-lisp (union '("CL" "LISP") (package-nicknames (find-package :lisp)) :test #'string=)))
   (unless (find-package :common-lisp-user)
     (rename-package :user :common-lisp-user (union '("CL-USER" "USER") (package-nicknames (find-package :user)) :test #'string=)))

   #+lispm
   (shadow (intern "DEFPACKAGE" #+symbolics :scl #+ti :ticl) 'defpackage)
   (proclaim '(declaration values arglist))
   )

(defmacro DEFPACKAGE (name &rest options)
  (declare (type (or symbol string) name)
	   (arglist defined-package-name &rest options)
	   (values package))
  "DEFPACKAGE - DEFINED-PACKAGE-NAME {OPTION}*			[Macro]

   This creates a new package, or modifies an existing one, whose name is
   DEFINED-PACKAGE-NAME.  The DEFINED-PACKAGE-NAME may be a string or a 
   symbol; if it is a symbol, only its print name matters, and not what
   package, if any, the symbol happens to be in.  The newly created or 
   modified package is returned as the value of the DEFPACKAGE form.

   Each standard OPTION is a list of keyword (the name of the option)
   and associated arguments.  No part of a DEFPACKAGE form is evaluated.
   Except for the :SIZE and :DOCUMENTATION options, more than one option 
   of the same kind may occur within the same DEFPACKAGE form.

  Valid Options:
	(:documentation		string)
	(:size			integer)
	(:nicknames		{package-name}*)
	(:shadow		{symbol-name}*)
	(:shadowing-import-from	package-name {symbol-name}*)
	(:use			{package-name}*)
	(:import-from		package-name {symbol-name}*)
	(:intern		{symbol-name}*)
	(:export		{symbol-name}*)
	(:export-from		{package-name}*)

  [Note: :EXPORT-FROM is an extension to DEFPACKAGE.
	 If a symbol is interned in the package being created and
	 if a symbol with the same print name appears as an external
	 symbol of one of the packages in the :EXPORT-FROM option,
	 then the symbol is exported from the package being created.

	 :DOCUMENTATION is an extension to DEFPACKAGE.

	 :SIZE is used only in Genera and Allegro.]"

  (sloop:sloop for (option) in options
	unless (member option '(:documentation :size :nicknames :shadow :shadowing-import-from :use :import-from :intern :export :export-from))
	  do (cerror "Proceed, ignoring this option." "~s is not a valid DEFPACKAGE option." option))
  (labels ((option-test (arg1 arg2) (when (consp arg2) (equal (car arg2) arg1)))
	   (option-values-list (option options)
	     (sloop:sloop for result first (member option options ':test #'option-test)
			      then (member option (rest result) ':test #'option-test)
		   until (null result) when result collect (rest (first result))))
	   (option-values (option options)
	     (sloop:sloop for result first (member option options ':test #'option-test)
			      then (member option (rest result) ':test #'option-test)
		   until (null result) when result append (rest (first result)))))
    (sloop:sloop for option in '(:size :documentation)
	  when (<= 2 (count option options ':key #'car))
	    do (warn "DEFPACKAGE option ~s specified more than once.  The first value \"~a\" will be used." option (first (option-values option options))))
    (setq name (string name))
    (let ((nicknames (mapcar #'string (option-values ':nicknames options)))
	  (documentation (first (option-values ':documentation options)))
	  (size (first (option-values ':size options)))
	  (shadowed-symbol-names (mapcar #'string (option-values ':shadow options)))
	  (interned-symbol-names (mapcar #'string (option-values ':intern options)))
	  (exported-symbol-names (mapcar #'string (option-values ':export options)))
	  (shadowing-imported-from-symbol-names-list (sloop:sloop for list in (option-values-list ':shadowing-import-from options)
							   collect (cons (string (first list)) (mapcar #'string (rest list)))))
	  (imported-from-symbol-names-list (sloop:sloop for list in (option-values-list ':import-from options)
						 collect (cons (string (first list)) (mapcar #'string (rest list)))))
	  (exported-from-package-names (mapcar #'string (option-values ':export-from options))))
        (flet ((find-duplicates (&rest lists)
		 (let (results)
		   (sloop:sloop for list in lists
			 for more on (cdr lists)
			 for i from 1
			 do
		     (sloop:sloop for elt in list
			   as entry = (find elt results :key #'car :test #'string=)
			   unless (member i entry)
			     do
			       (sloop:sloop for l2 in more
				     for j from (1+ i)
				     do
				 (if (member elt l2 :test #'string=)
				     (if entry
					 (nconc entry (list j))
					 (setq entry (car (push (list elt i j) results))))))))
		   results)))
	  (sloop:sloop for duplicate in (find-duplicates shadowed-symbol-names interned-symbol-names
						  (sloop:sloop for list in shadowing-imported-from-symbol-names-list append (rest list))
						  (sloop:sloop for list in imported-from-symbol-names-list append (rest list)))
		do
	    (error "The symbol ~s cannot coexist in these lists:~{ ~s~}" (first duplicate)
		   (sloop:sloop for num in (rest duplicate)
			 collect (case num (1 ':SHADOW)(2 ':INTERN)(3 ':SHADOWING-IMPORT-FROM)(4 ':IMPORT-FROM)))))
	  (sloop:sloop for duplicate in (find-duplicates exported-symbol-names interned-symbol-names)
		do
	    (error "The symbol ~s cannot coexist in these lists:~{ ~s~}" (first duplicate)
		   (sloop:sloop for num in (rest duplicate) collect (case num (1 ':EXPORT)(2 ':INTERN))))))
      `(eval-when (load eval compile)
	 (if (find-package ,name)
	     (progn (rename-package ,name ,name)
		    ,@(when nicknames `((rename-package ,name ,name ',nicknames)))
		    #+(or symbolics excl)
		    ,@(when size
			#+symbolics `((when (> ,size (pkg-max-number-of-symbols (find-package ,name)))
					(pkg-rehash (find-package ,name) ,size)))
			#+excl `((let ((tab (excl::package-internal-symbols (find-package ,name))))
				   (when (hash-table-p tab)
				     (setf (excl::ha_rehash-size tab) ,size)))))
		    ,@(when (not (null (member ':use options ':key #'car)))
			`((unuse-package (package-use-list (find-package ,name)) ,name))))
	   (make-package ,name ':use 'nil ':nicknames ',nicknames ,@(when size #+lispm `(:size ,size) #+excl `(:internal-symbols ,size))))
	 ,@(when documentation `((setf (get ',(intern name :keyword) #+excl 'excl::%package-documentation #-excl ':package-documentation) ,documentation)))
	 (let ((*package* (find-package ,name)))
	   ,@(when SHADOWed-symbol-names `((SHADOW (mapcar #'intern ',SHADOWed-symbol-names))))
	   ,@(when SHADOWING-IMPORTed-from-symbol-names-list
	       (mapcar #'(lambda (list)
			   `(SHADOWING-IMPORT (mapcar #'(lambda (symbol) (intern symbol ,(first list))) ',(rest list))))
		       SHADOWING-IMPORTed-from-symbol-names-list))
	   (USE-PACKAGE ',(or (mapcar #'string (option-values ':USE options)) "CL"))
	   ,@(when IMPORTed-from-symbol-names-list
	       (mapcar #'(lambda (list) `(IMPORT (mapcar #'(lambda (symbol) (intern symbol ,(first list))) ',(rest list))))
		       IMPORTed-from-symbol-names-list))
	   ,@(when INTERNed-symbol-names `((mapcar #'INTERN ',INTERNed-symbol-names)))
	   ,@(when EXPORTed-symbol-names `((EXPORT (mapcar #'intern ',EXPORTed-symbol-names))))
	   ,@(when EXPORTed-from-package-names
	       `((dolist (package ',EXPORTed-from-package-names)
		   (do-external-symbols (symbol (find-package package))
		     (when (nth 1 (multiple-value-list (find-symbol (string symbol))))
		       (EXPORT (list (intern (string symbol)))))))))
	   )
	 (find-package ,name)))))

#+excl
(excl::defadvice cl:documentation (look-for-package-type :around)
    (let ((symbol (first excl::arglist))
	   (type (second excl::arglist)))
       (if (or (eq ':package (intern (string type) :keyword))
	       (eq ':defpackage (intern (string type) :keyword)))
	   (or (get symbol 'excl::%package-documentation)
	       (get (intern (string symbol) :keyword) 'excl::%package-documentation))
	 (values :do-it))))

#+symbolics
(scl::advise cl:documentation :around look-for-package-type nil
   (let ((symbol (first scl::arglist))
	 (type (second scl::arglist)))
     (if (or (eq ':package (intern (string type) :keyword))
	     (eq ':defpackage (intern (string type) :keyword)))
	 (or (get symbol ':package-documentation)
	     (get (intern (string symbol) :keyword) ':package-documentation))
       (values :do-it))))

(provide :defpackage)
(pushnew :defpackage *features*)

;;;; ------------------------------------------------------------
;;;;	End of File
;;;; ------------------------------------------------------------


--------------1E4073BD58CFCDFA1B037EEF--


From owner-gcl  Mon Sep  9 04:53:48 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id EAA27402; Mon, 9 Sep 1996 04:50:30 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id EAA27396; Mon, 9 Sep 1996 04:50:25 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id KAA22885; Mon, 9 Sep 1996 10:50:11 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 9 Sep 96 10:49:50 BST
Date: Mon, 9 Sep 96 10:49:46 BST
Message-Id: <13623.9609090949@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: Touretzky's SDRAW in gcl?
To: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>, gcl@cli.com
In-Reply-To: Joseph O'Rourke's message of Sun, 8 Sep 1996 20:08:14 -0400 (EDT)
Sender: owner-gcl
Precedence: bulk
content-length: 860

> Can anyone tell me how to get Touretzky's software that he distributes
> with his "Common Lisp" book to work under gcl?  I ftp'ed from cmu
> the sdraw.generic file, but I get this upon loading it: 
> ----------------------------------------------------------------
> GCL (GNU Common Lisp)  Version(2.2) Wed Aug 21 16:58:21 EDT 1996
> Licensed under GNU Public Library License
> Contains Enhancements by W. Schelter
> 
> >(load "sdraw.generic")
> Loading sdraw.generic
> 
> Error: The function DEFPACKAGE is undefined.
> [etc.]

(1) I have an older version of the software which doesn't use
defpackage.

(2) Try adding defpackage to GCL.  I have a version from CMU CL 
that I use.

For both, see: http://www.aiai.ed.ac.uk/~jeff/lisp/tools/

-- jd

Jeff Dalton,
AI Applications Institute,                               J.Dalton@ed.ac.uk
Edinburgh University.


From owner-gcl  Mon Sep  9 07:46:19 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id HAA27814; Mon, 9 Sep 1996 07:41:24 -0500
Received: from grendel.csc.smith.edu by cli.com (SMI-8.6/SMI-SVR4)
	id HAA27808; Mon, 9 Sep 1996 07:41:21 -0500
Received: from localhost (orourke@localhost) by grendel.csc.smith.edu (8.6.5/8.6.5) id IAA26046 for gcl@cli.com; Mon, 9 Sep 1996 08:47:37 -0400
From: orourke@cs.smith.edu (Joseph O'Rourke)
Message-Id: <199609091247.IAA26046@grendel.csc.smith.edu>
Subject: SDRAW in gcl: Thanks!
To: gcl@cli.com
Date: Mon, 9 Sep 1996 08:47:28 -0400 (EDT)
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 61

Thanks to everyone who replied -- I have it working now! :-j

From owner-gcl  Tue Sep 10 10:55:48 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA17235; Tue, 10 Sep 1996 09:26:25 -0500
Received: from VNET.IBM.COM by cli.com (SMI-8.6/SMI-SVR4)
	id JAA17229; Tue, 10 Sep 1996 09:26:21 -0500
Received: from HAIFA by VNET.IBM.COM (IBM VM SMTP V2R3) with BSMTP id 2276;
   Tue, 10 Sep 96 10:26:16 EDT
Received: by HAIFA (XAGENTA 3.0) id 4299; Tue, 10 Sep 1996 17:26:14 +0200 
Received: from rs250-29.haifa.ibm.com by mail.haifa.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA15977; Tue, 10 Sep 1996 17:27:30 +0300
Received: by rs250-29 (AIX 3.2/UCB 5.64) id AA27612; Tue, 10 Sep 1996 17:27:29 +0300
Message-Id: <9609101427.AA27612@rs250-29>
Subject: finalization in gcl 2.2?
To: gcl@cli.com
Date: Tue, 10 Sep 1996 17:27:29 +0300 (IDT)
From: <leonid@VNET.IBM.COM> (Leonid Gluhovsky)
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 715


Hello,

I am trying to hook together some CL and C code, in one address space,
so that some of the Lisp objects will be "handles" for the C objects.
When the garbage collector determines that a certain "handle" is no
longer accessible from Lisp, I would very much like to arrange that
a C routine is called to perform cleanup/finalization.

So is there a possibility to perform such finalization in GCL 2.2?
Or alternatively something like weak pointers.  I looked at the sources
of the garbage collector and it looks like there is no vanilla
finalization.  If this is indeed the case, could some kind soul give
me some hints how I can implement it.

I will be very grateful for any response.

Thank you,

Leonid


From owner-gcl  Tue Sep 10 21:43:55 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA21984; Tue, 10 Sep 1996 21:09:38 -0500
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id VAA21978; Tue, 10 Sep 1996 21:09:28 -0500
Received: from cherryflower (localhost [127.0.0.1]) by cherryflower.or.us (8.6.12/8.6.9) with SMTP id TAA00245; Tue, 10 Sep 1996 19:08:52 -0700
Message-ID: <32361F33.2D5177F6@teleport.com>
Date: Tue, 10 Sep 1996 19:08:51 -0700
From: "Karl M. Hegbloom" <karlheg@teleport.com>
Organization: CherryFlower Computing Ltd.
X-Mailer: Mozilla 3.0 (X11; I; Linux 2.0.12 i486)
MIME-Version: 1.0
To: " (Leonid Gluhovsky)" <leonid@VNET.IBM.COM>, gcl@cli.com
Subject: [Fwd: ILOG Talk - free Lisp for C++]
Content-Type: multipart/mixed; boundary="------------719EA5131C580644450B7C24"
Sender: owner-gcl
Precedence: bulk
content-length: 3368

This is a multi-part message in MIME format.

--------------719EA5131C580644450B7C24
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Have you seen this?  If you're using Linux, it may be your solution... 
I've not used it yet, but from reading the white paper, I'd say its a
great setup.

There is also an Embeddable Common Lisp (ECoLisp -- see the LISP FAQ
under free implementations) that can call C functions.  I believe that
it will compile on many platforms; though the Linux ELF port is not
compiling due to an undefined symbol in the allocation and garbage
collection code.

-- 
Karl M. Hegbloom <karlheg@teleport.com>
http://www.teleport.com/~karlheg
(K0D) AYG-GE01  Portland, OR, USA
Proudly running Linux 2.0.12 and GNU public software!

--------------719EA5131C580644450B7C24
Content-Type: message/rfc822
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

Path: nntp.teleport.com!newsfeed.direct.ca!op.net!news.mathworks.com!hunter.premier.net!uunet!in2.uu.net!liw.clinet.fi!usenet
From: Pierre Parquier <parquier@ilog.fr>
Newsgroups: comp.os.linux.announce
Subject: ILOG Talk - free Lisp for C++
Followup-To: comp.os.linux.development.apps
Date: Fri, 06 Sep 1996 13:22:58 GMT
Organization: ?
Approved: linux-announce@news.ornl.gov (Lars Wirzenius)
Message-ID: <cola-liw-842016178-654-0@liw.clinet.fi>
NNTP-Posting-Host: localhost

-----BEGIN PGP SIGNED MESSAGE-----


Hi,

A new Lisp "ILOG Talk" is available for Linux on sunsite.

- - commercial Lisp (since 1994 on Unixes and Windows) for free on Linux 
- - automatically binds to C++ libraries, ideal for rapid prototyping
- - modular Lisp producing standalone executables and shared libraries
- - development environment based on Emacs
- - close to ISLISP (the Lisp standardized by ISO in 1996)
- - compiles to C

We hope you'll enjoy your C++ libs, now!

Bruno Haible
Pierre Parquier
<talk@ilog.fr>



Begin3
Title:          ILOG Talk 3.2 for Linux
Version:        3.2
Entered-date:   1996-07-25
Description:    Development environment for ILOG Talk, a Lisp-like language.
                Emacs-based environment, interpreter, compiler, debugger,
                foreign function interface, C++ binding generator.
                Used for rapid prototyping, especially with C++ libraries.
Keywords:       Lisp, C++, development.
Author:         ILOG S.A. <talk@ilog.fr>
Maintained-by:  
Primary-site:   ftp.ilog.fr /pub/Products/Talk/linux
                3.6 MB ilog-talk-3.2.tar.gz
Alternate-site: sunsite.unc.edu /pub/Linux/Incoming
                3.6 MB ilog-talk-3.2.tar.gz
Original-site:  
Platforms:      x86 PC running Linux 1.2 or newer with ELF gcc/g++/ld.
Copying-policy: Freely redistributable, but copyrighted.
End


-----BEGIN PGP SIGNATURE-----
Version: 2.6.2i

iQCVAwUBMjAlk4QRll5MupLRAQGTFQQAsj0qg5AimHP18is9dtkdjmPTIrPmY/EZ
7EKEMXkZTVyS7YfIYWLBgj4RwSlOz1P1MUyy4Fv76QQaXRxsz6Li3MzyGpG7Ob4i
NECoICmV+zqCC8N1yKJiHKvkeIRa4FrZh2IDl/LwUK1Numho8Zd0EDoC9iOuYJNa
Y3gI6D/i/io=
=bs/E
-----END PGP SIGNATURE-----

-- 
This article has been digitally signed by the moderator, using PGP.
Finger wirzeniu@kruuna.helsinki.fi for PGP key needed for validating signature.
Send submissions for comp.os.linux.announce to: linux-announce@news.ornl.gov
PLEASE remember a short description of the software and the LOCATION.

--------------719EA5131C580644450B7C24--


From owner-gcl  Wed Sep 11 06:16:16 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id FAA10067; Wed, 11 Sep 1996 05:46:56 -0500
Received: from amber.ccs.neu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id FAA10061; Wed, 11 Sep 1996 05:46:54 -0500
Received: from denali.ccs.neu.edu (gene@denali.ccs.neu.edu [129.10.113.75])
	by amber.ccs.neu.edu (8.7.5/8.7.3) with ESMTP id GAA04259; Wed, 11 Sep 1996 06:46:37 -0400 (EDT)
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by denali.ccs.neu.edu (8.7.5/8.6.4) id GAA15133; Wed, 11 Sep 1996 06:46:36 -0400 (EDT)
Date: Wed, 11 Sep 1996 06:46:36 -0400 (EDT)
Message-Id: <199609111046.GAA15133@denali.ccs.neu.edu>
To: gcl@cli.com, leonid@VNET.IBM.COM
Subject: Re:  finalization in gcl 2.2?
Sender: owner-gcl
Precedence: bulk
content-length: 430

You might want use the GCL-specific :static keyword to make-array.
Such an array will not be relocated by the garbage collector.  So, you
can allocate the space, using (make-array ... :static t), and have
your C program use a pointer to that area, without worrying about
garbage collection.  See "(help 'make-array)" :

     The keyword
     STATIC (GCL specific) if non nil, will cause the array body to be
     non relocatable.

From owner-gcl  Wed Sep 11 09:59:09 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA11513; Wed, 11 Sep 1996 09:52:51 -0500
Received: from neurocog.lrdc.pitt.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA11507; Wed, 11 Sep 1996 09:52:48 -0500
Received: by neurocog.lrdc.pitt.edu
	(1.37.109.10G/16.2) id AA250713549; Wed, 11 Sep 1996 10:52:29 -0400
Date: Wed, 11 Sep 1996 10:52:29 -0400 (EDT)
From: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
To: "Karl M. Hegbloom" <karlheg@teleport.com>
Cc: " (Leonid Gluhovsky)" <leonid@VNET.IBM.COM>, gcl@cli.com
Subject: Re: [Fwd: ILOG Talk - free Lisp for C++]
In-Reply-To: <32361F33.2D5177F6@teleport.com>
Message-Id: <Pine.HPP.3.91.960911104901.24924A-100000@neurocog.lrdc.pitt.edu>
Mime-Version: 1.0
Content-Type: MULTIPART/MIXED; BOUNDARY=------------719EA5131C580644450B7C24
Content-Id: <Pine.HPP.3.91.960911104901.24924B@neurocog.lrdc.pitt.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 722

  This message is in MIME format.  The first part should be readable text,
  while the remaining parts are likely unreadable without MIME-aware tools.
  Send mail to mime@docserver.cac.washington.edu for more info.

--------------719EA5131C580644450B7C24
Content-Type: TEXT/PLAIN; CHARSET=us-ascii
Content-ID: <Pine.HPP.3.91.960911104901.24924C@neurocog.lrdc.pitt.edu>

Unfortunately, ILogTalk isn't free.  Academic price is ~$280/yr,
non-academic is something like $4000.  However, it is runtime-free, so
you can distribute your code without the target having to buy a
run-time (I haven't any idea how this could work for arbitrary target
machines, but that's the claim.)

'Jeff

--------------719EA5131C580644450B7C24--

From owner-gcl  Fri Sep 13 16:52:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA17948; Fri, 13 Sep 1996 16:18:59 -0500
Received: from mailserver.di.unipi.it by cli.com (SMI-8.6/SMI-SVR4)
	id QAA17942; Fri, 13 Sep 1996 16:18:47 -0500
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.7.5/8.7.3) with ESMTP id XAA04853; Fri, 13 Sep 1996 23:13:41 +0200 (MET DST)
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id XAA15808; Fri, 13 Sep 1996 23:13:40 +0200
Date: Fri, 13 Sep 1996 23:13:40 +0200
Message-Id: <199609132113.XAA15808@omega.di.unipi.it>
To: karlheg@teleport.com
cc: gcl@cli.com
Subject: ECL for Linux ELF
Sender: owner-gcl
Precedence: bulk
content-length: 217


ECL version 0.25 which compiles under Linux ELF is available in the usual
places:

 - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp
 - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl

-- Beppe

From owner-gcl  Sat Sep 14 00:12:05 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA21416; Sat, 14 Sep 1996 00:10:01 -0500
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id AAA21394; Sat, 14 Sep 1996 00:09:52 -0500
Received: (from karlheg@localhost) by cherryflower.or.us (8.6.12/8.6.9) id WAA15728; Fri, 13 Sep 1996 22:10:40 -0700
Date: Fri, 13 Sep 1996 22:10:40 -0700
Message-Id: <199609140510.WAA15728@cherryflower.or.us>
From: "Karl M. Hegbloom" <karlheg@cherryflower.or.us>
To: gcl@cli.com
Subject: ECL for Linux ELF
In-Reply-To: <199609132113.XAA15808@omega.di.unipi.it>
References: <199609132113.XAA15808@omega.di.unipi.it>
Comments: Hyperbole mail buttons accepted, v04.01.
Sender: owner-gcl
Precedence: bulk
content-length: 976

>>>>> "Giuseppe" == Giuseppe Attardi <attardi@DI.Unipi.IT> writes:

    Giuseppe> ECL version 0.25 which compiles under Linux ELF is
    Giuseppe> available in the usual places:

    Giuseppe>  - ftp.di.unipi.it [131.114.4.36], directory
    Giuseppe> /pub/lang/lisp - ftp.icsi.berkeley.edu [128.32.201.7],
    Giuseppe> directory /pub/ai/ecl

    Giuseppe> -- Beppe

Eureka!  Everything compiles except for the Tk part...

tclBasic.c, Line 560: "define" is not defined....  I'm going to poke
around and see if I can fix it tonight.
--------------------
#ifdef CLOS
  TkWidgetType = define a class with name: intern("WIDGET", tk_package);
#else
--------------------

 This looks like a great LISP to me!  It's got step and trace, :help,
and Tk on the way. :)

--
Karl M. Hegbloom <karlheg@teleport.com>
http://www.teleport.com/~karlheg
(K0D) AYG-GE01  Portland, OR, USA
:) Proudly running Linux 2.0.12 and GNU public software!
Cron gets my mail 0-23/3 while the 'puter is on.

From owner-gcl  Sat Sep 14 13:09:49 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA09120; Sat, 14 Sep 1996 13:02:00 -0500
Received: from smtp-gw01.ny.us.ibm.net by cli.com (SMI-8.6/SMI-SVR4)
	id NAA09114; Sat, 14 Sep 1996 13:01:58 -0500
Received: (from uucp@localhost) by smtp-gw01.ny.us.ibm.net (8.6.9/8.6.9) id SAA238707 for <gcl@cli.com>; Sat, 14 Sep 1996 18:01:56 GMT
Received: from slip139-92-41-50.ut.nl.ibm.net(139.92.41.50) by smtp-gw01.ny.us.ibm.net via smap (V1.3mjr)
	id smaKWwDFW; Sat Sep 14 18:01:49 1996
Message-ID: <323B0044.480461BC@ibm.net>
Date: Sat, 14 Sep 1996 19:58:12 +0100
From: Mertens Marc <mmerten@ibm.net>
X-Mailer: Mozilla 3.0Gold (X11; I; Linux 1.2.13 i586)
MIME-Version: 1.0
To: gcl@cli.com
Subject: GCL 2.2 and tcl7.5 , tk4.1
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 506

I have just installed Slackware 3.1 (Linux kernel 2.0) which uses 
tcl7.5 and tk4.1 . During the make of GCL I get error's when the system
is making the GCL-TK part (things like missing definitions in tcl.h ,
missing functions ...). I think this is due to the fact that another
version of tcl/tk was used in GCL-2.2. 

    My question is , has anyone compiled th GCL-TK piece with tcl7.5 and
tk4.1 and if not which is the correct version of tcl,tk.


Thanks a lot in advance.

Marc Merten

mmerten@ibm.net

From owner-gcl  Sat Sep 14 16:57:15 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA10233; Sat, 14 Sep 1996 16:48:11 -0500
Received: from wintermute.hip.cam.org by cli.com (SMI-8.6/SMI-SVR4)
	id QAA10227; Sat, 14 Sep 1996 16:48:05 -0500
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id RAA01954; Sat, 14 Sep 1996 17:48:41 -0400
Date: Sat, 14 Sep 1996 17:48:41 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199609142148.RAA01954@wintermute.hip.cam.org>
To: Mertens Marc <mmerten@ibm.net>
Cc: gcl@cli.com
Subject: Re: GCL 2.2 and tcl7.5 , tk4.1
In-Reply-To: <323B0044.480461BC@ibm.net>
References: <323B0044.480461BC@ibm.net>
Reply-To: vbykov@cam.org
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl
Precedence: bulk
content-length: 1981

Mertens Marc writes:
 > I have just installed Slackware 3.1 (Linux kernel 2.0) which uses 
 > tcl7.5 and tk4.1 . During the make of GCL I get error's when the system
 > is making the GCL-TK part (things like missing definitions in tcl.h ,
 > missing functions ...). I think this is due to the fact that another
 > version of tcl/tk was used in GCL-2.2. 

From: faried nawaz <fn@LISP-READER.csrv.uidaho.edu>
Sender: owner-gcl@cli.com
To: gcl@cli.com
Subject: tk4.1 patch.
Date: Sun, 14 Jul 1996 12:07:26 -0700


gcl-tk/tkAppInit.c and gcl-tk/tkMain.c both need one-line fixes to work with
tk4.1:


*** gcl-tk/tkAppInit.c~	Sun Jul 14 01:40:58 1996
--- gcl-tk/tkAppInit.c	Sun Jul 14 01:42:33 1996
***************
*** 104,109 ****
       * then no user-specific startup file will be run under any conditions.
       */
  
!     tcl_RcFileName = "~/.wishrc";
      return TCL_OK;
  }
--- 104,109 ----
       * then no user-specific startup file will be run under any conditions.
       */
  
!     Tcl_SetVar(interp, "tcl_rcFileName", "~/.wishrc", TCL_GLOBAL_ONLY);
      return TCL_OK;
  }

*** gcl-tk/tkMain.c~	Sun Jul 14 01:42:45 1996
--- gcl-tk/tkMain.c	Sun Jul 14 01:42:54 1996
***************
*** 219,225 ****
       * Initialize the Tk application.
       */
  
!     mainWindow = Tk_CreateMainWindow(interp, display, name, "Tk"); 
      if (mainWindow == NULL) {
  	fprintf(stderr, "%s\n", interp->result);
  	exit(1);
--- 219,225 ----
       * Initialize the Tk application.
       */
  
!     mainWindow = TkCreateMainWindow(interp, display, name, "Tk"); 
      if (mainWindow == NULL) {
  	fprintf(stderr, "%s\n", interp->result);
  	exit(1);



faried.
--
faried nawaz               WAR IS PEACE FREEDOM IS SLAVERY BACKSPACE IS DELETE
box 3582, moscow, id 83843-1914, usa         linux, the ms-dos of the nineties
PIGLET loves you       if at first you don't succeed, skydiving is not for you
just a system janitor.                              People's Front Against WWW



From owner-gcl  Sun Sep 15 09:38:08 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA15367; Sun, 15 Sep 1996 09:28:41 -0500
Received: from grendel.csc.smith.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA15361; Sun, 15 Sep 1996 09:28:38 -0500
Received: from localhost (orourke@localhost) by grendel.csc.smith.edu (8.6.5/8.6.5) id KAA18246; Sun, 15 Sep 1996 10:34:58 -0400
From: orourke@cs.smith.edu (Joseph O'Rourke)
Message-Id: <199609151434.KAA18246@grendel.csc.smith.edu>
Subject: How to control (ED ...) in gcl?
To: gcl@cli.com
Date: Sun, 15 Sep 1996 10:34:57 -0400 (EDT)
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 172

Can anyone tell me how to control which editor (ED "filename")
invokes?  Right now I get vi, even when I setenv EDITOR to 
something else.  Thanks for any suggestions! :-j

From owner-gcl  Sun Sep 15 19:36:35 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA18171; Sun, 15 Sep 1996 19:27:54 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id TAA18165; Sun, 15 Sep 1996 19:27:47 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id BAA10619; Mon, 16 Sep 1996 01:27:28 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 16 Sep 96 01:26:59 BST
Date: Mon, 16 Sep 96 01:26:57 BST
Message-Id: <22077.9609160026@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: How to control (ED ...) in gcl?
To: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>, gcl@cli.com
In-Reply-To: Joseph O'Rourke's message of Sun, 15 Sep 1996 10:34:57 -0400 (EDT)
Sender: owner-gcl
Precedence: bulk
content-length: 236

> Can anyone tell me how to control which editor (ED "filename")
> invokes?  Right now I get vi, even when I setenv EDITOR to 
> something else.  Thanks for any suggestions! :-j

I don't know, but you might try setenv VISUAL.

-- jeff


From owner-gcl  Mon Sep 16 05:01:39 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id EAA21576; Mon, 16 Sep 1996 04:58:14 -0500
Received: from linux1.ce.ntu.edu.tw by cli.com (SMI-8.6/SMI-SVR4)
	id EAA21568; Mon, 16 Sep 1996 04:58:08 -0500
Received: (from d791013@localhost) by linux1.ce.ntu.edu.tw (8.7.5/8.6.9) id QAA05067; Mon, 16 Sep 1996 16:56:36 +0800
Date: Mon, 16 Sep 1996 16:56:36 +0800
From: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
Message-Id: <199609160856.QAA05067@linux1.ce.ntu.edu.tw>
To: gcl@cli.com
Subject: How to get around this ...
Sender: owner-gcl
Precedence: bulk
content-length: 275

Hello,

I'm using gcl 2.2. I have the following question about precesion.

>0.1
0.10000000000000001

>0.1d0
0.10000000000000001

>0.1d1
1.0

>0.1d-1
0.010000000000000002

>

But I really want is:

>0.1
0.1

and so on. Any way to work around this?

Very thanks!

Chun-Yu Lee


From owner-gcl  Mon Sep 16 06:05:24 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id GAA21920; Mon, 16 Sep 1996 06:03:17 -0500
Received: from grendel.csc.smith.edu by cli.com (SMI-8.6/SMI-SVR4)
	id GAA21914; Mon, 16 Sep 1996 06:03:15 -0500
Received: from localhost (orourke@localhost) by grendel.csc.smith.edu (8.6.5/8.6.5) id HAA29458; Mon, 16 Sep 1996 07:09:35 -0400
From: orourke@cs.smith.edu (Joseph O'Rourke)
Message-Id: <199609161109.HAA29458@grendel.csc.smith.edu>
Subject: (ED ...) and setenv VISUAL
To: gcl@cli.com
Date: Mon, 16 Sep 1996 07:09:35 -0400 (EDT)
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 419

Thanks for all the mail I'm getting on this.  Several suggested
that the environment variable VISUAL is the key.  But I still can't
make it happen.  When I do this:

	% setenv EDITOR emacs
	% setenv VISUAL emacs
	% gcl
	> (ed "test.lisp")

it stil puts me into vi.  Perhaps my local shell envirnoment is not
relevant here?
	I am trying to make this easy for students who don't know vi--
that's my motivation.
						:-j

From owner-gcl  Mon Sep 16 07:40:02 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id HAA22370; Mon, 16 Sep 1996 07:37:24 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id HAA22364; Mon, 16 Sep 1996 07:37:21 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id NAA02282; Mon, 16 Sep 1996 13:36:26 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 16 Sep 96 13:35:57 BST
Date: Mon, 16 Sep 96 13:35:51 BST
Message-Id: <27809.9609161235@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: (ED ...) and setenv VISUAL
To: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>, gcl@cli.com
In-Reply-To: Joseph O'Rourke's message of Mon, 16 Sep 1996 07:09:35 -0400 (EDT)
Sender: owner-gcl
Precedence: bulk
content-length: 562

> Thanks for all the mail I'm getting on this.  Several suggested
> that the environment variable VISUAL is the key.  But I still can't
> make it happen.  When I do this:
> 
> 	% setenv EDITOR emacs
> 	% setenv VISUAL emacs
> 	% gcl
> 	> (ed "test.lisp")
> 
> it stil puts me into vi.  Perhaps my local shell envirnoment is not
> relevant here?

How about this: look at the source.  And you will find (in GCl 1.1)
lsp/autoload.lsp:

#+unix
(defun ed (&optional filename)
  (system (format nil "vi ~A" filename)))

So you need to redefine that function.

-- jeff

From owner-gcl  Mon Sep 16 07:42:16 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id HAA22394; Mon, 16 Sep 1996 07:40:33 -0500
Received: from nova.sarnoff.com by cli.com (SMI-8.6/SMI-SVR4)
	id HAA22386; Mon, 16 Sep 1996 07:40:31 -0500
Received: from sgate.sarnoff.com (sgate.sarnoff.com [130.33.15.244]) by nova.sarnoff.com (8.6.12/8.6.12) with ESMTP id IAA11234 for <gcl@cli.com>; Mon, 16 Sep 1996 08:46:52 -0400
Received: from morse.section05 ([130.33.10.158]) by sgate.sarnoff.com
          (Netscape Mail Server v1.1) with SMTP id AAA9399;
          Mon, 16 Sep 1996 08:53:30 -0400
Received: by morse.section05 (SMI-8.6/SMI-SVR4)
	id IAA26791; Mon, 16 Sep 1996 08:40:28 -0400
Date: Mon, 16 Sep 1996 08:40:28 -0400 (EDT)
From: Maya Gokhale <maya@sarnoff.com>
X-Sender: maya@morse
To: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>
cc: gcl@cli.com
Subject: Re: (ED ...) and setenv VISUAL
In-Reply-To: <199609161109.HAA29458@grendel.csc.smith.edu>
Message-ID: <Pine.SOL.3.91.960916083155.26431B-100000@morse>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 864

>When I do this:
>
>        % setenv EDITOR emacs
>        % setenv VISUAL emacs
>        % gcl
>        > (ed "test.lisp")
>
>it stil puts me into vi.  Perhaps my local shell envirnoment is not
>relevant here?

In the 1.1 version of gcl that I am still running, the "vi" is hard coded in:

in autoload.lsp in the "lsp" subdirectory,

#+unix
(defun ed (&optional filename)
  (system (format nil "vi ~A" filename)))

You can define your own function to use the VISUAL environment variable 
as follows:

>(defun my-edit ()
(system (si::getenv "VISUAL"))
)


Maya


----------------------------------------------------------
Maya B. Gokhale             David Sarnoff Research Center
maya@sarnoff.com            CN5300
                            Princeton, NJ 08543
                            609-734-3119
----------------------------------------------------------


From owner-gcl  Mon Sep 16 09:05:18 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA22993; Mon, 16 Sep 1996 09:02:21 -0500
Received: from neurocog.lrdc.pitt.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA22985; Mon, 16 Sep 1996 09:02:18 -0500
Received: by neurocog.lrdc.pitt.edu
	(1.37.109.10G/16.2) id AA061492530; Mon, 16 Sep 1996 10:02:10 -0400
Date: Mon, 16 Sep 1996 10:02:10 -0400 (EDT)
From: Jeff Shrager <shrager@neurocog.lrdc.pitt.edu>
To: "Joseph O'Rourke" <orourke@grendel.csc.smith.edu>
Cc: gcl@cli.com
Subject: Re: (ED ...) and setenv VISUAL
In-Reply-To: <199609161109.HAA29458@grendel.csc.smith.edu>
Message-Id: <Pine.HPP.3.91.960916100047.6096A-100000@neurocog.lrdc.pitt.edu>
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 159

This is hardcoded:

>From gcl-2.2/lsp/autoload.lsp:

#+unix
(defun ed (&optional filename)
  (system (format nil "vi ~A" filename)))

Just redefine it!

'Jeff

From owner-gcl  Mon Sep 16 09:29:42 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA23173; Mon, 16 Sep 1996 09:27:52 -0500
Received: from piglet.splode.com by cli.com (SMI-8.6/SMI-SVR4)
	id JAA23167; Mon, 16 Sep 1996 09:27:49 -0500
Received: (from friedman@localhost) by piglet.splode.com (8.7.5/8.7.3) id JAA28410; Mon, 16 Sep 1996 09:27:08 -0500
Date: Mon, 16 Sep 1996 09:27:08 -0500
Message-Id: <199609161427.JAA28410@piglet.splode.com>
From: friedman@cli.com (Noah Friedman)
To: orourke@grendel.csc.smith.edu
Cc: gcl@cli.com
Subject: (ED ...) and setenv VISUAL
Reply-To: friedman@cli.com
In-Reply-To: <orourke@cs.smith.edu> Mon, 16 Sep 1996 07:09:35 -0400
References: <199609161109.HAA29458@grendel.csc.smith.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 872

>Thanks for all the mail I'm getting on this.  Several suggested
>that the environment variable VISUAL is the key.  But I still can't
>make it happen.  When I do this:
>
>	% setenv EDITOR emacs
>	% setenv VISUAL emacs
>	% gcl
>	> (ed "test.lisp")
>
>it stil puts me into vi.  Perhaps my local shell envirnoment is not
>relevant here?
>	I am trying to make this easy for students who don't know vi--
>that's my motivation.

I don't think twiddling the environment is going to help you; look at the
function definition:

    >(symbol-function 'ed)
    (LAMBDA-BLOCK ED (&OPTIONAL LISP::FILENAME)
      (SYSTEM (FORMAT NIL "vi ~A" LISP::FILENAME)))

    >

Try using this definition instead.

(defun edit (&optional file-name)
  (let ((editor (or (si:getenv "EDITOR") "vi")))
    (if file-name
        (system (format nil "~A ~A" editor file-name))
      (system editor))))


From owner-gcl  Mon Sep 16 11:49:42 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA24117; Mon, 16 Sep 1996 11:46:07 -0500
Received: from oaklands.demon.co.uk by cli.com (SMI-8.6/SMI-SVR4)
	id LAA24105; Mon, 16 Sep 1996 11:45:43 -0500
Received: (from horrocks@localhost) by oaklands.demon.co.uk (8.6.9/8.6.9) id RAA10582; Mon, 16 Sep 1996 17:54:09 +0100
Date: Mon, 16 Sep 1996 17:54:08 +0200
From: Ian Horrocks <horrocks@cs.man.ac.uk>
Reply-To: Ian Horrocks <horrocks@cs.man.ac.uk>
Subject: Profiling
To: gcl@cli.com
Message-ID: <Pine.3.89.9609161056.B10270-0100000@oaklands.demon.co.uk>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; CHARSET=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 1219

Sorry to be a nuisance but can anyone help me with the GCL profiler - 
does it work and if so how?

I have tried:

>(si::set-up-profile)
Loading /usr/local/lib/gcl-2.2/lsp/profile.lsp
Finished loading /usr/local/lib/gcl-2.2/lsp/profile.lsp

"making new array" 
Loaded c and other function addresses
Using profile-array length 100000 
Use (si::prof 0 90) to start and (prof 0 0) to stop:
This starts monitoring at address 0 
thru byte (256/90)*(length *profile-array*)
(si::display-prof) displays the results
NIL

>(si::prof 0 90)
0

>(dotimes (i 10000) (member 'c '(a b c d e)))
NIL

>(si::prof 0 0)
0

>(si::display-prof)

Total ticks 00

No mater what code I run this is all the output I ever get.


===============================================================================
Ian Horrocks, Medical Informatics Group, Department of Computer Science,
University of Manchester, Manchester M13 9PL, United Kingdom.
-------------------------------------------------------------------------------
Tel: (+44 161) 275 6239  Fax: (+44 161) 275 6932  E-Mail: horrocks@cs.man.ac.uk
WWW: http://www.cs.man.ac.uk/mig/people/horrocks/index.html
===============================================================================



From owner-gcl  Mon Sep 16 12:14:51 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA24362; Mon, 16 Sep 1996 12:12:39 -0500
Received: from grendel.csc.smith.edu by cli.com (SMI-8.6/SMI-SVR4)
	id MAA24354; Mon, 16 Sep 1996 12:12:36 -0500
Received: from localhost (orourke@localhost) by grendel.csc.smith.edu (8.6.5/8.6.5) id NAA05595 for gcl@cli.com; Mon, 16 Sep 1996 13:18:57 -0400
From: orourke@cs.smith.edu (Joseph O'Rourke)
Message-Id: <199609161718.NAA05595@grendel.csc.smith.edu>
Subject: Thanks on ED & where do I put it?
To: gcl@cli.com
Date: Mon, 16 Sep 1996 13:18:57 -0400 (EDT)
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 529

I thank the many people who have pointed out that ED is hard-
wired to vi, and who showed me how to mimic the definition of
ED to depend on the EDITOR or VISUAL environment variables.
This is exactly what I need, and solves my problem.
	Hopefully my last stupid question:  is there somewhere
where I can place a function definition so that it is automatically
loaded upon first launch of gcl?  Is there a .gclrc or its
equivalent?  I would like to make this transparent to the naive
users.
	Thanks again for everyone's help!	:-j

From owner-gcl  Mon Sep 16 14:26:09 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA25172; Mon, 16 Sep 1996 14:20:43 -0500
Received: from sgi.sgi.com by cli.com (SMI-8.6/SMI-SVR4)
	id OAA25165; Mon, 16 Sep 1996 14:20:25 -0500
Received: from cthulhu.engr.sgi.com (cthulhu.engr.sgi.com [192.26.80.2]) by sgi.sgi.com (950413.SGI.8.6.12/950213.SGI.AUTOCF) via ESMTP id LAA25060; Mon, 16 Sep 1996 11:48:39 -0700
Received: from rendezvous.engr.sgi.com (rendezvous.engr.sgi.com [192.26.52.48]) by cthulhu.engr.sgi.com (950413.SGI.8.6.12/960327.SGI.AUTOCF) via ESMTP id LAB16805; Mon, 16 Sep 1996 11:48:38 -0700
Received: (from tkunze@localhost) by rendezvous.engr.sgi.com (950413.SGI.8.6.12/960327.SGI.AUTOCF) id LAA11906; Mon, 16 Sep 1996 11:48:37 -0700
From: "Tobias Kunze" <tkunze@rendezvous.engr.sgi.com>
Message-Id: <9609161148.ZM11904@rendezvous.engr.sgi.com>
Date: Mon, 16 Sep 1996 11:48:36 -0700
In-Reply-To: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
        "How to get around this ..." (Sep 16,  4:56pm)
References: <199609160856.QAA05067@linux1.ce.ntu.edu.tw>
Reply-To: t@ulysses.stanford.edu
X-Mailer: Z-Mail (3.2.3 08feb96 MediaMail)
To: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>, gcl@cli.com
Subject: Re: How to get around this ...
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-gcl
Precedence: bulk
content-length: 784


That's a FAQ.  Floating point precision is limited and it just
happens to be the case that you can't represent .1 in IEEE or
whatever you use.  try .2 or other floats and you get an idea
what's clean and what not.  use rationals if you need perfect
precision, not floats.  if all you want is "nice" output, format
it using ~7,3f or so.

-Tobias




On Sep 16,  4:56pm, Chun-Yu Lee wrote:
> Subject: How to get around this ...
> Hello,
>
> I'm using gcl 2.2. I have the following question about precesion.
>
> >0.1
> 0.10000000000000001
>
> >0.1d0
> 0.10000000000000001
>
> >0.1d1
> 1.0
>
> >0.1d-1
> 0.010000000000000002
>
> >
>
> But I really want is:
>
> >0.1
> 0.1
>
> and so on. Any way to work around this?
>
> Very thanks!
>
> Chun-Yu Lee
>-- End of excerpt from Chun-Yu Lee



From owner-gcl  Mon Sep 16 15:33:34 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA25690; Mon, 16 Sep 1996 15:26:24 -0500
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id PAA25684; Mon, 16 Sep 1996 15:26:21 -0500
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id NAA02914; Mon, 16 Sep 1996 13:26:37 -0700
Date: Mon, 16 Sep 1996 13:26:37 -0700
From: David Chapman <zvona@zoom.com>
Message-Id: <199609162026.NAA02914@aurora.romoidoy.com>
To: orourke@grendel.csc.smith.edu
CC: gcl@cli.com
In-reply-to: <199609161718.NAA05595@grendel.csc.smith.edu> (orourke@grendel.csc.smith.edu)
Subject: Re: doing something on startup
Sender: owner-gcl
Precedence: bulk
content-length: 105

This is documented in the info tree.  Check out the ``Command Line''
section (under the top level node).

From owner-gcl  Mon Sep 16 21:51:15 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA28113; Mon, 16 Sep 1996 21:45:14 -0500
Received: from linux1.ce.ntu.edu.tw by cli.com (SMI-8.6/SMI-SVR4)
	id VAA28107; Mon, 16 Sep 1996 21:45:08 -0500
Received: (from d791013@localhost) by linux1.ce.ntu.edu.tw (8.7.5/8.6.9) id KAA13499; Tue, 17 Sep 1996 10:54:47 +0800
Date: Tue, 17 Sep 1996 10:54:47 +0800
From: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
Message-Id: <199609170254.KAA13499@linux1.ce.ntu.edu.tw>
To: gcl@cli.com
Subject: Re: How to get around this ...
In-Reply-To: <9609161148.ZM11904@rendezvous.engr.sgi.com>
References: <199609160856.QAA05067@linux1.ce.ntu.edu.tw>
	<d791013@linux1.ce.ntu.edu.tw>
	<9609161148.ZM11904@rendezvous.engr.sgi.com>
Sender: owner-gcl
Precedence: bulk
content-length: 1081

On September 16 1996, Tobias Kunze wrote:
> 
> That's a FAQ.

Well, I should check the FAQ before I mail my question :-)

> Floating point precision is limited and it just
> happens to be the case that you can't represent .1 in IEEE or
> whatever you use.  try .2 or other floats and you get an idea
> what's clean and what not.  use rationals if you need perfect
> precision, not floats.  if all you want is "nice" output, format
> it using ~7,3f or so.

Really thanks!

Another question of my own is:

Is there any method to read in .1 to be a string ".1"? Or I just must
write a complicate function to processing the string of float,
and... That is, I hope that just like .a to be read as a symbol and then
I can convert .a to a string. But I don't know how to do the same thing
for .1. There are some reason that I can't use the string ".1" in the
input file.

For example, 
 
(write-to-string (elt (read-from-string "(.a .1 b)") 0)) => ".a"
(write-to-string (elt (read-from-string "(.a .1 b)") 1)) => "0.10000000000000001"

Your any hints would be much apprecriate.

Chun-Yu


From owner-gcl  Tue Sep 17 09:12:56 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA12327; Tue, 17 Sep 1996 09:06:15 -0500
Received: from cse.psu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA12321; Tue, 17 Sep 1996 09:06:12 -0500
Received: from daneel.cse.psu.edu (daneel.cse.psu.edu [130.203.1.42]) by cse.psu.edu (8.7.5/8.7.3) with ESMTP id KAA23609 for <gcl@cli.com>; Tue, 17 Sep 1996 10:06:28 -0400 (EDT)
Message-Id: <199609171406.KAA23609@cse.psu.edu>
To: gcl@cli.com
Subject: What is the latest version of GCL?
reply-to: ehrlich@cse.psu.edu
X-uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Tue, 17 Sep 1996 10:05:49 EDT
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 134

I would appreciate if someone can tell me what the latest release of GCL is and
where I can FTP the code from.

Thanks,
Dan Ehrlich



From owner-gcl  Tue Sep 17 12:48:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA14100; Tue, 17 Sep 1996 12:44:16 -0500
Received: from ccrma.Stanford.EDU  by cli.com (SMI-8.6/SMI-SVR4)
	id MAA14094; Tue, 17 Sep 1996 12:44:10 -0500
Received: from ulysses by  ccrma.Stanford.EDU  (NX5.67e/NeXT-1.0)
	id AA23532; Tue, 17 Sep 96 10:43:56 -0700
Received: (from tkunze@localhost) by ulysses.stanford.edu (950413.SGI.8.6.12/950213.SGI.AUTOCF) id KAA17939; Tue, 17 Sep 1996 10:47:16 -0700
From: "Tobias Kunze" <tkunze@ulysses.Stanford.EDU>
Message-Id: <9609171047.ZM17937@ulysses.stanford.edu>
Date: Tue, 17 Sep 1996 10:47:16 -0700
In-Reply-To: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>
        "Re: How to get around this ..." (Sep 17, 10:54am)
References: <199609160856.QAA05067@linux1.ce.ntu.edu.tw> 
	<d791013@linux1.ce.ntu.edu.tw> 
	<9609161148.ZM11904@rendezvous.engr.sgi.com> 
	<199609170254.KAA13499@linux1.ce.ntu.edu.tw>
Reply-To: t@ulysses.Stanford.EDU
X-Url: http://www.stanford.edu/~tkunze
X-Mailer: Z-Mail (3.2.3 08feb96 MediaMail)
To: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>, gcl@cli.com
Subject: Re: How to get around this ...
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-gcl
Precedence: bulk
content-length: 1036

> Another question of my own is:
>
> Is there any method to read in .1 to be a string ".1"? Or I just must
> write a complicate function to processing the string of float,
> and... That is, I hope that just like .a to be read as a symbol and then
> I can convert .a to a string. But I don't know how to do the same thing
> for .1. There are some reason that I can't use the string ".1" in the
> input file.
>
> For example,
>
> (write-to-string (elt (read-from-string "(.a .1 b)") 0)) => ".a"
> (write-to-string (elt (read-from-string "(.a .1 b)") 1)) =>
"0.10000000000000001"

if it's a float, the number '.1' does simply not exist.  as a result,
if you want to make 0.10000000000000001 into .1, you *have* to transform,
ie, round it:

(* 1000000000000 (round num 1/1000000000000))

turns probably every float that's "slightly off" in to a more "precise"
number, but it depends on the implementation.  If all you want to do
is *print* the number in a "clean" way, format is the right function:

(format t "~7,3f" num)

for instance.



From owner-gcl  Thu Sep 19 01:14:18 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA15060; Thu, 19 Sep 1996 00:57:19 -0500
Received: from cherryflower.or.us by cli.com (SMI-8.6/SMI-SVR4)
	id AAA15054; Thu, 19 Sep 1996 00:57:11 -0500
Received: (from karlheg@localhost) by cherryflower.or.us (8.6.12/8.6.9) id CAA17159; Wed, 18 Sep 1996 02:13:34 -0700
Date: Wed, 18 Sep 1996 02:13:34 -0700
Message-Id: <199609180913.CAA17159@cherryflower.or.us>
From: "Karl M. Hegbloom" <karlheg@teleport.com>
To: gcl@cli.com, gwm-talk@sophia.inria.fr
Subject: Anyone have a formatted CLX manual?
Comments: Hyperbole mail buttons accepted, v04.01.
Sender: owner-gcl
Precedence: bulk
content-length: 366


 I am trying to locate either a .dvi or a .ps of the CLX manual,
unless somebody knows how I can format my own copy.  I have no idea
what type of markup it is in, and I'd like to read it someday.

-- 
Karl M. Hegbloom <karlheg@teleport.com>
http://www.teleport.com/~karlheg
(K0D) AYG-GE01  Portland, OR, USA
:) Proudly running Linux 2.0.20 and GNU public software!

From owner-gcl  Thu Sep 19 14:56:36 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA25155; Thu, 19 Sep 1996 14:51:28 -0500
Received: from gwa.ericsson.com by cli.com (SMI-8.6/SMI-SVR4)
	id OAA25149; Thu, 19 Sep 1996 14:51:25 -0500
Received: from mr1.exu.ericsson.se (mr1.exu.ericsson.com [138.85.147.11]) by gwa.ericsson.com (8.7.1/8.7.1) with ESMTP id OAA07288; Thu, 19 Sep 1996 14:49:37 -0500 (CDT)
Received: from screamer.rtp.ericsson.se (screamer.rtp.ericsson.se [147.117.133.13]) by mr1.exu.ericsson.se (8.7.1/NAHUB-MR1.1) with SMTP id OAA05477; Thu, 19 Sep 1996 14:49:36 -0500 (CDT)
Received: from rcur (rcur18.rtp.ericsson.se [147.117.133.138]) by screamer.rtp.ericsson.se (8.6.12/8.6.4) with ESMTP id PAA09017; Thu, 19 Sep 1996 15:50:01 -0400
To: t@ulysses.Stanford.EDU
cc: Chun-Yu Lee <d791013@linux1.ce.ntu.edu.tw>, gcl@cli.com
References: <199609160856.QAA05067@linux1.ce.ntu.edu.tw> <d791013@linux1.ce.ntu.edu.tw> <9609161148.ZM11904@rendezvous.engr.sgi.com> <199609170254.KAA13499@linux1.ce.ntu.edu.tw>  <9609171047.ZM17937@ulysses.stanford.edu> 
Subject: Re: How to get around this ... 
In-reply-to: (Your message of Tue, 17 Sep 1996 10:47:16 PDT.)
             <9609171047.ZM17937@ulysses.stanford.edu> 
Mime-Version: 1.0 (generated by tm-edit 7.75)
Content-Type: text/plain; charset=US-ASCII
Date: Thu, 19 Sep 1996 15:46:36 -0400
Message-ID: <3769.843162396@rtp.ericsson.se>
From: Raymond Toy <toy@rtp.ericsson.se>
Sender: owner-gcl
Precedence: bulk
content-length: 1792

>>>>> "Tobias" == Tobias Kunze <tkunze@ulysses.Stanford.EDU> writes:


    >> Another question of my own is:
    >> 
    >> Is there any method to read in .1 to be a string ".1"? Or I
    >> just must write a complicate function to processing the string
    >> of float, and... That is, I hope that just like .a to be read
    >> as a symbol and then I can convert .a to a string. But I don't
    >> know how to do the same thing for .1. There are some reason
    >> that I can't use the string ".1" in the input file.
    >> 
    >> For example,
    >> 
    >> (write-to-string (elt (read-from-string "(.a .1 b)") 0)) =>
    >> ".a" (write-to-string (elt (read-from-string "(.a .1 b)") 1))
    >> =>
    Tobias> "0.10000000000000001"

    Tobias> if it's a float, the number '.1' does simply not exist.
    Tobias> as a result, if you want to make 0.10000000000000001 into
    Tobias> .1, you *have* to transform, ie, round it:

    Tobias> (* 1000000000000 (round num 1/1000000000000))

    Tobias> turns probably every float that's "slightly off" in to a
    Tobias> more "precise" number, but it depends on the
    Tobias> implementation.  If all you want to do is *print* the
    Tobias> number in a "clean" way, format is the right function:

    Tobias> (format t "~7,3f" num)

Of course, this only works if ~7,3f is the "right" format to use.  In
general you don't know.

While I have no solution, I vaguely remember that it is possible to
have a printed representation of a floating point number which, when
read back in, gives EXACTLY the same floating point number.  Thus, .1
should be written out as .1 which, when read back in, should give .1
to exactly the same precision.

It should be bug if this is not true.  

I, unfortunately, do not know how to make this happen.

Ray




From owner-gcl  Sat Sep 21 20:35:49 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id UAA09365; Sat, 21 Sep 1996 20:24:25 -0500
Received: from icarus.cc.uic.edu by cli.com (SMI-8.6/SMI-SVR4)
	id UAA09358; Sat, 21 Sep 1996 20:24:22 -0500
Received: from [128.248.4.156] (SLIP2-24.DIALIN.UIC.EDU [128.248.4.156]) by icarus.cc.uic.edu (8.7.6/8.7.5) with SMTP id UAA11536 for <gcl@cli.com>; Sat, 21 Sep 1996 20:25:04 -0500 (CDT)
Message-Id: <199609220125.UAA11536@icarus.cc.uic.edu>
X-Sender: u53076@pop3serv1.cc.uic.edu
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Sat, 21 Sep 1996 20:33:42 -0500
To: gcl@cli.com
From: lambertb@uic.edu (Bruce L. Lambert)
Sender: owner-gcl
Precedence: bulk
content-length: 332

Hi folks,

My university just purchased a Convex Exemplar SPP1200 supercomputer. Do
you know if anyone has successfully compiled gcl on such a machine?

-bruce


Bruce L. Lambert, Ph.D.
Department of Pharmacy Administration
University of Illinois at Chicago
Email: lambertb@uic.edu
Phone: 1 (312) 996-2411
Fax:   1 (312) 996-3272



From owner-gcl  Tue Sep 24 07:43:04 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id HAA08643; Tue, 24 Sep 1996 07:32:39 -0500
Received: from sun2.nsfnet-relay.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id HAA08637; Tue, 24 Sep 1996 07:32:34 -0500
Via: uk.ac.exeter; Tue, 24 Sep 1996 13:32:26 +0100
Received: from eng4 by exub.exeter.ac.uk with SMTP (PP)           
          id <23245-0@exub.exeter.ac.uk>; Tue, 24 Sep 1996 13:32:11 +0100
Received: from [127.0.0.1] by eng4; Tue, 24 Sep 96 12:13:59 BST
Original-Sender: P.G.Hawkins@exeter.ac.uk
Message-Id: <3247C219.6201DD56@ex.ac.uk>
Date: Tue, 24 Sep 1996 12:12:25 +0100
From: Paul Hawkins <P.G.Hawkins@exeter.ac.uk>
Organization: Exeter University, S.Devon, England.
X-Mailer: Mozilla 3.0 (X11; I; SunOS 4.1.1 sun4c)
Mime-Version: 1.0
To: gcl@cli.com
Subject: Compiling gcl2-2 on SUNOS4.1.3
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 4404

Hello,

I have recently been getting hold of the GNU common lisp
compiler gcl2.2 for my sun (sun4 architechture) and was impressed
that it compiled (took about 1 hour) first time with gcc.
However when my lisp compiler started and did its precompiling?
or something it fell over before giving me its final version number.

Could someone tell me if there is something I need to do?
It mentions in the TROUBLE SHOOTING that I should not try to
compile on a client. I am using NFS file space but am using my
machine directly so I don't see why this is a problem.


The compilation had no errors but the GNU CL output is as follows .

Thanks for your help

Paul


GCL (GNU Common Lisp)  April 1994  32768 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
Initializing ../lsp/evalmacros.o
Initializing ../lsp/top.o
Initializing ../lsp/module.o
loading ../lsp/autoload.lsp
 
>#<"COMPILER" package>
 
COMPILER>#<"SYSTEM" package>
 
SYSTEM>*COMMAND-ARGS*
 
SYSTEM>#<"USER" package>
 
>#<"LISP" package>
 
LISP>#<"SLOOP" package>
 
SLOOP>6

SLOOP>#<"USER" package>

>Loading ../gcl-tk/tk-package.lsp
Finished loading ../gcl-tk/tk-package.lsp
T

>Initializing ../lsp/predlib.o
Initializing ../lsp/setf.o
Initializing ../lsp/arraylib.o
Initializing ../lsp/assert.o
Initializing ../lsp/defstruct.o
Initializing ../lsp/describe.o
Initializing ../lsp/iolib.o
Initializing ../lsp/listlib.o
Initializing ../lsp/mislib.o
Initializing ../lsp/numlib.o
Initializing ../lsp/packlib.o
Initializing ../lsp/seq.o
Initializing ../lsp/seqlib.o
Initializing ../lsp/trace.o
Initializing ../lsp/sloop.o
Initializing ../cmpnew/cmpinline.o
Initializing ../cmpnew/cmputil.o
Initializing ../lsp/debug.o
Initializing ../lsp/info.o
Initializing ../cmpnew/cmptype.o
Initializing ../cmpnew/cmpbind.o
Initializing ../cmpnew/cmpblock.o
Initializing ../cmpnew/cmpcall.o
Initializing ../cmpnew/cmpcatch.o
Initializing ../cmpnew/cmpenv.o
Initializing ../cmpnew/cmpeval.o
Initializing ../cmpnew/cmpflet.o
Initializing ../cmpnew/cmpfun.o
Initializing ../cmpnew/cmpif.o
Initializing ../cmpnew/cmplabel.o
Initializing ../cmpnew/cmplam.o
Initializing ../cmpnew/cmplet.o
Initializing ../cmpnew/cmploc.o
Initializing ../cmpnew/cmpmap.o
Initializing ../cmpnew/cmpmulti.o
Initializing ../cmpnew/cmpspecial.o
Initializing ../cmpnew/cmptag.o
Initializing ../cmpnew/cmptop.o
Initializing ../cmpnew/cmpvar.o
Initializing ../cmpnew/cmpvs.o
Initializing ../cmpnew/cmpwt.o
Building symbol table for ../unixport/raw_gcl ..
 
Error: The rsym command ../unixport/rsym ../unixport/raw_gcl rsym19164
failed .
Error signalled by PROGN.
Broken at SYSTEM:BUILD-SYMBOL-TABLE.  Type :H for Help.
>>make command
rm -f bin/gcl xbin/gcl
make install-command "INSTALL_LIB_DIR=/home/PGHawkin/eng8/gcl-2.2"
"PREFIX_DIR=/home/PGHawkin/eng8/gcl-2.2"
(echo "#!/bin/sh" ; \
echo exec /home/PGHawkin/eng8/gcl-2.2/unixport/saved_gcl \\ ; \
echo '   -dir' /home/PGHawkin/eng8/gcl-2.2/unixport/ \\ ; \
echo '   -libdir' /home/PGHawkin/eng8/gcl-2.2/ \\ ; \
echo '   -eval '\''(setq si::*allow-gzipped-file* t)'\' \\ ;\
echo '   -eval '\''(setq si::*tk-library* '\"unknown\"')'\' \\;\
echo '     '\"\$@\" ) > /home/PGHawkin/eng8/gcl-2.2/bin/gcl;
echo '#' other options: -load "/tmp/foo.o" -load "jo.lsp" -eval '"(joe
3)"' >> /home/PGHawkin/eng8/gcl-2.2/bin/gcl
chmod a+x /home/PGHawkin/eng8/gcl-2.2/bin/gcl
(cd xbin ; ln -s ../bin/gcl .)
(cd  cmpnew ; make collectfn.o)
../unixport/saved_gcl ../unixport/ -compile collectfn.lsp
sh: ../unixport/saved_gcl: not found
*** Error code 1
make: Fatal error: Command failed for target `collectfn.o'
Current working directory /home/PGHawkin/eng8/gcl-2.2/cmpnew
*** Error code 1
make: Fatal error: Command failed for target `all'


-- 
 ___________________________________________________________________
| Paul Hawkins (Research Assistant)                                 |
|                                                                   |
| School of Engineering     Tel:     (01392) 263613                 |
| University of Exeter      Fax:     (01392) 217965                 |
| North Park Rd             E-mail:  P.G.Hawkins@exeter.ac.uk       |
| Exeter EX4 4QF            http://www.ex.ac.uk/ESE/people/pgh.html |
|___________________________________________________________________|
| "I think everybody's right, except me" - The Cat                  |
|___________________________________________________________________|

From owner-gcl  Fri Sep 27 09:46:58 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA06648; Fri, 27 Sep 1996 09:34:03 -0500
Received: from chekov.ctd.comsat.com by cli.com (SMI-8.6/SMI-SVR4)
	id JAA06642; Fri, 27 Sep 1996 09:34:00 -0500
Received: from neal by chekov.ctd.comsat.com with local (Exim 0.56 #3)
	id E0v6dzK-0000Th-00; Fri, 27 Sep 1996 10:33:58 -0400
From: Neal Becker <neal@ctd.comsat.com>
To: gcl@cli.com
Subject: gcl2.2 hpux9.05 failure
X-Face: "$ryF/ne$oms9n}#TY|W5Ttjbp-6/u4j'7c:%-aq2IAf'&DjuvII4wvr:eU{h=GMPcVTP,p
 XgCPnk{Qu:7P=jH00Q?B(*bZ\7#x_&KD=%hU1VhP'`hy'PF01*tU9DAoK7QXTGzL%fe!lIj,0Ds,P:
 GV_YPd*4GO?ClJAPRa=iB\PuIQmM=Q>qo87lJh-N2PQL-2QaM>}LdWI<}
Mime-Version: 1.0 (generated by tm-edit 7.88)
Content-Type: text/plain; charset=US-ASCII
Message-Id: <E0v6dzK-0000Th-00@chekov.ctd.comsat.com>
Date: Fri, 27 Sep 1996 10:33:58 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 590

My first try at building gcl-2.2 on hpux9.05 gcc-2.7.1

gcc -I../gcl-tk -I../h/   -I/usr/include/X11R5 -c  sockets.c
../gcl-tk/comm.c: In function `fScheck_fd_for_input':
In file included from sockets.c:262:
../gcl-tk/comm.c:41: warning: passing arg 2 of `select' from incompatible pointer type
sockets.c: In function `fSset_sigio_for_fd':
sockets.c:459: `FASYNC' undeclared (first use this function)
sockets.c:459: (Each undeclared identifier is reported only once
sockets.c:459: for each function it appears in.)
sockets.c:461: `F_SETOWN' undeclared (first use this function)

Any ideas?

From owner-gcl  Wed Oct  2 13:07:45 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA21320; Wed, 2 Oct 1996 13:02:53 -0500
Received: from mercury.Sun.COM by cli.com (SMI-8.6/SMI-SVR4)
	id NAA21312; Wed, 2 Oct 1996 13:02:46 -0500
Received: by mercury.Sun.COM (Sun.COM)
	id LAA00803; Wed, 2 Oct 1996 11:02:35 -0700
Received: from bigbang.Eng.Sun.COM by Eng.Sun.COM (SMI-8.6/SMI-5.3)
	id LAA25462; Wed, 2 Oct 1996 11:01:52 -0700
Received: from clam.Eng.Sun.COM by bigbang.Eng.Sun.COM (SMI-8.6/SMI-SVR4)
	id LAA09646; Wed, 2 Oct 1996 11:01:28 -0700
Received: by clam.Eng.Sun.COM (SMI-8.6/SMI-SVR4)
	id LAA12677; Wed, 2 Oct 1996 11:01:09 -0700
Date: Wed, 2 Oct 1996 11:01:09 -0700
Message-Id: <199610021801.LAA12677@clam.Eng.Sun.COM>
From: Cris Perdue <cperdue@Eng.Sun.COM>
To: gcl@cli.com
Subject: Notes on building GCL 2.2
Reply-to: Cris Perdue <cperdue@Eng.Sun.COM>
Sender: owner-gcl
Precedence: bulk
content-length: 840

I have recently built GCL 2.2 on Solaris 2.5 using gcc 2.6.2, and
encountered the following problems in the build process:

----------

FASYNC was undefined in sockets.c.
Fixed by adding #include <sys/file.h>

----------

gcc refused to compile code using the GET_FAULT_ADDR macro --

#define GET_FAULT_ADDR(sig,code,scp,addr) \
  (code ? ((siginfo_t *)code )->si_addr : error("no address info"))

The function "error" is void.  I changed the definition to:

#define GET_FAULT_ADDR(sig,code,scp,addr) \
  (code ? ((siginfo_t *)code )->si_addr : (error("no address info"), 0))

----------

The function "shifts" in mp/mp2.c conflicted with some other loader
symbol somewhere at link time.  I worked around this by renaming
shifts to shiftss.  As far as I can tell, it is not used in GCL.

----------

Hope this input is useful.

				-Cris



From owner-gcl  Thu Oct  3 19:05:31 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA09428; Thu, 3 Oct 1996 19:03:21 -0500
Received: from tardis.almaden.ibm.com by cli.com (SMI-8.6/SMI-SVR4)
	id TAA09422; Thu, 3 Oct 1996 19:03:19 -0500
Received: (from tmb@localhost) by tardis.almaden.ibm.com (8.7.5/8.6.11) id RAA01469 for gcl@cli.com; Thu, 3 Oct 1996 17:05:18 -0700
Date: Thu, 3 Oct 1996 17:05:18 -0700
From: tmb@almaden.ibm.com
Message-Id: <199610040005.RAA01469@tardis.almaden.ibm.com>
To: gcl@cli.com
Subject: thread support in GCL?
Sender: owner-gcl
Precedence: bulk
content-length: 409

The current version of GCL doesn't seem to have thread support.
Is anybody working on that?  For running Web servers (a popular
thing to do these days), that's very important.

If nobody is working on it, where would you see the sticking points?
If it's the garbage collector, how well do you think Boehm's GC
would work in place of the current GC?  (Boehm's GC already knows
about threads.)

Thanks,
Thomas.

From owner-gcl  Thu Oct  3 19:05:30 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA09418; Thu, 3 Oct 1996 19:01:59 -0500
Received: from tardis.almaden.ibm.com by cli.com (SMI-8.6/SMI-SVR4)
	id TAA09412; Thu, 3 Oct 1996 19:01:55 -0500
Received: (from tmb@localhost) by tardis.almaden.ibm.com (8.7.5/8.6.11) id RAA01454 for gcl@cli.com; Thu, 3 Oct 1996 17:03:51 -0700
Date: Thu, 3 Oct 1996 17:03:51 -0700
From: tmb@almaden.ibm.com
Message-Id: <199610040003.RAA01454@tardis.almaden.ibm.com>
To: gcl@cli.com
Subject: dynamic loading for Linux/Elf?
Sender: owner-gcl
Precedence: bulk
content-length: 347

I'm running GCL 2.2 from the Linux Slackware 96 distribution.
FASLINK doesn't seem to be implemented there.  Is there
a newer version where it is implemented?  Is there some other
way to do dynamic loading?

It's a bit strange that just as Elf enabled other languages
to support dynamic loading, it becomes unavailable for GCL...

Thanks,
Thomas.

From owner-gcl  Thu Oct  3 21:39:17 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA09966; Thu, 3 Oct 1996 21:29:55 -0500
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id VAA09960; Thu, 3 Oct 1996 21:29:52 -0500
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id TAA10854; Thu, 3 Oct 1996 19:29:57 -0700
Date: Thu, 3 Oct 1996 19:29:57 -0700
Message-Id: <199610040229.TAA10854@aurora.romoidoy.com>
From: chapman@afferent.com (David Chapman)
To: tmb@almaden.ibm.com
CC: gcl@cli.com
In-reply-to: <199610040005.RAA01469@tardis.almaden.ibm.com> (tmb@almaden.ibm.com)
Subject: Re: thread support in GCL?
Sender: owner-gcl
Precedence: bulk
content-length: 155

I've wondered about this.  Interrupt handlers (which *are*
implemented) seem to run in separate threads, so there must be at
least crude thread support.  

From owner-gcl  Fri Oct  4 02:59:20 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id CAA25724; Fri, 4 Oct 1996 02:50:59 -0500
Received: from ki1.chemie.fu-berlin.de by cli.com (SMI-8.6/SMI-SVR4)
	id CAA25718; Fri, 4 Oct 1996 02:50:55 -0500
Received: by ki1.chemie.fu-berlin.de (Smail3.1.28.1)
	  from mail.hanse.de (193.174.9.9) with smtp
	  id <m0v950h-0000ZPC>; Fri, 4 Oct 96 09:49 MEST
Received: from wavehh.UUCP by mail.hanse.de with UUCP
	  for tmb@almaden.ibm.com id <m0v950f-0004f9C@mail.hanse.de>; Fri, 4 Oct 96 08:49 MET
Received: by wavehh.hanse.de (4.1/SMI-4.1)
	id AA01189; Fri, 4 Oct 96 08:48:30 +0100
From: cracauer@wavehh.hanse.de (Martin Cracauer)
Message-Id: <9610040748.AA01189@wavehh.hanse.de>
Subject: Re: thread support in GCL?
To: tmb@almaden.ibm.com
Date: Fri, 4 Oct 1996 08:48:29 +0100 (MET)
Cc: gcl@cli.com
In-Reply-To: <199610040005.RAA01469@tardis.almaden.ibm.com> from "tmb@almaden.ibm.com" at Oct 3, 96 05:05:18 pm
#Reply-To: cracauer@wavehh.hanse.de
X-Mailer: ELM [version 2.4 PL24]
Content-Type: text
Sender: owner-gcl
Precedence: bulk
content-length: 1064

> If nobody is working on it, where would you see the sticking points?
> If it's the garbage collector, how well do you think Boehm's GC
> would work in place of the current GC?  (Boehm's GC already knows
> about threads.)

Boehm's GC knows about some specific Thread packages on some
platforms. It needs at least a Thread package's capability to
suspend/resume all other threads from one thread. That is not part of
the Posix Threads definition. It is part of every non-Posix interface
I know of, though, so individual ports will be possible. Last time I
checked and heard on usenet, Boehm's GC works with Solaris Threads and
Xerox's PCR threads. Support for Win32 was contributed but beleived to
have problems.

Before working on a Threads implementation, we should think about the
API. I'm sure existing implementations (Lucid, Lispworks, Allegro,
Symbolics, TI?, Xerox?) all have some points to argue over.

Martin
-- 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Martin Cracauer <cracauer@wavehh.hanse.de>
http://www.bik-gmbh.de/~cracauer
Fax +49 40 522 85 36 

From owner-gcl  Fri Oct  4 04:32:07 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id EAA01587; Fri, 4 Oct 1996 04:30:26 -0500
Received: from tardis.almaden.ibm.com by cli.com (SMI-8.6/SMI-SVR4)
	id EAA01581; Fri, 4 Oct 1996 04:30:23 -0500
Received: (from tmb@localhost) by tardis.almaden.ibm.com (8.7.5/8.6.11) id CAA02618; Fri, 4 Oct 1996 02:31:54 -0700
Date: Fri, 4 Oct 1996 02:31:54 -0700
From: tmb@almaden.ibm.com
Message-Id: <199610040931.CAA02618@tardis.almaden.ibm.com>
To: cracauer@wavehh.hanse.de
Subject: Re: thread support in GCL?
Cc: gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 1031

|Boehm's GC knows about some specific Thread packages on some
|platforms. It needs at least a Thread package's capability to
|suspend/resume all other threads from one thread. That is not part of
|the Posix Threads definition.

Thanks for the response.  For any specific application (like a GCL
thread package), you can keep track of and suspend all threads in
a pthreads implementation using a little bit of user code, so that
shouldn't really be a big problem (in defense of the pthreads designers,
I don't think that a "suspend all threads" API function is a good idea,
since what that means is very application dependent).  In any case,
other thread-aware collectors are likely to have similar requirements,
so if you use pthreads you have to face the issue anyway.

I guess the alternative would be language specific threads,
maybe with compiler support (the compiler can insert yield
sequences at strategic points).  That has both advantages and
disadvantages.  For my applications, I prefer system threads,
though.

Thomas.

From owner-gcl  Fri Oct  4 06:19:58 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id GAA01903; Fri, 4 Oct 1996 06:18:28 -0500
Received: from mailserver.di.unipi.it by cli.com (SMI-8.6/SMI-SVR4)
	id GAA01897; Fri, 4 Oct 1996 06:18:23 -0500
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.7.5/8.7.3) with ESMTP id NAA16743; Fri, 4 Oct 1996 13:18:03 +0100 (MET)
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id NAA08611; Fri, 4 Oct 1996 13:18:02 +0100
Date: Fri, 4 Oct 1996 13:18:02 +0100
Message-Id: <199610041218.NAA08611@omega.di.unipi.it>
To: tmb@almaden.ibm.com
CC: gcl@cli.com
In-reply-to: <199610040005.RAA01469@tardis.almaden.ibm.com> (tmb@almaden.ibm.com)
Subject: Re: thread support in GCL?
Sender: owner-gcl
Precedence: bulk
content-length: 212


ECoLisp is a KCL derivative which includes thread support.
You can get from:

 - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl
 - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp

-- Beppe

From owner-gcl  Fri Oct  4 11:40:57 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA10215; Fri, 4 Oct 1996 11:35:00 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id LAA10209; Fri, 4 Oct 1996 11:34:56 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id RAA01578; Fri, 4 Oct 1996 17:34:09 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Fri, 4 Oct 96 17:33:17 BST
Date: Fri, 4 Oct 96 17:33:11 BST
Message-Id: <2644.9610041633@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: thread support in GCL?
To: tmb@almaden.ibm.com, gcl@cli.com
In-Reply-To: tmb@almaden.ibm.com's message of Thu, 3 Oct 1996 17:05:18 -0700
Sender: owner-gcl
Precedence: bulk
content-length: 663

> The current version of GCL doesn't seem to have thread support.
> Is anybody working on that?  For running Web servers (a popular
> thing to do these days), that's very important.

I agree that threads are important, and I would very much like to
see them in GCL.

However, there are some alternatives that can be used in many cases.
In particular: fork the whole GCL process (easy in Unix), or use
some kind of pseduo-process mechanism (e.g. a main loop that calls
message handlers).

I suspect everyone already knows this, but I think it's worth
mentioning anyway.  I have used such approaches from time to time,
and they can work surprisingly well.

-- jeff

From owner-gcl  Fri Oct  4 16:28:59 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA13199; Fri, 4 Oct 1996 16:21:30 -0500
Received: from piglet.splode.com by cli.com (SMI-8.6/SMI-SVR4)
	id QAA13193; Fri, 4 Oct 1996 16:21:27 -0500
Received: (from friedman@localhost) by piglet.splode.com (8.7.5/8.7.3) id QAA27463; Fri, 4 Oct 1996 16:20:47 -0500
Date: Fri, 4 Oct 1996 16:20:47 -0500
Message-Id: <199610042120.QAA27463@piglet.splode.com>
From: friedman@splode.com (Noah Friedman)
To: jeff@aiai.ed.ac.uk
Cc: tmb@almaden.ibm.com, gcl@cli.com
Subject: Re: thread support in GCL?
Reply-To: friedman@splode.com
In-Reply-To: <jeff@aiai.ed.ac.uk> Fri, 4 Oct 1996 17:33:11 BST
References: <2644.9610041633@subnode.aiai.ed.ac.uk>
Sender: owner-gcl
Precedence: bulk
content-length: 377

>However, there are some alternatives that can be used in many cases.
>In particular: fork the whole GCL process (easy in Unix), 

That's an easy way thrash the machine to a standstill the first time it GCs
even if your system has copy-on-write fork.  For a web server, you really
want to avoid having a forking lisp process, especially if you expect it to
take a lot of hits.

From owner-gcl  Fri Oct  4 17:19:35 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id RAA13503; Fri, 4 Oct 1996 17:13:22 -0500
Received: from nak.berkeley.edu by cli.com (SMI-8.6/SMI-SVR4)
	id RAA13497; Fri, 4 Oct 1996 17:13:19 -0500
From: williamc@jeannie.Berkeley.EDU
Received: from jeannie.Berkeley.EDU (jeannie.Berkeley.EDU [128.32.177.138]) by nak.berkeley.edu (8.7.3/8.6.10) with SMTP id PAA03760; Fri, 4 Oct 1996 15:13:14 -0700 (PDT)
Received: from localhost by jeannie.Berkeley.EDU (SMI-8.6/SMI-SVR4)
	id PAA04944; Fri, 4 Oct 1996 15:14:02 -0700
Date: Fri, 4 Oct 1996 15:14:01 -0700 (PDT)
To: Cris Perdue <cperdue@Eng.Sun.COM>
cc: gcl@cli.com
Subject: Re: Notes on building GCL 2.2
In-Reply-To: <199610021801.LAA12677@clam.Eng.Sun.COM>
Message-ID: <Pine.GSO.3.95.961004145059.4072A-100000@jeannie.berkeley.edu>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 1323



On Wed, 2 Oct 1996, Cris Perdue wrote:

> I have recently built GCL 2.2 on Solaris 2.5 using gcc 2.6.2, and
> encountered the following problems in the build process:
> 
I noticed the following problems too, and fixed the GET_FAULT_ADDR macro
before giving up on the sockets.c problem. This stuff should definitely be
in the FAQ or in the release notes...

Also, has anybody been able to interface with the latest versions of
tk/tcl? What exactly does interfacing with tk/tcl do for you?

And... how does one interface GCL with Emacs?

Will
> ----------
> 
> FASYNC was undefined in sockets.c.
> Fixed by adding #include <sys/file.h>
> 
> ----------
> 
> gcc refused to compile code using the GET_FAULT_ADDR macro --
> 
> #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? ((siginfo_t *)code )->si_addr : error("no address info"))
> 
> The function "error" is void.  I changed the definition to:
> 
> #define GET_FAULT_ADDR(sig,code,scp,addr) \
>   (code ? ((siginfo_t *)code )->si_addr : (error("no address info"), 0))
> 
> ----------
> 
> The function "shifts" in mp/mp2.c conflicted with some other loader
> symbol somewhere at link time.  I worked around this by renaming
> shifts to shiftss.  As far as I can tell, it is not used in GCL.
> 
> ----------
> 
> Hope this input is useful.
> 
> 				-Cris
> 
> 
> 


From owner-gcl  Sat Oct  5 20:33:24 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id UAA12823; Sat, 5 Oct 1996 20:27:57 -0500
Received: from wintermute.hip.cam.org by cli.com (SMI-8.6/SMI-SVR4)
	id UAA12817; Sat, 5 Oct 1996 20:27:51 -0500
Received: (from vbykov@localhost) by wintermute.hip.cam.org (8.7.1/8.7.1) id VAA02854; Sat, 5 Oct 1996 21:26:50 -0400
Date: Sat, 5 Oct 1996 21:26:50 -0400
Organization: Private site, Communications Accessibles Montreal domain
Message-Id: <199610060126.VAA02854@wintermute.hip.cam.org>
To: gcl@cli.com
Subject: GCL and Emacs (was Re: Notes on building GCL 2.2)
In-Reply-To: <Pine.GSO.3.95.961004145059.4072A-100000@jeannie.berkeley.edu>
References: <199610021801.LAA12677@clam.Eng.Sun.COM>
	<Pine.GSO.3.95.961004145059.4072A-100000@jeannie.berkeley.edu>
Reply-To: vbykov@cam.org
From: Vassili Bykov <vbykov@cam.org>
Sender: owner-gcl
Precedence: bulk
content-length: 793

williamc@jeannie.berkeley.edu writes:
 > [...]
 > And... how does one interface GCL with Emacs?

By getting ILISP 5.7 from
<http://www.c2.org/~campbell/ilisp/index.html>, and (important)
applying three patches, two of which are found at the same site, and
the third one is this:

*** ilisp-kcl.el~	Wed Jan  4 13:27:12 1995
--- ilisp-kcl.el	Mon Sep 16 21:01:57 1996
***************
*** 77,82 ****
  ;;; ECL -- Beppe Attardi's developments over AKCL
  
  (defdialect ecl "EcoLisp Common LISP" akcl)
! (if (not ecl-program) (setq gcl-program "ecl"))
  
  ;;; end of file -- ilisp-kcl.el --
--- 77,82 ----
  ;;; ECL -- Beppe Attardi's developments over AKCL
  
  (defdialect ecl "EcoLisp Common LISP" akcl)
! (if (not ecl-program) (setq ecl-program "ecl"))
  
  ;;; end of file -- ilisp-kcl.el --

From owner-gcl  Sun Oct  6 18:28:48 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id SAA13128; Sun, 6 Oct 1996 18:24:42 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id SAA13122; Sun, 6 Oct 1996 18:24:39 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id AAA08184; Mon, 7 Oct 1996 00:24:23 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Mon, 7 Oct 96 00:23:29 BST
Date: Mon, 7 Oct 96 00:23:28 BST
Message-Id: <881.9610062323@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: thread support in GCL?
To: friedman@splode.com
In-Reply-To: Noah Friedman's message of Fri, 4 Oct 1996 16:20:47 -0500
Cc: tmb@almaden.ibm.com, gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 1129

> >However, there are some alternatives that can be used in many cases.
> >In particular: fork the whole GCL process (easy in Unix), 
> 
> That's an easy way thrash the machine to a standstill the first time it GCs
> even if your system has copy-on-write fork.  For a web server, you really
> want to avoid having a forking lisp process, especially if you expect it to
> take a lot of hits.

Of course it depends on the machine, how much memory, how many forks,
the GC algorithm, etc.  It is possible to run a number of Lisp
processes on the same machine without thrashing the machine to a
standstill.  Note that the separate processes don't all have to
GC at the same time and that (depending on what you're doing and
on the GC algorithm) the GC may not have to touch (much less
modify) all pages that contain Lisp data.

I agree that forking Lisp is not likely to work well for a web
server that will take a lot of hits (though for a small Lisp 
and a "lot" that isn't too large it might be ok), but for a
web server that isn't going to take a lot of hits over short
periods of time, it could work reasonably well.

-- jeff




From owner-gcl  Mon Oct  7 12:42:11 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA17357; Mon, 7 Oct 1996 12:26:16 -0500
Received: from tardis.almaden.ibm.com by cli.com (SMI-8.6/SMI-SVR4)
	id MAA17350; Mon, 7 Oct 1996 12:26:11 -0500
Received: (from tmb@localhost) by tardis.almaden.ibm.com (8.7.5/8.6.11) id KAA08053; Mon, 7 Oct 1996 10:28:12 -0700
Date: Mon, 7 Oct 1996 10:28:12 -0700
From: tmb@almaden.ibm.com
Message-Id: <199610071728.KAA08053@tardis.almaden.ibm.com>
To: friedman@splode.com, jeff@aiai.ed.ac.uk
Subject: Re: thread support in GCL?
Cc: gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 825

|> That's an easy way thrash the machine to a standstill the first time it GCs
|> even if your system has copy-on-write fork.
|
|Of course it depends on the machine, how much memory, how many forks,
|the GC algorithm, etc.  It is possible to run a number of Lisp
|processes on the same machine without thrashing the machine to a
|standstill.  Note that the separate processes don't all have to
|GC at the same time and that (depending on what you're doing and
|on the GC algorithm) the GC may not have to touch (much less
|modify) all pages that contain Lisp data.

Well, the main reason to go to a multithreaded dynamic runtime
for Web applications is that it makes the implementation of
responsive, stateful Web interactions much easier: different
connections simply change per-user and global objects 
in-memory.

Thomas.

From owner-gcl  Mon Oct  7 16:15:10 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA18383; Mon, 7 Oct 1996 16:07:27 -0500
Received: from zsp.com by cli.com (SMI-8.6/SMI-SVR4)
	id QAA18377; Mon, 7 Oct 1996 16:07:19 -0500
Received: from engmaster.zsp.com (engmaster [192.168.1.250]) by zsp.com (8.6.12/8.6.10) with ESMTP id OAA19285 for <gcl@cli.com>; Mon, 7 Oct 1996 14:11:49 -0700
Received: from rubicon.zsp.com (rubicon [192.168.1.2]) by engmaster.zsp.com (8.7.1/8.6.9) with ESMTP id NAA17815 for <gcl@cli.com>; Mon, 7 Oct 1996 13:31:16 -0700
Received: (from ttn@localhost) by rubicon.zsp.com (8.7.1/8.6.9) id OAA14394; Mon, 7 Oct 1996 14:12:36 -0700
Date: Mon, 7 Oct 1996 14:12:36 -0700
Message-Id: <199610072112.OAA14394@rubicon.zsp.com>
From: thi <ttn@zsp.com>
To: gcl@cli.com
Subject: gcl2.2 on redhat (3.0.3) linux?
Sender: owner-gcl
Precedence: bulk
content-length: 22622

Hi everyone,

Are there any tips out there for getting GCL2.2 going on RedHat 3.0.3
Linux?  Here's background:

1) Try standard build procedure.
	$ add-defs 386-linux
	$ make

	This failed because `<asm/sigcontext.h>' was not available.
	Also, add-defs could not find some directories it was looking
	for.

2) Edit config.h to use `signal.h'.  Edit add-defs to use proper
   directories.
	$ add-defs 386-linux
	$ make

	This failed during the dump, saying "Can't mmap (saved_gcl)
	errno=22".  The call that fails is the second `mmap()' in
	unexec.c (which is linked to unexe-19.29.c).  The first call
	apparently had no problems.

3) Read the distributed FAQ and README, but no clue still.  Ask for help
   from the GCL mailing list!

I've included the tail end of the make below, so that you can see for
yourself what happened.

Any help would be greatly appreciated.

thi

--------------
cat h/config.h | sed -e "1,/Begin for cmpincl/d" \
	-e "/End for cmpinclude/,50000d" > tmpx
cat h/cmpincl1.h h/compbas.h h/enum.h h/object.h h/vs.h h/bds.h h/frame.h h/lex.h h/eval.h    h/funlink.h h/att_ext.h h/new_decl.h h/compbas2.h h//compat.h h//cmponly.h >> tmpx
./xbin/move-if-changed mv tmpx h/cmpinclude.h
tmpx and h/cmpinclude.h are identical
./xbin/move-if-changed ln h/cmpinclude.h o/cmpinclude.h
h/cmpinclude.h and o/cmpinclude.h are identical
(cd bin; make all)
make[1]: Entering directory `/tmp/gcl-2.2/bin'
make[1]: Nothing to be done for `all'.
make[1]: Leaving directory `/tmp/gcl-2.2/bin'
(cd mp ; make all)
make[1]: Entering directory `/tmp/gcl-2.2/mp'
make all1 "MPFILES=./mpi-386d.o   ./libmport.a"
make[2]: Entering directory `/tmp/gcl-2.2/mp'
make[2]: Nothing to be done for `all1'.
make[2]: Leaving directory `/tmp/gcl-2.2/mp'
make[1]: Leaving directory `/tmp/gcl-2.2/mp'
rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
(cd o; make all)
make[1]: Entering directory `/tmp/gcl-2.2/o'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   unixsave.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   funlink.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   fat_string.c  
fat_string.c: In function `fSread_externals':
fat_string.c:123: warning: assignment makes integer from pointer without a cast
fat_string.c: In function `init_fat_string':
fat_string.c:361: warning: right shift count >= width of type
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   run_process.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   nfunlink.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   usig.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   usig2.c  
usig2.c: In function `before_interrupt':
usig2.c:216: warning: assignment makes pointer from integer without a cast
usig2.c:226: warning: assignment makes pointer from integer without a cast
usig2.c:230: warning: assignment makes pointer from integer without a cast
usig2.c: In function `after_interrupt':
usig2.c:274: warning: assignment makes integer from pointer without a cast
usig2.c:281: warning: assignment makes integer from pointer without a cast
In file included from usig2.c:303:
usig2_aux.c:3: warning: assignment makes integer from pointer without a cast
usig2_aux.c:4: warning: assignment makes integer from pointer without a cast
usig2_aux.c:5: warning: assignment makes integer from pointer without a cast
usig2_aux.c:7: warning: assignment makes integer from pointer without a cast
usig2_aux.c:8: warning: assignment makes integer from pointer without a cast
usig2_aux.c:9: warning: assignment makes integer from pointer without a cast
usig2_aux.c:16: warning: assignment makes integer from pointer without a cast
usig2_aux.c:17: warning: assignment makes integer from pointer without a cast
usig2_aux.c:18: warning: assignment makes integer from pointer without a cast
usig2_aux.c:20: warning: assignment makes integer from pointer without a cast
usig2_aux.c:21: warning: assignment makes integer from pointer without a cast
usig2_aux.c:22: warning: assignment makes integer from pointer without a cast
usig2_aux.c:23: warning: assignment makes integer from pointer without a cast
usig2_aux.c:24: warning: assignment makes integer from pointer without a cast
usig2_aux.c:25: warning: assignment makes integer from pointer without a cast
usig2_aux.c:26: warning: assignment makes integer from pointer without a cast
usig2_aux.c:27: warning: assignment makes integer from pointer without a cast
usig2_aux.c:29: warning: assignment makes integer from pointer without a cast
usig2_aux.c:32: warning: assignment makes integer from pointer without a cast
usig2_aux.c:33: warning: assignment makes integer from pointer without a cast
usig2_aux.c:34: warning: assignment makes integer from pointer without a cast
usig2_aux.c:36: warning: assignment makes integer from pointer without a cast
usig2_aux.c:37: warning: assignment makes integer from pointer without a cast
usig2_aux.c:38: warning: assignment makes integer from pointer without a cast
usig2_aux.c:40: warning: assignment makes integer from pointer without a cast
usig2_aux.c:41: warning: assignment makes integer from pointer without a cast
usig2_aux.c:42: warning: assignment makes integer from pointer without a cast
usig2_aux.c:45: warning: assignment makes integer from pointer without a cast
usig2_aux.c:46: warning: assignment makes integer from pointer without a cast
usig2_aux.c:48: warning: assignment makes integer from pointer without a cast
usig2_aux.c:52: warning: assignment makes integer from pointer without a cast
usig2_aux.c:55: warning: assignment makes integer from pointer without a cast
usig2_aux.c:56: warning: assignment makes integer from pointer without a cast
usig2_aux.c:58: warning: assignment makes integer from pointer without a cast
usig2_aux.c:59: warning: assignment makes integer from pointer without a cast
usig2_aux.c:62: warning: assignment makes integer from pointer without a cast
usig2_aux.c:64: warning: assignment makes integer from pointer without a cast
usig2_aux.c:65: warning: assignment makes integer from pointer without a cast
usig2_aux.c:66: warning: assignment makes integer from pointer without a cast
usig2_aux.c:69: warning: assignment makes integer from pointer without a cast
usig2_aux.c:70: warning: assignment makes integer from pointer without a cast
usig2_aux.c:71: warning: assignment makes integer from pointer without a cast
usig2.c: In function `MakeCons':
usig2.c:335: warning: initialization makes pointer from integer without a cast
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   utils.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   makefun.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -I../gcl-tk -I../h/ -O4   -I/usr/include -c  sockets.c
In file included from /usr/include/arpa/inet.h:66,
                 from sockets.c:31:
/usr/include/sys/param.h:24: warning: `MAXPATHLEN' redefined
../h/../h/notcomp.h:37: warning: this is the location of the previous definition
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -I../gcl-tk -I../h/ -O4   -I/usr/include -c  clxsocket.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   init_pari.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   sfasl.c  
In file included from sfasl.c:38:
sfaslelf.c:277: warning: type mismatch with previous implicit declaration
sfaslelf.c:195: warning: previous implicit declaration of `relocate_symbols'
sfaslelf.c:277: warning: `relocate_symbols' was previously implicitly declared to return `int'
sfaslelf.c:277: warning: `relocate_symbols' was declared implicitly `extern' and later `static'
sfaslelf.c:323: warning: type mismatch with previous implicit declaration
sfaslelf.c:228: warning: previous implicit declaration of `relocate'
sfaslelf.c:323: warning: `relocate' was previously implicitly declared to return `int'
sfaslelf.c:323: warning: `relocate' was declared implicitly `extern' and later `static'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char  -o grab_defs  grab_defs.c
make new_init.c	decls1 "INI_FILES=`echo main.o alloc.o gbc.o bitop.o typespec.o eval.o macros.o lex.o bds.o frame.o predicate.o reference.o assignment.o bind.o let.o conditional.o block.o iteration.o mapfun.o prog.o multival.o catch.o symbol.o cfun.o cmpaux.o package.o big.o number.o num_pred.o num_comp.o num_arith.o num_sfun.o num_co.o num_log.o num_rand.o earith.o character.o  sequence.o list.o hash.o array.o string.o regexpr.o structure.o toplevel.o file.o read.o backq.o print.o format.o pathname.o unixfsys.o unixfasl.o error.o unixtime.o unixsys.o unixsave.o funlink.o fat_string.o ./run_process.o nfunlink.o usig.o usig2.o utils.o makefun.o sockets.o clxsocket.o init_pari.o   ./sfasl.o  | sed -e 's:\.o:.ini:g'  -e 's:new_init.o::g' `"
make[2]: Entering directory `/tmp/gcl-2.2/o'
make[2]: `new_init.c' is up to date.
echo '#include "make-decl.h"' > foo.c
cat main.ini alloc.ini gbc.ini bitop.ini typespec.ini eval.ini macros.ini lex.ini bds.ini frame.ini predicate.ini reference.ini assignment.ini bind.ini let.ini conditional.ini block.ini iteration.ini mapfun.ini prog.ini multival.ini catch.ini symbol.ini cfun.ini cmpaux.ini package.ini big.ini number.ini num_pred.ini num_comp.ini num_arith.ini num_sfun.ini num_co.ini num_log.ini num_rand.ini earith.ini character.ini sequence.ini list.ini hash.ini array.ini string.ini regexpr.ini structure.ini toplevel.ini file.ini read.ini backq.ini print.ini format.ini pathname.ini unixfsys.ini unixfasl.ini error.ini unixtime.ini unixsys.ini unixsave.ini funlink.ini fat_string.ini ./run_process.ini nfunlink.ini usig.ini usig2.ini utils.ini makefun.ini sockets.ini clxsocket.ini init_pari.ini ./sfasl.ini >> foo.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -E -I../h/ foo.c | sed -n -e '/#/d' -e '/DO_/d' -e '/[a-zA-Z;]/p' > tmpx
../xbin/move-if-changed mv tmpx ../h/new_decl.h
tmpx and ../h/new_decl.h are identical
make[2]: Leaving directory `/tmp/gcl-2.2/o'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   bsearch.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   new_init.c  
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c -O  -I../gcl-tk -I../h/ -O4   user_init.c  
rm -f gcllib.a
ar qc gcllib.a bsearch.o user_init.o 
ranlib gcllib.a
make[1]: Leaving directory `/tmp/gcl-2.2/o'
(cd lsp; make all)
make[1]: Entering directory `/tmp/gcl-2.2/lsp'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  arraylib.c
cat  arraylib.data >> arraylib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  assert.c
cat  assert.data >> assert.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  defmacro.c
cat  defmacro.data >> defmacro.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  defstruct.c
cat  defstruct.data >> defstruct.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  describe.c
cat  describe.data >> describe.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  evalmacros.c
cat  evalmacros.data >> evalmacros.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  iolib.c
cat  iolib.data >> iolib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  listlib.c
cat  listlib.data >> listlib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  mislib.c
cat  mislib.data >> mislib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  module.c
cat  module.data >> module.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  numlib.c
cat  numlib.data >> numlib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  packlib.c
cat  packlib.data >> packlib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  predlib.c
cat  predlib.data >> predlib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  seq.c
cat  seq.data >> seq.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  seqlib.c
cat  seqlib.data >> seqlib.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  setf.c
cat  setf.data >> setf.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  top.c
cat  top.data >> top.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  trace.c
cat  trace.data >> trace.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  sloop.c
cat  sloop.data >> sloop.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  debug.c
cat  debug.data >> debug.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  info.c
cat  info.data >> info.o
make[1]: Leaving directory `/tmp/gcl-2.2/lsp'
(cd cmpnew; make all)
make[1]: Entering directory `/tmp/gcl-2.2/cmpnew'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpbind.c
cat  cmpbind.data >> cmpbind.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpblock.c
cat  cmpblock.data >> cmpblock.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpcall.c
cat  cmpcall.data >> cmpcall.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpcatch.c
cat  cmpcatch.data >> cmpcatch.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpenv.c
cat  cmpenv.data >> cmpenv.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpeval.c
cat  cmpeval.data >> cmpeval.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpflet.c
cat  cmpflet.data >> cmpflet.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpfun.c
cat  cmpfun.data >> cmpfun.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpif.c
cat  cmpif.data >> cmpif.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpinline.c
cat  cmpinline.data >> cmpinline.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmplabel.c
cat  cmplabel.data >> cmplabel.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmplam.c
cat  cmplam.data >> cmplam.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmplet.c
cat  cmplet.data >> cmplet.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmploc.c
cat  cmploc.data >> cmploc.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpmap.c
cat  cmpmap.data >> cmpmap.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpmulti.c
cat  cmpmulti.data >> cmpmulti.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpspecial.c
cat  cmpspecial.data >> cmpspecial.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmptag.c
cat  cmptag.data >> cmptag.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmptop.c
cat  cmptop.data >> cmptop.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmptype.c
cat  cmptype.data >> cmptype.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmputil.c
cat  cmputil.data >> cmputil.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpvar.c
cat  cmpvar.data >> cmpvar.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpvs.c
cat  cmpvs.data >> cmpvs.o
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -O  -c -O -I../h  cmpwt.c
cat  cmpwt.data >> cmpwt.o
make[1]: Leaving directory `/tmp/gcl-2.2/cmpnew'
(cd unixport; make saved_gcl)
make[1]: Entering directory `/tmp/gcl-2.2/unixport'
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -c  -I../h sys_gcl.c
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -static   -o raw_gcl ../o/main.o ../o/alloc.o ../o/gbc.o ../o/bitop.o ../o/typespec.o ../o/eval.o ../o/macros.o ../o/lex.o ../o/bds.o ../o/frame.o ../o/predicate.o ../o/reference.o ../o/assignment.o ../o/bind.o ../o/let.o ../o/conditional.o ../o/block.o ../o/iteration.o ../o/mapfun.o ../o/prog.o ../o/multival.o ../o/catch.o ../o/symbol.o ../o/cfun.o ../o/cmpaux.o ../o/package.o ../o/big.o ../o/number.o ../o/num_pred.o ../o/num_comp.o ../o/num_arith.o ../o/num_sfun.o ../o/num_co.o ../o/num_log.o ../o/num_rand.o ../o/earith.o ../o/character.o  ../o/sequence.o ../o/list.o ../o/hash.o ../o/array.o ../o/string.o ../o/regexpr.o ../o/structure.o ../o/toplevel.o ../o/file.o ../o/read.o ../o/backq.o ../o/print.o ../o/format.o ../o/pathname.o ../o/unixfsys.o ../o/unixfasl.o ../o/error.o ../o/unixtime.o ../o/unixsys.o ../o/unixsave.o ../o/funlink.o ../o/fat_string.o ../o/run_process.o ../o/nfunlink.o ../o/usig.!
 o !
../o/usig2.o ../o/utils.o ../o/makefun.o ../o/sockets.o  ../o/clxsocket.o ../o/init_pari.o ../o/new_init.o ../mp/mpi-386d.o   ../mp/libmport.a ../o/sfasl.o  ../lsp/defmacro.o ../lsp/evalmacros.o ../lsp/top.o ../lsp/module.o ../lsp/predlib.o ../lsp/setf.o ../lsp/arraylib.o ../lsp/assert.o ../lsp/defstruct.o ../lsp/describe.o ../lsp/iolib.o ../lsp/listlib.o ../lsp/mislib.o ../lsp/numlib.o ../lsp/packlib.o ../lsp/seq.o ../lsp/seqlib.o ../lsp/trace.o ../lsp/sloop.o  ../lsp/debug.o ../lsp/info.o ../cmpnew/cmpinline.o ../cmpnew/cmputil.o ../cmpnew/cmptype.o ../cmpnew/cmpbind.o ../cmpnew/cmpblock.o ../cmpnew/cmpcall.o ../cmpnew/cmpcatch.o ../cmpnew/cmpenv.o ../cmpnew/cmpeval.o ../cmpnew/cmpflet.o ../cmpnew/cmpfun.o ../cmpnew/cmpif.o ../cmpnew/cmplabel.o ../cmpnew/cmplam.o ../cmpnew/cmplet.o ../cmpnew/cmploc.o ../cmpnew/cmpmap.o ../cmpnew/cmpmulti.o ../cmpnew/cmpspecial.o ../cmpnew/cmptag.o ../cmpnew/cmptop.o ../cmpnew/cmpvar.o ../cmpnew/cmpvs.o ../cmpnew/cmpwt.o  sys_gcl.o -lc	 -lm!
  !
  ../o/gcllib.a
gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char -static   -I../h -o rsym rsym.c 
../xbin/if-exists /usr/u9/wfs/schelter "../xbin/inc-version"
../xbin/if-exists saved_gcl "rm -f saved_gcl"
cat init_gcl.lsp | \
sed -e "s"DATE"Version(`cat ../majvers`.`cat ../minvers`) `date`g" \
-e 'ssaved_gclsaved_gclg' \
-e 'slinks t)links t)(setq compiler::*cc* "gcc -pipe -fwritable-strings  -DVOL=volatile -I/tmp/gcl-2.2/o -fsigned-char")(si::build-symbol-table)g' \
-e "sGCLDIR/tmp/gcl-2.2g" \
-e "s(defun lisp-imp(setq si::*gcl-version* `cat ../minvers` si::*gcl-major-version* `cat ../majvers`)(defun lisp-impg" \
-e "s:GCL-1:GCL-"`cat ../majvers`":g" 	> foo 
../unixport/raw_gcl ../unixport/ -libdir /tmp/gcl-2.2/ < foo
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
Initializing ../lsp/evalmacros.o
Initializing ../lsp/top.o
Initializing ../lsp/module.o
loading ../lsp/autoload.lsp

>#<"COMPILER" package>

COMPILER>#<"SYSTEM" package>

SYSTEM>*COMMAND-ARGS*

SYSTEM>#<"USER" package>

>#<"LISP" package>

LISP>#<"SLOOP" package>

SLOOP>6

SLOOP>#<"USER" package>

>Loading ../gcl-tk/tk-package.lsp
Finished loading ../gcl-tk/tk-package.lsp
T

>Initializing ../lsp/predlib.o
Initializing ../lsp/setf.o
Initializing ../lsp/arraylib.o
Initializing ../lsp/assert.o
Initializing ../lsp/defstruct.o
Initializing ../lsp/describe.o
Initializing ../lsp/iolib.o
Initializing ../lsp/listlib.o
Initializing ../lsp/mislib.o
Initializing ../lsp/numlib.o
Initializing ../lsp/packlib.o
Initializing ../lsp/seq.o
Initializing ../lsp/seqlib.o
Initializing ../lsp/trace.o
Initializing ../lsp/sloop.o
Initializing ../cmpnew/cmpinline.o
Initializing ../cmpnew/cmputil.o
Initializing ../lsp/debug.o
Initializing ../lsp/info.o
Initializing ../cmpnew/cmptype.o
Initializing ../cmpnew/cmpbind.o
Initializing ../cmpnew/cmpblock.o
Initializing ../cmpnew/cmpcall.o
Initializing ../cmpnew/cmpcatch.o
Initializing ../cmpnew/cmpenv.o
Initializing ../cmpnew/cmpeval.o
Initializing ../cmpnew/cmpflet.o
Initializing ../cmpnew/cmpfun.o
Initializing ../cmpnew/cmpif.o
Initializing ../cmpnew/cmplabel.o
Initializing ../cmpnew/cmplam.o
Initializing ../cmpnew/cmplet.o
Initializing ../cmpnew/cmploc.o
Initializing ../cmpnew/cmpmap.o
Initializing ../cmpnew/cmpmulti.o
Initializing ../cmpnew/cmpspecial.o
Initializing ../cmpnew/cmptag.o
Initializing ../cmpnew/cmptop.o
Initializing ../cmpnew/cmpvar.o
Initializing ../cmpnew/cmpvs.o
Initializing ../cmpnew/cmpwt.o
Building symbol table for ../unixport/raw_gcl ..
Loading ../cmpnew/cmpmain.lsp
Warning: COMPILE-FILE is being redefined.
Warning: COMPILE is being redefined.
Warning: DISASSEMBLE is being redefined.
Finished loading ../cmpnew/cmpmain.lsp
Loading ../cmpnew/lfun_list.lsp
Finished loading ../cmpnew/lfun_list.lsp
Loading ../cmpnew/cmpopt.lsp
Finished loading ../cmpnew/cmpopt.lsp
Loading ../lsp/auto.lsp
Finished loading ../lsp/auto.lsp
Warning: LISP-IMPLEMENTATION-VERSION is being redefined.
Can't mmap (saved_gcl): errno 22
make[1]: *** [saved_gcl] Error 1
make[1]: Leaving directory `/tmp/gcl-2.2/unixport'
make: *** [all] Error 2

From owner-gcl  Wed Oct  9 17:34:33 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id RAA26142; Wed, 9 Oct 1996 17:18:58 -0500
Received: from univie.ac.at by cli.com (SMI-8.6/SMI-SVR4)
	id RAA26136; Wed, 9 Oct 1996 17:18:53 -0500
Received: by univie.ac.at (NX5.67c/NX3.0M)
	id AA00312; Thu, 10 Oct 96 00:18:43 +0200
Date: Thu, 10 Oct 96 00:18:43 +0200
Message-Id: <9610092218.AA00312@univie.ac.at>
Received: by NeXT.Mailer (1.87.1)
Received: by NeXT Mailer (1.87.1)
To: gcl@cli.com
Subject: gcl 2.2 on dec alpha
From: a9050756@unet.univie.ac.at (Mike Alexander)
Sender: owner-gcl
Precedence: bulk
content-length: 901


Greetings,
I'm new to this list and to lisp and would like to compile gcl 2.2 on a dec  
alpha (unix 3.2). no machine def for osf or so is included, but it has been  
mentioned several times in the archives of this list and in the doc to work on  
it. Any hints would be appreciated. THX

Best Regards,

Michael Alexander
Doctoral Student at the University of Vienna

-----BEGIN PGP PUBLIC KEY BLOCK-----
Version: 2.6.3i

mQCNAzIhxYwAAAEEALtfkL/X6GuZpEECWnmkmbqqtGwNalb94Om82VUiBE8iU1OX
2e5WXQGsq1oManSqVQn3TpVo7VE9pMJr5vITAmkEA6szGRt5zbK5u/dIqhLnJnRE
sVpiY61Xw6RvQKoXX7LSqOYSCqvIiY8GJ5gRpiKQNPZVuJRqbLipmU0fPqylAAUR
tDFNaWNoYWVsIEYuIEFsZXhhbmRlciA8YTkwNTA3NTZAdW5ldC51bml2aWUuYWMu
YXQ+iQCVAwUQMiHFjbipmU0fPqylAQGy4QP+LjB6lZXVYFZDpoVB7j8AGvkghSsr
XicZapXPmsFX6xpt+S29EF4DGoDJIDq6VLJMZ2rQ1gFfEvvWzL7ekZ3orhLSpJoO
WWRZF1MNZVWBNhzxBcdK2T6yrx4cBwQX7t299Ho0y1Go69VE9e3LN8YInIXoQYp5
bc4M0u16GqmV5eI=
=5l49

From owner-gcl  Sat Oct 12 05:09:16 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id FAA17026; Sat, 12 Oct 1996 05:02:08 -0500
Received: from acid.base.com by cli.com (SMI-8.6/SMI-SVR4)
	id FAA17020; Sat, 12 Oct 1996 05:02:02 -0500
Received: from [199.79.128.66] (phoenix.base.com [199.79.128.66]) by acid.base.com (8.6.12/8.6.12) with SMTP id DAA17470; Sat, 12 Oct 1996 03:00:40 -0700
X-Sender: kr@acid.base.com (Unverified)
Message-Id: <v02110103ae8515a76379@[199.79.128.66]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: srialpop\r\e%, 12 Oct 1996 03:01:31 -0800
To: Giuseppe Attardi <attardi@DI.Unipi.IT>
From: kr@base.com (kr)
Subject: Re: thread support in GCL?
Cc: gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 805

At 13:18 10/4/96, Giuseppe Attardi wrote:
>ECoLisp is a KCL derivative which includes thread support.
>You can get from:
>
> - ftp.icsi.berkeley.edu [128.32.201.7], directory /pub/ai/ecl
> - ftp.di.unipi.it [131.114.4.36], directory /pub/lang/lisp
>
>-- Beppe

how different are either ECL or GCL from the original KCL ?

would it make sense to merge these diverging lines of development back into
one ? as not all that much development effort seems to be currently spent
on enhancing the KCL line of lisps, it would make sense to make sure that
this precious resource is at least spent only on one source tree, not on
two competing ones.

would it be technically very difficult to extract the best features from
ECL and graft them into GCL (or the other way around ?) ?


Greetings
Markus Krummenacker



From owner-gcl  Sat Oct 12 12:03:12 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA18073; Sat, 12 Oct 1996 11:59:08 -0500
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id LAA18067; Sat, 12 Oct 1996 11:59:05 -0500
Received: from orasis.vis.toronto.edu ([128.100.3.1]) by yonge.cs.toronto.edu with SMTP id <86527>; Sat, 12 Oct 1996 12:58:58 -0400
Received: by orasis.vis.toronto.edu id <16157>; Sat, 12 Oct 1996 12:58:50 -0400
From: Richard Mann <mann@vis.toronto.edu>
To: gcl@cli.com
Subject: Questions about foreign function interface for GCL
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Oct12.125850edt.16157@orasis.vis.toronto.edu>
Date: 	Sat, 12 Oct 1996 12:58:46 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 646

I have some questions about the foreign function interface for GCL.

1. How do I build an interface to a _separately compiled_ C object or library?
I know I have to use "defentry", but how do I load compiled C code?  (All of
the examples I saw included the C source code into a LISP program.)

2. Is there a macro, like the Allegro DEF-C-TYPE, that allows definition of C
structs directly in LISP?  If not, how hard would it be to write this?  I
think this would be much easier than defining all the struct accessors in C
(like XGCL does, for example).

3. Does anyone have a set of bindings for OPENGL/MESA?

Thanks for any help...
    Richard.

From owner-gcl  Sat Oct 12 22:31:00 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id WAA19690; Sat, 12 Oct 1996 22:20:18 -0500
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id WAA19684; Sat, 12 Oct 1996 22:20:11 -0500
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id EAA27433; Sun, 13 Oct 1996 04:20:06 +0100
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Sun, 13 Oct 96 04:19:03 BST
Date: Sun, 13 Oct 96 04:19:00 BST
Message-Id: <21607.9610130319@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: Questions about foreign function interface for GCL
To: Mann@cs.toronto.edu, gcl@cli.com
In-Reply-To: Richard Mann's message of Sat, 12 Oct 1996 12:58:46 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 670

> I have some questions about the foreign function interface for GCL.

> 1. How do I build an interface to a _separately compiled_ C object or 
> library?

> I know I have to use "defentry", but how do I load compiled C code?  (All of
> the examples I saw included the C source code into a LISP program.)

In Unix systems, you do it by calling (si:faslink object libr) instead
of load, e.g.

  (si:faslink "x.o" "-lc")

> 2. Is there a macro, like the Allegro DEF-C-TYPE, that allows definition of C
> structs directly in LISP? 

I don't know of such a macro, but someone may have written one.

(N.B. I'm still using GCL 1.1.  Later versions may be different.)

-- jeff

From owner-gcl  Sat Oct 12 23:38:55 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id XAA19876; Sat, 12 Oct 1996 23:29:30 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id XAA19870; Sat, 12 Oct 1996 23:29:27 -0500
Date: Sat, 12 Oct 96 23:28:38 CDT
Posted-Date: Sat, 12 Oct 96 23:28:38 CDT
Message-Id: <9610130428.AA25089@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA25089; Sat, 12 Oct 96 23:28:38 CDT
From: Bill Schelter <wfs@math.utexas.edu>
To: Mann@cs.toronto.edu
Cc: gcl@cli.com
In-Reply-To: <96Oct12.125850edt.16157@orasis.vis.toronto.edu> (message from
	Richard Mann on Sat, 12 Oct 1996 12:58:46 -0400)
Subject: Re: Questions about foreign function interface for GCL
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl
Precedence: bulk
content-length: 747


  1. How do I build an interface to a _separately compiled_ C object or library?
  I know I have to use "defentry", but how do I load compiled C code?  (All of

The only portable way to do it is to link it in when building a lisp
image.  On some you can use dlopen (eg dec alpha).  That code could
be used to allow dlopen and dlsym on other systems where they are
available.

  2. Is there a macro, like the Allegro DEF-C-TYPE, that allows definition of C
  structs directly in LISP?  If not, how hard would it be to write this?  I
  think this would be much easier than defining all the struct accessors in C
  (like XGCL does, for example).

the file misc/rusage.lsp
gives an example of defining a struct which parallels the c structure.







From owner-gcl  Sun Oct 13 00:13:35 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA20514; Sun, 13 Oct 1996 00:04:52 -0500
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id AAA20507; Sun, 13 Oct 1996 00:04:49 -0500
Received: from orasis.vis.toronto.edu ([128.100.3.1]) by yonge.cs.toronto.edu with SMTP id <86480>; Sun, 13 Oct 1996 01:04:40 -0400
Received: by orasis.vis.toronto.edu id <16157>; Sun, 13 Oct 1996 01:04:25 -0400
From: Richard Mann <mann@vis.toronto.edu>
To: wfs@math.utexas.edu
CC: gcl@cli.com
In-reply-to: <9610130428.AA25089@marie.ma.utexas.edu> (message from Bill Schelter on Sun, 13 Oct 1996 00:28:38 -0400)
Subject: Re: Questions about foreign function interface for GCL
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Oct13.010425edt.16157@orasis.vis.toronto.edu>
Date: 	Sun, 13 Oct 1996 01:04:17 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 88

Dear Bill,

Would you be interested in a set of bindings for OpenGl/Mesa?

    Richard.

From owner-gcl  Sun Oct 13 04:29:35 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id EAA21662; Sun, 13 Oct 1996 04:19:51 -0500
Received: from mailserver.di.unipi.it by cli.com (SMI-8.6/SMI-SVR4)
	id EAA21656; Sun, 13 Oct 1996 04:19:47 -0500
Organization:  Dipartimento di Informatica di Pisa - Italy
Received: from omega.di.unipi.it (omega.di.unipi.it [131.114.4.68]) by mailserver.di.unipi.it (8.7.5/8.7.3) with ESMTP id LAA27823; Sun, 13 Oct 1996 11:19:34 +0200 (MET DST)
From: Giuseppe Attardi <attardi@DI.Unipi.IT>
Received: (attardi@localhost) by omega.di.unipi.it (8.6.12/8.6.12) id LAA01262; Sun, 13 Oct 1996 11:19:33 +0200
Date: Sun, 13 Oct 1996 11:19:33 +0200
Message-Id: <199610130919.LAA01262@omega.di.unipi.it>
To: kr@base.com
CC: gcl@cli.com
In-reply-to: <v02110103ae8515a76379@[199.79.128.66]> (kr@base.com)
Subject: Re: thread support in GCL?
Sender: owner-gcl
Precedence: bulk
content-length: 172


I think I have incorporated in ECL all significant improvements from AKCL/GCL.
This is all I can do, after having proposed to Schelter to merge the two
systems.

-- Beppe

From owner-gcl  Sun Oct 13 16:16:11 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id QAA04135; Sun, 13 Oct 1996 16:08:16 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id QAA04129; Sun, 13 Oct 1996 16:08:12 -0500
Date: Sun, 13 Oct 96 16:07:29 CDT
Posted-Date: Sun, 13 Oct 96 16:07:29 CDT
Message-Id: <9610132107.AA28530@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA28530; Sun, 13 Oct 96 16:07:29 CDT
From: Bill Schelter <wfs@math.utexas.edu>
To: gcl@cli.com
Cc: kr@base.com, attardi@di.unipi.it
In-Reply-To: <199610130919.LAA01262@omega.di.unipi.it> (message from Giuseppe
	Attardi on Sun, 13 Oct 1996 11:19:33 +0200)
Subject: Re: thread support in GCL?
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl
Precedence: bulk
content-length: 575


ECL and GCL have different function calling conventions, gcl contains
an interface to tcl/tk via sockets and interrupts, while ecl has a
different interface i believe.    Both contain the changes made some
time ago in AKCL to allow garbage collecting the C stack, and to thus
allow faster locals and faster argument passing, as well as the
changes to allow faster loading of object files, etc.  

While attardi has his own specific ideas, i certainly also have mine,
and i think we both like to try our own ideas--which is fairly normal.

Bill Schelter






















From owner-gcl  Sun Oct 13 21:29:57 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA05021; Sun, 13 Oct 1996 21:24:31 -0500
Received: from zsp.com by cli.com (SMI-8.6/SMI-SVR4)
	id VAA05015; Sun, 13 Oct 1996 21:24:29 -0500
Received: from engmaster.zsp.com (engmaster [192.168.1.250]) by zsp.com (8.6.12/8.6.10) with ESMTP id TAA01713 for <gcl@cli.com>; Sun, 13 Oct 1996 19:28:55 -0700
Received: from rubicon.zsp.com (rubicon [192.168.1.2]) by engmaster.zsp.com (8.7.1/8.6.9) with ESMTP id SAA06669; Sun, 13 Oct 1996 18:54:56 -0700
Received: (from ttn@localhost) by rubicon.zsp.com (8.7.1/8.6.9) id TAA27206; Sun, 13 Oct 1996 19:30:00 -0700
Date: Sun, 13 Oct 1996 19:30:00 -0700
Message-Id: <199610140230.TAA27206@rubicon.zsp.com>
From: thi <ttn@zsp.com>
To: gcl@cli.com
Cc: raymondh@zsp.com
In-reply-to: <21607.9610130319@subnode.aiai.ed.ac.uk> (message from Jeff
	Dalton on Sun, 13 Oct 96 04:19:00 BST)
Subject: Re: Questions about foreign function interface for GCL
Sender: owner-gcl
Precedence: bulk
content-length: 476

>>>>> "Jeff" == Jeff Dalton <jeff@aiai.ed.ac.uk> writes:

    Jeff> In Unix systems, you do it by calling (si:faslink object libr)
    Jeff> instead of load, e.g.

    Jeff>   (si:faslink "x.o" "-lc")

I tried this on a Linux system and got

   >(si::faslink "useless.o" "-lc")
   
   Error: faslink() not supported for ELF yet
   Error signalled by EVAL.
   Broken at SYSTEM::BREAK-LEVEL.  Type :H for Help.

Is there any estimate on when ELF support would be included?

thi

From owner-gcl  Wed Oct 16 00:40:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA00180; Wed, 16 Oct 1996 00:35:39 -0500
Received: from acid.base.com by cli.com (SMI-8.6/SMI-SVR4)
	id AAA00161; Wed, 16 Oct 1996 00:35:35 -0500
Received: from [199.79.128.66] (phoenix.base.com [199.79.128.66]) by acid.base.com (8.6.12/8.6.12) with SMTP id WAA27736; Tue, 15 Oct 1996 22:34:54 -0700
X-Sender: kr@acid.base.com
Message-Id: <v02110100ae8a2fb444c0@[199.79.128.66]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: kr\r\essword:, 15 Oct 1996 22:35:03 -0800
To: wfs@fireant.ma.utexas.edu, attardi@di.unipi.it
From: kr@base.com (kr)
Subject: Re: thread support in GCL? / divergence
Cc: gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 967

At 16:07 10/13/96, Bill Schelter wrote:
>ECL and GCL have different function calling conventions, gcl contains
>an interface to tcl/tk via sockets and interrupts, while ecl has a
>different interface i believe.

>While attardi has his own specific ideas, i certainly also have mine,
>and i think we both like to try our own ideas--which is fairly normal.

could you both please quickly outline the ideas you have for further
development, so that we get at least some kind of a feeling in which
directions ecl and gcl will be diverging ?   :-)

are the underlying differences so irreconcilable that it would be
impossible for all of that to co-exist in one merged source tree ? maybe it
might be possible to select with switches at build time whether one would
like to get a lisp more like ecl or more like gcl, mixing freely from the
available ideas that have been implemented. this probably would avoid quite
some duplicated effort.

Greetings
Markus Krummenacker



From owner-gcl  Wed Oct 16 03:34:05 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA11753; Wed, 16 Oct 1996 03:31:36 -0500
Received: from VNET.IBM.COM by cli.com (SMI-8.6/SMI-SVR4)
	id DAA11747; Wed, 16 Oct 1996 03:31:33 -0500
Received: from HAIFA by VNET.IBM.COM (IBM VM SMTP V2R3) with BSMTP id 4919;
   Wed, 16 Oct 96 04:31:29 EDT
Received: by HAIFA (XAGENTA 3.0) id 2324; Wed, 16 Oct 1996 10:31:42 +0200 
Received: from rs250-29.haifa.ibm.com by mail.haifa.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA47956; Wed, 16 Oct 1996 10:33:02 +0200
Received: by rs250-29 (AIX 3.2/UCB 5.64) id AA37504; Wed, 16 Oct 1996 10:33:01 +0200
Message-Id: <9610160833.AA37504@rs250-29>
Subject: [Q] Inlining in GCL 2.2
To: gcl@cli.com
Date: Wed, 16 Oct 1996 10:33:00 +0200 (IST)
From: <leonid@VNET.IBM.COM> (Leonid Gluhovsky)
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 1169



Hello,

How is it possible to get GCL compiler to inline user-defined functions?
For example, foo in this example is not inlined in GCL 2.2:

    (declaim (inline foo))
    (declaim (ftype (function (fixnum) fixnum) foo))

    (defun foo (k)
      (declare (type fixnum k))
      (+ k 3))

    (defun bar (n)
      (declare (type fixnum n))
      (* (foo (+ 1 n)) 5))

Generated code:

    /*  local entry for function FOO    */

    static int LI1(V2)

    int V2;
    {    VMB1 VMS1 VMV1
    TTL:;
            V3 = CMPmake_fixnum(V2);
            {int V4 = fix(number_plus(V3,small_fixnum(3)));
            VMR1(V4)}
    }
    /*  function definition for BAR     */

    static L2()
    {register object *base=vs_base;
            register object *sup=base+VM2; VC2
            vs_check;
            {int V5;
            V5=fix(base[0]);
            vs_top=sup;
    TTL:;
            V6 = CMPmake_fixnum((*(LnkLI0))((1)+(V5)));
            base[1]= number_times(V6,small_fixnum(5));
            vs_top=(vs_base=base+1)+1;
            return;
            }
    }

Is it possible by adding more declarations to eliminate the call to foo
enirely?

Thank you.

Leonid


From owner-gcl  Wed Oct 16 04:20:45 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id EAA11914; Wed, 16 Oct 1996 04:16:18 -0500
Received: from crisv2.univ-pau.fr by cli.com (SMI-8.6/SMI-SVR4)
	id EAA11908; Wed, 16 Oct 1996 04:16:13 -0500
Received: by crisv2.univ-pau.fr; Wed, 16 Oct 1996 11:16:09 +0200
From: Michel Beheregaray <Michel.Beheregaray@univ-pau.fr>
Message-Id: <199610160916.LAA15576@crisv2.univ-pau.fr>
Subject: Compiling GCL 2.2 on AIX 4.1.4
To: gcl@cli.com
Date: Wed, 16 Oct 1996 11:16:09 +0200 (MET DST)
X-Mailer: ELM [version 2.4ME+ PL16 (25)]
MIME-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 404

Hello,
 did anyone compile gcl 2.2 on AIX 4.1.4 ? I obtain many errors and the
compilation fails.

Regards,
-- 
Michel BEHEREGARAY                       Email : Michel.Beheregaray@univ-pau.fr
Centre Informatique de l'Universite de Pau et des Pays de l'Adour (CIUPPA)
Bat. I.F.R.  -  Rue Jules Ferry  -  64000 PAU  -  FRANCE
URL:http://www.univ-pau.fr/~michel/      Tel.: +33 59722012 - FAX: +33 59722019

From owner-gcl  Wed Oct 16 06:19:41 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id GAA12245; Wed, 16 Oct 1996 06:16:24 -0500
Received: from spa.kuis.kyoto-u.ac.jp by cli.com (SMI-8.6/SMI-SVR4)
	id GAA12239; Wed, 16 Oct 1996 06:16:15 -0500
Received: from beppu.kuis.kyoto-u.ac.jp (beppu.kuis.kyoto-u.ac.jp [130.54.22.141]) by spa.kuis.kyoto-u.ac.jp (8.7.5+2.6Wbeta6/3.4W4spa) with ESMTP id UAA12636; Wed, 16 Oct 1996 20:15:45 +0900 (JST)
Received: (from yuasa@localhost) by beppu.kuis.kyoto-u.ac.jp (8.7.5+2.6Wbeta6/3.4W4-lab4kuis) id UAA10508; Wed, 16 Oct 1996 20:16:11 +0900 (JST)
Date: Wed, 16 Oct 1996 20:16:11 +0900 (JST)
From: YUASA Taiichi <yuasa@kuis.kyoto-u.ac.jp>
Message-Id: <199610161116.UAA10508@beppu.kuis.kyoto-u.ac.jp>
To: leonid@VNET.IBM.COM
Subject: RE: [Q] Inlining in GCL 2.2
Cc: gcl@cli.com
Sender: owner-gcl
Precedence: bulk
content-length: 203

>> Is it possible by adding more declarations to eliminate the call to foo
>> enirely?

For the original KCL, the right declaration is:

	(proclaim '(inline foo))

Doesn't this work for GCL?

-- Taiichi

From owner-gcl  Wed Oct 16 08:36:33 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id IAA12722; Wed, 16 Oct 1996 08:35:31 -0500
Received: from VNET.IBM.COM by cli.com (SMI-8.6/SMI-SVR4)
	id IAA12716; Wed, 16 Oct 1996 08:35:27 -0500
Received: from HAIFA by VNET.IBM.COM (IBM VM SMTP V2R3) with BSMTP id 1898;
   Wed, 16 Oct 96 09:35:14 EDT
Received: by HAIFA (XAGENTA 3.0) id 2358; Wed, 16 Oct 1996 15:34:36 +0200 
Received: from rs250-29.haifa.ibm.com by mail.haifa.ibm.com (AIX 3.2/UCB 5.64/4.03)
          id AA56835; Wed, 16 Oct 1996 15:35:47 +0200
Received: by rs250-29 (AIX 3.2/UCB 5.64) id AA32546; Wed, 16 Oct 1996 15:35:44 +0200
Message-Id: <9610161335.AA32546@rs250-29>
Subject: Re: [Q] Inlining in GCL 2.2
To: gcl@cli.com
Date: Wed, 16 Oct 1996 15:35:43 +0200 (IST)
From: <leonid@VNET.IBM.COM> (Leonid Gluhovsky)
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 822



>> How is it possible to get GCL compiler to inline user-defined functions?
>> For example, foo in this example is not inlined in GCL 2.2:
>
>>     (declaim (inline foo))
>>     (declaim (ftype (function (fixnum) fixnum) foo))

Arthur Flatau:
> I have never heard of declaim.  Do you mean proclaim?  I thought
> proclaim worked as you want in GCL, although I have not tried it
> recently.

YUASA Taiichi:
> For the original KCL, the right declaration is:
>
>       (proclaim '(inline foo))
>
> Doesn't this work for GCL?

No, it doesn't seem to work with proclaim either:

    (proclaim '(inline foo))
    (proclaim '(ftype (function (fixnum) fixnum) foo))

    (defun foo (k)
      (declare (type fixnum k))
      (+ k 3))

    (defun bar (n)
      (declare (type fixnum n))
      (* (foo (+ 1 n)) 5))

Cheers,
Leonid


From owner-gcl  Wed Oct 16 11:54:28 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA13636; Wed, 16 Oct 1996 11:49:51 -0500
Received: from life.ai.mit.edu by cli.com (SMI-8.6/SMI-SVR4)
	id LAA13630; Wed, 16 Oct 1996 11:49:48 -0500
Received: from crystal-pier (viola@crystal-pier.ai.mit.edu [128.52.37.27]) by life.ai.mit.edu (8.7.5/8.7.5AI/life.ai.mit.edu:1.6) with SMTP id MAA09011; Wed, 16 Oct 1996 12:49:46 -0400 (EDT)
Received: by crystal-pier (8.6.12/AI-4.10) id MAA24585; Wed, 16 Oct 1996 12:49:44 -0400
Date: Wed, 16 Oct 1996 12:49:44 -0400
Message-Id: <199610161649.MAA24585@crystal-pier>
From: "Paul A. Viola" <viola@ai.mit.edu>
To: leonid@VNET.IBM.COM
CC: gcl@cli.com
In-reply-to: <9610160833.AA37504@rs250-29> (message from Leonid Gluhovsky on
	Wed, 16 Oct 1996 10:33:00 +0200 (IST))
Subject: Re: [Q] Inlining in GCL 2.2
Sender: owner-gcl
Precedence: bulk
content-length: 615


Add

(proclaim '(optimize (speed 3) (safety 0)
	    (space 0)
	    (compilation-speed 0)))


To the top of the file.  This often helps when GCL is reluctant to
optimize.

Paul


From: <leonid@VNET.IBM.COM> (Leonid Gluhovsky)
|
|
|Hello,
|
|How is it possible to get GCL compiler to inline user-defined functions?
|For example, foo in this example is not inlined in GCL 2.2:
|
|    (declaim (inline foo))
|    (declaim (ftype (function (fixnum) fixnum) foo))
|
|    (defun foo (k)
|      (declare (type fixnum k))
|      (+ k 3))
|
|    (defun bar (n)
|      (declare (type fixnum n))
|      (* (foo (+ 1 n)) 5))
|

From owner-gcl  Wed Oct 16 11:54:28 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id LAA13620; Wed, 16 Oct 1996 11:48:01 -0500
Received: from amber.ccs.neu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id LAA13614; Wed, 16 Oct 1996 11:47:57 -0500
Received: from highpoint.ccs.neu.edu (gene@highpoint.ccs.neu.edu [129.10.112.126])
	by amber.ccs.neu.edu (8.7.5/8.7.3) with ESMTP id MAA08932; Wed, 16 Oct 1996 12:47:51 -0400 (EDT)
From: Gene Cooperman <gene@ccs.neu.edu>
Received: (gene@localhost)
	by highpoint.ccs.neu.edu (8.6.8/8.6.4) id MAA14767; Wed, 16 Oct 1996 12:47:51 -0400
Date: Wed, 16 Oct 1996 12:47:51 -0400
Message-Id: <199610161647.MAA14767@highpoint.ccs.neu.edu>
To: Michel.Beheregaray@univ-pau.fr, gcl@cli.com
Subject: Re:  Compiling GCL 2.2 on AIX 4.1.4
Cc: eowmob@exp-math.uni-essen.de
Sender: owner-gcl
Precedence: bulk
content-length: 17687

Michael Weller had also had problems compiling GCL 2.2 on AIX.  He found some
bug fixes and created a patch that worked at his site.  I pass on his
fix below.  Please tell us if this patch also works at your site.
Michael had sent the patch to Bill Schelter, but it may require
further testing, and so I don't know if it has been added to the
current GCL yet.					- Gene Cooperman
---

Date: Mon, 4 Mar 1996 19:48:23 +0100 (MEZ)
From: Michael Weller <eowmob@exp-math.uni-essen.de>
Subject: gcl fixed (as far as I can tell)
To: Bill Schelter <wfs@fireant.ma.utexas.edu>
Cc: Gene Cooperman <gene@ccs.neu.edu>

Well, sorry for the silence. I was busy with some paperworks and also
debugged it a bit further.

As I mentioned I had to modify alloc.c a bit further to inhibit executing
gbc at a later point.

Initialization went on quite happy then. However, at a much later point
gbc was suddenly called.

Now, after digging in deeper I found a real new specific RS problem.

ulimit(3) is used to find out the configured maximum break value.
(actually #include'ing <ulimit.h> and using ulimit(GET_DATALIM) would appear
better to me)

Now, on all machines where our old akcl installations suddenly fail the
default for ulimit(3) is unlimited. It appears that ulimit returns
(signed!!) 0x9fffffff in this case. real_maxpage ends up negative and
causes some confusion in gcl (and probably akcl, I didn't check).

I made a fix in rios.h

After finding that one I doublechecked that it is not related to the
other fixes in alloc.c. They are still required.

Appended is a small tar with my rios.h and alloc.c.
If you prefer a patch file just drop me a note.

With them I can compile and get a working gcl.

I didn't check it very thoroughly (just entered some lisp commands I 
happened to know, I'm no lisp coder at all). but it seems to work for me 
up to now.

Michael.

(eowmob@exp-math.uni-essen.de or  eowmob@pollux.exp-math.uni-essen.de
Please do not use my vm or de0hrz1a accounts anymore. In case of real
problems reaching me try mat42b@aixrs1.hrz.uni-essen.de instead.)

-----------------------------------------------------------------------
begin 644 gcl-2.2-fix.tar.gz
M'XL(""HX.S$"`V=C;"TR+C(M9FEX+G1A<@#L6OMOVTB2GE^MOZ+BPR2D0RF2
MG<>,'64@R[2CC2QY)7J2W$Q`4"1E,9%('4G%]GIR?_M]5=VD*#\F>POL`@NL
MD=AD/ZJKJ^OQ535GS](HR1JS'_Z)/ZUF\]6+%_1#L]G<VWNI_K::\A<_K;WF
MJU?4?-EJO7S9?+GW',^MW1=[KWZ@Y@__@I]5EGLI6`F3RT4R>7A<,+WX4SIJ
M,U3^_3?Y^:\@G$9Q2!W'J17/H]YP7+YT>A^JSWM$M?^*8G^^"D+:]O*\,=NN
ME0/.Q[9[WA\.3MP:CRNF'1WUG-YPT.F[QW;'.1_98_H=`S9^,*CH-;:QT+9Y
M\-TQ>_<-NC6,-_-=6H?G)R<?Z]TN!E*M]FR'R)F%64A>&E*V6B[G41A0%!/;
MBAOY62/;V'+7M3\X]N#(/G*/>K\^U'5ZWJ_M/"N%M=4[/!TYZS?;MH_[PXZ#
M`:L8C32V'7=D0VBGG0]GG1.[I'N[`\+<2D-O[BZ\JZ5W$;9I-8\646[LF<^X
M?]S[;_N`!T53,HSJ2'I#FH9)?_Q!1CF/7E/3-'G.!F5J%^,/UH<^<(\Z#L0Y
M,F:A%X2IN3YY[G`/[9/>@`Q_YJ6T8ZHQ#<\-)EX6KJDPT?>](^<MM799>7`(
M/0J2^$E.7^+DDBYGU^3-YY3/0IID`7T-TRQ*XDR?T21//3^/X@L,B#)*IE,^
M\![>DM7%+)=IY=)Y>)73I9=)*Z:MO#EET=]"3),F[N?I<9*3TG5%N"!!E6.D
M_I';'9Z>=@9'AI\L%EX<6`LOBBWV*[D5Q<M5;LT#+[VPDE6.%U-T/UNF49Q/
MRRFT/0^HCG]75._0CQG5'?KQBA_X.<'O;>N6T?SY*BS`;`&)A5E.7A"D8991
MX.4>^5Y,B>^O9!OE2:E3HN;5KO)@S;+KN/?!Y>.UQV/C\V?%?I#0#?BG()Q#
M)PP\FD+<G2=>X/)R5-<T#Q3;K'L\^O%C,M:+T&,"21._Z&F;J>G1-ZLXBRYB
M6%TV2]*<KNB`:`I5#(S'5Q:?53(UI,NT6E9VO8AB\Z"4S_CCJ>MTW>'QL>&[
MN3>9AU9D@L^K@V]JS#>H4S0/C:;)UKXV+,QC<QVQJSHS0-:$P<C?^IO8S?RY
M!R%B`_\[<,=VUP'C[3:)B9L;1,YA\,=_1D'/Y^EXQO!C4WQ#Q:AX`)SFFD:>
MKOR<\!I"\#OFFF:\6I@PU*WJ;.?CF:V)D')I%?6%@:3A!0PG(!C!$AI4U?P-
M[1[`T_19D(5M=UP'+6?#<=%2W?C@M&\/Z*<:9(P5X3"]Z(HN0UH@RM(*#I77
M6"90%W"1)_+JPXAS#UM:)LF<IDDJK5$<Y:Z?!*&ESI1-L6*M=V@$88,V&.]V
M^GVW-^@Y./$;.CX?=,G+VP8_F(90+XSB*2W"19)>U]_XTZ"!_ZX8%6F%8L7%
MS':3/>2.=F,[II<_:M\_T=1Z>&R':9JDQC:O)BS>VNO$"[;U(L:.EYO&O>2L
MNZM`_2TQ-Q,*K86-30<BBVF49J(F$RR!(^`VL?LLA(-,XGTET%[.IK6"UYF$
M%QAV&>4S]6O;%?%L$_P2.$XAI&7"Q$76:K;,B=DK:L59^LN[!TC352QK-AI5
M5\-!83#NPML\%VI:.35_!'6>X&@UX2KKM"\*:BV]P.)VJR&$*YYJ<%2<.=W(
MR>TL\Y3/CMW.+9N"[:U9,7E$Z5_O6.S:SC&N'(9!/.:K-U^%I([]AD1!\G!!
MO_W\J7!)2FE@P6WV#H/.J2T+E!XKT-%`#I$EM\]N'\X]K2@AWGYK?FJWGT1/
M>`[XY986M\1/RO==/4*_[N&5GN1/RKWI]N<\S)5A\H[_\S#F-<QZZQ,]:C_Y
M\,0D!@`BP5M[U8R'<YCT#8Y/L[_ME/JGCDTI(4?:PGYY<ZST.\^^,3<@\TVI
M\!I]PM]TW>->WZ;M-)R[DI_X%9!Y8CO=]T>UM=Y<9RQNU0L\0$$TG88I>\F+
M,+\,JF%.-22K5!XTSL@%Z^67B69888H\26B>0,,+C89+6,Y_\GW8Q&*)Z"'Q
ML\*X/PO]+VY^O0S=)'677CZ+O44((X9P+EQ%FM]";T'W#.:_Z%T\0._L7GKW
MT4%/2<,9?Y^5<DRE7SAY<&]K`CQ\Z?E?&!O>&<,#I)<C$+*&*:/:'H>[WH?C
M\<=UCG$X/BI`[\`&4L8)OR];)#,)8QQJ)2H-CT>V[=JCT1IL@^BX\RN4)O.^
MAH@[>Z(T97]OW.4P=H58>M5N/W_ULR"DL7*!C''GUSI"(3KB8"NPP('=*R\!
M`YV'&D9.W629SP!TWM#N3_1+@2X3-XLEBNY3R[S'Y_V=),1^]FG7K`AI_/^B
M,(';VJ<]P15W=[)[#VO/[Z[UHO8=</2@GUQ/Y#412EQ9G"EC16,I[M*X3759
M^F$#SR6\$9RT9IY3E=N])<O<*P1NCZ@X^PIWW;[=&;G=3O>M#51[@Y,+TUC[
M%,.T%M=(]PPXK.*!4Z*MHG\;F"Q4,9Q;E9_>B4'$S1._0!AAAC<7OBSQO3PT
MR\%4^LT@"L1#%F-4II/X5%(H%I%IWPKTBBQ,L-VAA'!V5#Y<D\[.18GI&BX1
M"&P&HV"J(*\["@&\A=&X`$O#;D<`%+H6WA>X5>!O#[X0(.0:;AM_D$L@46$^
MY]X2IA(B![NF/%J$!3!0<QA?9@)2UYJG>_`G"W/-]6#HV/O4F])ULM*IGK!9
M<>H^"V*Q3),<"(".AH,G#J^CB;*M-E2>I_87!)RGYPQ5%M>47,;T!:<9SF60
MX&M.*_6":QKR+AA5=NY]]:(Y9PWKE2OLU(IXH$ESOA&&C'3WW')\$*7X`]36
MJ&U*>WS2K08R][ASWG<DO3*NK&O+MP*3@]346\USPZS6"^BOY[WN.RXPR,B9
M-8M,Z+GD])Q_7<,'",[AAQF]?@W_HY.I-,Q74.H@^IK-]]3L"-!1B</%@7Q>
M+`7MN1SP^"6\BB`-("Y.M;F'(R)0*`Y].HW\"*?+E+EGAE]S=6A=5A:X>ZBG
M/V,MX-.#\L5A&#3H-\[&H_C+HT\\M7;+R6HN-#=E<\%0P5E-JZ@>GL1PV_,P
M5T?X>84F&$*"B>H$`!IYL=7RTDN#3#(295&@0Y7X-K:=OYR>N<.!#0&/%$I4
MXK&QQ;N&560X@E$AE8@1#DD:KENTS*<>8Z2*(?1[8\<>N,?#$9#JV;EC3)4K
M!"V#G^MO7!^F\UIC5K_=M*+$S^=%)SM_"TAW.!C9G2.+'ONFY6.T6:0=Q<I-
M\`@6Q3"@OL^$2F-6Y45,OS?L.OW-IG'OI*-$4!&1]'PX&E7;QF\[HS/7_JO;
M'0[$/7.IB5K-W>=%]/YUS$WE!/5*/[5>[#:+(;?+6T55RVB]?MUZ47'5O<'8
MX:QN;)^<V@.GPQS"<SMPW:-*;81]#*NA\3B4OU:S4AI`7/B:1&QD/@",."4#
MVP7)7ZTLO.#<VF.M<>&&`6A2=K%`+MI;!`;@RWC8?6<[8ZF859I/SGMC<UT;
M?<TRS\(YE+`Q>U/L=?*W,$W*#<F;,;&`O$W.\J#4>&O*>XEY&*!*#4?G@64Q
MIWJ2@W/(!2K%`G$AI>X[03ITQ9%/,E?#,,J:BI1KT/^FS?6>J2[%0(/NUE+_
M[`=6\,-_?OZ]?Y)G`@H:_C_W_N?E\^</W?^\?-%ZL:?O?_C_+M__O'RQ^Y_[
MGW_%#R(P=9/E=1IQE=SHFM3Z^>?G=-J@M]Y%=.U9]+Y!8WC".7"Q14Z#/JZ\
MS*O5',9-'(PX]A4EQ)/!.:@M%@`._2A;6L2AD.]-0B3D7&X$,/,R.NGV:S7\
MXJG3%.`I2Z8Y(G1X(&&<"]08''%^.5D!#0/1`60\0Q1>)/")U]S`_C2MJ9IE
MNLB*<A%ST.\=CCJCC\!7`WO4Z=/9^6&_UT5SUQZ,;2EYKB;S*)N!H<FUT#AF
M+L::"SI.5IR`(0P<4!AQ/"^N&VC7(K!A>#ESFA*R+[2:-2\&#/'R]<!&N<'U
M/H*B'#=+E@R80`0;N8P`DB8A)Y_3U=PBC*3W/>?M\-RI=08?Z7UG-.H,G(\'
M4IU+T`O<K>A$"W4S!:93+\ZO60BG]JC[%N,[A[U^S_D(;FO'/6=@C\<$S$$=
M.NN,G%[WO-\903"CL^'8;B@$6XHOFJ0>XLQ)&(<I,/L9"\NG6C_RPQA@9BKG
M`#$%80Z@#`1>^XA3T]5$P1N`7F'TE<O+Y$.Y-@[G?NH%\9HG-1<I1$*`!P!Z
MH2YK0M6ZP[./O<$)&`:(1R)BT64:Y6%1!MXXQ=KZ%"UZ^>H%G7*"VOD*]-3U
M%I,T"B[P>-JAYFYK[V>+SL<=[$3!R]J6]HJUK=[I6=\NX4;]R#[CV[R!HZ!Y
M>1.J'_@V=-W(5V9R/WID'__:&1G;.YUCI+KUD\-N_>UP^&YGV\K&'6\*O7$O
M)KX[2Y(O'6O<L[)^',VM;21]ZZF]D\%P9->!CGJGYZ=UN=A3!!#4<1Q\1Q<M
M5@N75\TTF5P1*1&4T.![0U?FD_'0=-(%[X?ZZV^R1N8&$RY8/FH+OX`/-<96
MDB6YF[LR-(YB#'1D'YZ?N./#T;N:ND*:K"X.:JI$6LLFZ9>6`8L2A,']\4'M
M1G5Z<790TQ=)F&/>U"HI]._Q#<\U?@S,;2O&<NB;3N>K;&9D>0"SX80';B1K
MEU>1,EZ&/D"S_N:WYM6/5Y^V+9YX+\WJ<)_%!-36YDF64&^:\O)MVRHZB_:'
M.-3H7?;Z;9T=89+\:FE<R-!^+4A)25A8#UW6BB##2YS%/.2^]?7M5IGMJI/=
M^KVVM7%'7.=??-FS9/;->I5,?7<G3B?R5)WR;&_77%?\N#)7TW4570AG$;!:
M%F4]-5#*@!OXF6L+@IXW6H%^X7M]Z=&W8JE<7*LK2/5\L+%DR"6Y]8)*5%F8
M?M6[=J=<LI1TP%4);4KMO>9!43`@(Q:T3&9Q0)4;*+PP#9+K&KX3@6-G>1$?
M-Y^R^IA`"@Q^LH`O2Y.%#@2<S&6)2B0Y'F1(O6<>1L)Y<BQD=\HDL,R%+_GV
M(M$E$I[<T%>KS!]?V?\CW''`4=67RR3E_&*2K/+U"AAQZ&61+Q72SV61)%NE
MBC$NUBP]7W#`NG)2;G&XA)N7=54-1=5KIOIN_;;,,0.AC:M*"7T)PR5G/5',
M?@<QI";)[7=.36T6D9H;U@%W'DK!07L9\>Y"@UU-X65J6ZH;UK'%;0O\92LJ
M=/]`?4&A-,$DC"_?=67.*`R#ZGPI?HNW7Z`_^US[V_KN-F24:9J:+B^U5=)N
M;Y@R/67F>8#<R/.J%WX;_\$R'P6S#2K,J>HSB3O_9Q7E;(-;O(F[O)JJ1GDS
MU<X-'@H(SE+<$VUW^18S2(J*I9PY%!3RUI4^3:>!S-M1YZFJC[FN(RF=03.7
MZP53Z'Y&6<$J%8U1)<A]T`@OA$00T&Y3HX\$T2O:WT?27&=9U.4+CA\#_#-_
MCQN-AKK%A;6D!`=>%9D%(D^_>P;F0<4]8_-X#Z\@M):4SB`'A'$C=RL2*,19
M2EH+D>4MW&B!JSO/TB#1+9B7KQ]62[@#N`AAJJP3*\/WKI7QE];+GF.]RV(T
MU%P]%:&DJNQ@O:!)_,C_UTK;9E52.RB4G@L(1>Q2Z@C6F=N9MUS"6"_98A>R
M1J8_*YF$TT0J8,"U:/["Q3IL3.YJ11X2R8SBTZ2=V*0#S56Q$G\-LNY7O<)J
MP=6=?K590\[@FT(/?#U95#3`M'A(LK2/X?0E\Z[A;V-V9;IJQ^B_'A?2ISM.
M4R*XG,9=1UOR)M>"VFQC6&N=&5SP=S+E]NKEZ,HG6H5[>=TF^:"CLB7@T&-=
MI'?DWHOTMP6P0SCNPK3@K$^2)*A/KL-'@OM48.6BL]"N>`63M\>>W&4(S4V&
MJ$AYUM;FZ].XOA`0)R%T"[[ROJ,"]W7B<17FOP''"#"LP7Q%#_DZA/,^Y&"Y
ML;3RA89[ROTN#]2;#NU\H;CP8DQ#7PZ??*,^"<KE,R`&;^SUVOFB_B9?N/%2
M#'QZJ3MBR)Z2R6<NRE]94[SDQ5`FO"$B#&[+II<%)MR0%Q^HM#YZ/^HAO^K;
M`J+=,R..3?.6+./8BN.GXBHTZ)"-`"$M?]-K?&H3((E\>%:PI'<T+=Y92'B_
M@NJH/9@LG*OZFZ"!;12/BS;?AFYNY1;W7$LNUF"_Q'N1N5D;P]V1C=3847+G
M69NL7IF?6'EYH&SXN-\YH3]X'=>Q3\_<0AR"7^6;`$4:DW@,4H[33A_$I1[-
MJ>JUOJ?,%"::\,W4)=MB(3YX-B`^-&_D=\+>)`FNX?M#_4E!LO)GU8_[U)<M
M["HGG*!F42JAJ2C4"PFYR^",77A1MP+%#0_?'#&\69-4"Y6<*28`D`0*B0R&
MY]VWU<^K0H]YXFLQ1G#E#J*\(7@IRH0&_,^EAGP!7UA(RIN[2NO9(XD;X7/,
MX8(-G%PR1;@1GLU2@4TYR_O/[`\E_S-[=%J>D9QQD4-`TR[;M,/71TB'KM`G
M%XMDU.N1`CE*Z<L1;;$K^<3.=MQ^;_#.@%&9NFW:OM)/%84EHTBWKH!46,'5
M<*A*1<G;8IG:A*4D!*^R8=*5?GY]^I33HYI:I"9[YT\<C+R2.<)`;@H_+=:9
M<<&D^`R")2I'^IM<G^6?&DP;-)35:I=U7RZ+-90CN)N\R^<U=UHKR?*C-G4Y
M5Q8N;S@RNJME\25%&E[`(X;IG[*F8TO$WU:!N9;QI^M9$I[DPY[J"I92]^+;
M#9V-DKCJ\HM<>\1>P67G`HY,OI/71P!,[X=Q+D='O]!]K?O4:IK/6LUF@S^R
M+`Y*81'UPG(,^7*>3T\."R%)NVK\00QY,`1L*:?/#V7,V%J[>8(VU8:#KNV>
M#D<V('?.T5=;$`>QX@:C^];NOG-[`P<1]?S,.=@B1%J0H39M>&`)GM+>IN'A
M7_BV98W_JVK)5J/?=2XL&/`B@?W+%XG`C`7"NI5XDUS8W@C4T<IU;^5%C=GZ
M>PHS2M<.[N6@@O^6&%@!B2T!J0_':NZ]3T;_J#"^\?F4A$@DK'P+5N'5ZG6C
MZAJXJ6P`9@8V@3-@EB0N<JA27P;GZU8^_^-.?VROD8DB7GX9,W0Z?==YVQO+
MI[.B[[]7UA$?1#N;0?47<;Q^LH+2LXX:%61A\L>*%6'`41=[AD)*ZE`9K%5L
MPP/JF[N:RBR-Z3SQL*>J(`@Z@ZX[AKISWW8DF139VQ_>=L['CGV$5>_W;^B0
MD:4-P6;*6?N*U]NUQ#L&412#=AG0-N7H-WO8Q[=8<02HW]M]FQ2/?I#E_VOO
MVIO3.++]W\.G:.O>I$`>""#+22RC*H1D6149N4!2DMJX*(0`8R,@@&QY'?FS
MW_/JUTP/DA+7;G8O\D,P<_K=?1[=OW,Z56><6M#3,E[.%/BPZ,S0L'/E1L%Y
M3M)B,+H![I3W!W$GD>-IZPPS;&BL+R(@%\OI'.N/1NV7NK>G4_KRS6^YQO4<
MT8GC3['ZLB\;%JB3:"V>J<Y`C](:/ZH/?>@"@?B2[5S:0&M\HS&=@(%RW<="
M^KUK0MO2FVJL/B#P:/:/8O6-_5QYHQLZG;D?[CT10$(,Y]./G3$LF^X\/QU?
MQ@/TO8CIZ=5H(A^Z-XXH1JK4>TX'?%\\"9:D=>?I::U6+BC^M%WFYSH]O3)?
M*N[+[HWS$KZ`^,'$F'<-:[I).9)8TH_)*V$)"TGG"*M:?X293B]W38[F9?=&
M7J+D%!T#"@`5AQIB51.:2HC[SG=C!5:$""G\$I)X=\JU*"P3:_EO$TH#%8J#
M;=%'L,"B+#K<079$9I:$_%N(1QSP_RSQJ/XF\K'GR4<:>OO*%9+R"*0;3$-H
MO_?H$A]=)D5I2KY1]O<0;6G)IDBRW5.NW5NLF?K\.=FF$H.E:EQ_EQOZ%+%\
M18KE6ZT?QZZH&TWH;6P3TG>LI5*K6P$E/U3>?3VYUCAIMO]=DJV2*<T>-NR,
MR8*A0)FF&?-TTB'4&//LF_B32#'#A#\!VY8OR!F,G<MM1`<)D`@S6FJIE<;/
MKVHR+OR5UAB9SC.SOFJ?K%B9D<S%@^"S9GY#=]S^1LPEQX.VZ=ZX?82UC:OP
MIWG2/(A/3NS?C8T"*CQ&!,%G-)#OEB=HT4VO1,.%#-Z0M4@V%>XJ:2JKSK[9
MT3L7]AFN>7^S7$Q@CR-"C\TO<%>Q"+_8F\K9'V61Y',2Q?0*$\AFK+9EQ4$E
M6)$>3J[A]?1ZH>N!DK=WP9F6=5G2.4C-6]F;F[V+F=ZAQ)60Q^_0$3U;O,H3
M4>%1#27ACA(*>0IC?('LXCWMP$J)H.JZK^DH(Z.]G,*V$?ZV#D[/6LW\4STC
M0LN<)$,L'+=UOH(5")$*$VE)=0<9&TQW4<$B)>OISMQ(C!6$!KD5M%ROB-9!
M^^"TV#Q[M7?0*IZUO96!9SS+#GN4=3`3A$64X\J*U>&N=EXBHI/11#J'(CO-
M>NNPC?.H(AMDV4NEI&L/(U?6^Z,Y8J'Y$<PS-4+KR%L8"AX^?IS,>93.2L:]
MDF?X!;,)[X33S%O_F--5+C-GN*.+ZL-0=8$>?L.='&-D-.Y!']Q-ANH;/'M8
MDJ.C+"\^`BJ52K]-\!0.:HF:9C1TI!.>D;1.SIK[G;/7G=>G+<)D>/LW`37T
MKRX]=H9/KCG0R":B01)SEZU+H>/C/158JT4^.(OH>8(`"Z27Q>*D=\%Y3!;]
M^=(9GMGC2:Q&7(`H55S<K9P<3<"RT(P02JLDCHU6J\-TK-2[D-/B*[!G@$B^
M__&'2FO:5U9]#[U\N()-QR9#Z5FC'&H.S"JXU3JB;$'N)TGJ/Z2O!Q4X/G@,
MRSJ48P&C2(IZ(^:`Z;*:J_"9IRMT/8^-&XU/!52^R%L7?ZT;0CJ?3`)2]ZQN
MUT@LUK^NU171'^#H\.SDK,U`M6PU+TO/4ZSEX9$*U=;H>'X7W:N'0GHR'N$G
M+#LZWXR8-1./5<B=@?,I9LB@M2>.\&`UC=YH/N'-&F1K>L75B'F&U[PY.;U"
M'N(<G,Z$GZ>3Q0IT%L/!D3<OB*MG</)8X2]L&>TJ0X,:>Z^.FEBH/63FZI*=
M",1D(J9R*\SXK>5Z-2R9.TSXGL>+%4L2I?3+?(H/KV+$"V$7NDA,`+EH\629
M+34O<IJ"XYM(1>(@YR>Y34A+D,%W"$LC_R*1C7?)05>L?P5!F+DKPX,[Q^8B
M#JZHK#8,`SZQ[/S1$(^HTL"KFH$T9<%://[\69'1K@85G"MLP(>++S!F:%#-
M)&0UGR%,/!F8#/)^GMP#X#-0MVZX*S"H%A2EIKKIW63@]QGL(=6V``LU?/OV
M]FO*%:=H+5@$0>F)E5%-GGX=L2*>J6E97M8(,UT+J/-(4K!W/Y<D1A:P,F5Q
M.Z!42*+BJ*"1369LK66FJINM/73JK@L-UH4X*%,4@,0'F:I'-=M"%^C&Y17T
M2Q-BXZ)[*<5MH+L7OW=8>S%O&OC89&CJ[`O=K'V7U*P);,#P3-&SQ?3%;J`O
MJ!%2_12;<$3P!A5FLH(A<#HS*.3G(2'?6E'$GY7R%*JA3KB"?XN83XY(2,[/
M>"*:K8'(X8R/&>_F2UP*?K($TQ.8=/>J'^,ZH(`KD_YXN8@)/N,=6Y-\0-)_
MO&%Q["4@&4+2(E;O-+"4;6CX]MVFFJ.;`N+^$*N+@0-L_!,>!$3-64AW/I^G
M?('M<3D%SS)P#`/LDBP@`6)(X9>6WKA;7821<-4>85B(>S7Z#V^E>!8I2>M'
M-7(]%EX2H@!YSM6U9%#J<_9--`G>.0E"V9"^$+T3)H6U>>>`<4.-Y1T?E3<C
M5L!!B!(E.B>.9FPLFBJ*TBD0LPG4\,N@RAT%Y#:WJC++C($1G<K3`&2,LX9R
M)K-"C_EW#TAL3Q-$.0J6(%3EK/=F0P(G<[B.7,4R!GTA(.8E<`*%KJ^:)Y=*
M-,E#J>W$MXLF1*=WDK@JSMAE=#4,GXQ>UGLZ[JNI+3I"S"8:Z1ZB%[A#E2^7
MGL#JS!XOQ_,!^`UN4$G;\H7<9W8L)^\Z#--U/4%X&O*DDE+GW?D(K33\.NJ.
M1_\DM/3"B5$W["]1_\Q)@#CN.^3BA&Z%_O=`@L1@.E?7X^5H-@8%I+\DC@-S
M)N]ONVJ!;6GQF%4DBV$^&LPWZ&+H`V1@7HX;!9U5$E:I/K-K<T?")S#$FFF_
MY(LF1.$CX]$"?$X7K]W%=>FSZ4?FGE5;H`4P<_0J\KO^UD/-*1_N^B;6)25>
MT.`QL-COD8H95:5RR1"-.S34N9R(%Y*I--JN:,A$.XD%`I;<[^B2X`H?2M^C
MQ#`9>G9J(.X_)UAT\TC[AU`Z\Q2K'I$7#OFH[X/MWJ$X/*](TL.K"-FK^-/(
MUBA#OCMX[HD,U?GJ;/OT4<Q"]\[?=Z;ST7`TR7_K$#)46P.*<ZZ#`P;QZKP\
M.3[@SHL\AX>:<M\8O972-%M[TM^1M["L^UD'=>SKFTZ'I&\;P?8FEJ3X*1XC
M`6._02Y3Y#9<0Q?SZ?O^I$2[T"\X",BB'SM!UWH<MH7A[058!Z/Q@APZ*<GB
M^F+1__T:`Z,@(6M7T])[SA`9((X6\Q%Q$D.SK%A1Q%8^\^[W2AKM*S*872\7
M^8T7H)L=Z]9PG6C1D`6JG1IH9-FM06=QRQ\DEY_KK>91\_"9:DXGQ0&H6^.[
ML\0\-(^+:&!H*N$\BSRU/*#<DRFH[4)/>W-\<1RE9],ZM46B9M>,7>G220%,
MMLI(624^/`O.BA($J6@](+"'I-E`>B?)VS^:(DB9MQ=$"16E/E8;S1='OS3/
M7I$VK0-@,L-@$D$.%V+U0^7':EPE,\CF@P>0D$L)#VYQJ+P<Z(0T5D^WM[>>
MJGB[K/RT!I,,&;3;IZVS!H;-3>5BR""K[2=/*W$RG][@>@)9#!HOSIKI.L!+
M2/BD_.-32)BL`:<<MD,I%Y02$L:!BH,TA(2_;4"U81*'Z@P4NL*59+F$MH;T
M773"_C65FL'84.FG/V#B1.$4)0T2_]'^]=7>R7&Z;"*`Y%M/GY13R2]&0Q[X
MO;VC0QKX1'(F@.35[[?*J::CT]T44D.].?9R*CU10/+*]^G4=&Q-VS"0Q8OV
MRY/6:9&B$P>FGZ6U4["Z#?.HXN>)CMTZRV,,$IV9HZ&T&4(E59R:T@CGOH'L
M&HT3=-/^)3"QB20K`UAUH*OTY_'&_S1>UEOUQNE!:R-.9*&)=+,2F0B$&FKQ
M['6]\1.L\E0M-,H:,M@TVM)W642)_-]V%V_%*6+C[<MZ^V61#.Y4(88.BOG^
MA]2(?J!X5)#'A_.#QNE)*Y6>";"GGJ0;>3%:F@PN]HY.BQF9&#JLQ%8J&PXY
M"'DL8#D>U%^%EB,04`M2B>?=R>44$_]OJ][</WE5;)_63P\"TQK),@8+(PCK
MSIQC`*5P7QJRS#'GB(J0R^QU_?0E1O0,C#H3A;NBUQM/%\Q2>XW&\4D[Q%$U
M$3+U[7063@Y_*H,/S%7/ST-<]0/SXTJYFDHW%&Y\F,V-57JU=3E5O?Z@5+T!
M17K%-K[`"'X!N4&1<,,U7<Q&/>R@1^W71XV`Q,+7(G0"<\4(>LCA&W>S:P\^
M_H1B%`&F<3DD;.4<"%)VG,,P-V'%)'3@`TGM(F7A^^3.,64&=8Y.=L1"UT=2
M_,T>`H/^4D%L-1HI@JK`Q774>.U@*=C"F"&"HA)$4)SV0?UE3RN1JQ@KA?D!
MQ02D##8P`J<!(=T@!$GC&$##0OTN?U/<!6.N!/\ZB_YX4$"@_3%&U&2@`^_3
M];H3F(F@XW<9;D'6E-D09K](>*VZ9"OA5F.9$U(#3RR2*@"DLCBJ+=/.(]W.
MQ>C8T`EJI!_3+L<B_M`%VPY-&P=DU9?P"T2QDP.2R]XX]YDLMTEW/ES4+*B$
M899]9D'C\:?.Y13Q;5TVK+JS558B68(Q[8Q9@Y&.RB3+08S='8EK%!AUD"^[
M)7<);$"V!=5HM[95L#6H8:OF0Z"2GBKLT-D`;;<>0W=B#,,MS("?'#3W.^<@
M35N'&L)DJ9[9;(V=J&ELNF<*B@1MFBIVB\9I+N(S+WC9`?9_>)"'L:&U@^@9
M#W2CO2F@+7+,(>X'9G+4M2?ZLOL>WL^F"["%,7[D?'B-$>!X7QJW&KU]=<JM
MP`O6\R<*('MEN`OJ,W^HN:]W+*37[F_I^<$G!Z:3Q&&,MDW=\QYS@8,'WC*H
M4#VY(3^]NAITR*9?"-)UF8+#*<P#PZ0#)72R710.$9\?28_$IK(%-OW,,:7L
MDT3&C='?LE?<HF!9#MV*PMR"R#[.96!6$KU6]%&'!HD\2R`"5B;CZ/\&[)Y@
M/2;:@3E,87<0G%O5.!><6K'*!_T4N4SV_ROPKDDD\$.5WU%^8Y*-A??0+,=)
MV^P4A#'L#&)'>(0W<>!!:ITEL7)]/.Q0.0T<6Q4U.O^MK%0-A=/G#6RU[[A'
M$&05NZBX>QRWC@B#BHX"3O?A(N*FEVLUR&32NYKE78+"XTJ,N19W0?R(]/$>
M#$;CL<8(JH(7;W.$6Y9F$IQ-YOW>=#C!_36J*)]+WJ(WQL\8@`"W#1`_+:YD
M*#/IS@8WC%873*%^%QC_JZ.F#FPRH)0D<W0$5B"[FB)5_1?9P;I"3^,#=$.F
M*6$"_2L*FRUGZA1Z#?/X^%;BB4F=L#E0I>D$<O$28(07W(Q>]K'++_K+CWU(
M6:9*H*>GTF%V$UCE8ONP$9"RN'6B)>T3^&,D[1'^M9C,?HQ>0^PPU._K,_#0
M[#/^1J$$@N2\BI>U@,3(]#551B`OR`>Y9OD^A:.I*5HW6R'4+1X6,K(U_)*\
MI-($>>C,39>*#QD*WR7`M>13#U,<WC^G@S3([CFVG3[#KUTZOL!O;D?H8S?O
MV2Z.(/<I>U,T]ZW+M52U!O^\AS4H)$'%5:VII.>D-W1*/+"@D&<YH_Y!9S*C
M@35R2'@'G,ZT*G20O(M/H4617`3TE`,-27P]"2F$@`@-*=&;O3T^]W82P0Q.
M3N##ULG/IR]#<YB!&:@4;\.?T!3F6>E/9(WC<%VF&72TBF+'URII.JN'S&9W
M[GK3VL[C)Z%YK-$EV9/9P$TR*7P$2S:=UR4/F>*)V6TG]C:\IT&P3_GP\WDY
M]8B60<YR]_1:T"WU%X/N(7]%^&VN*<.)0B[S->6/==;J2%LP*;AE:*(FM3?-
M>2O&5^3(VG+:QJ%4A$-"7IPR<KZF7:-!Y@9N!P:*2EHHKHE2?:B)4K5.4YZ-
M$AF"M'6"CGO9ADG`+('N3-H?&F>5MC_F_=^O1_,L$Z2L30MMMANK@LZ#3-Q!
MDYV#NO_F\AG&PNJ.<2OKDT0WHL0;VE;58&`Y]A$[19ZBB>+N#V18)S4)9Z&L
M$=^@.(:$6K<9%)7.-TM#O^);'9*(7*MCNQVX2L5.NAXL!(!4B56&-<<.'FKG
M0=A?]V!I5,@"`2L;:NM..+`+!B[LI-7OU++?O\^ZO\Q<^+AQE=K$@84O%:45
M3YLJ(([+.#$9BF0V:X+`<G^+10<K75%/[3WPT%I:X/U#ZFE2Z9JF>6D*U!9B
MIBGS]'[<%)+]2YCI?Q@77<%$+0]-;N*T0KQ3T)^4<.XS3<0].T?)NQEGQ$SK
M'`=#:X$S5?6;777OX*BID*B1@UAE%H:1\5`)Y=-H9#\!*"CT])=]YF)*9;,Q
MB]&5IT5]HK[I;!Y;O(1AZ7=!=N]Q8!^Q0R[D`!_P8D_'Z9CXEUF.X<K?AKC;
M?5;B9?92S.1O\WOQC0Q(K5-3Z)XB(E&*V+5.W7!3&KN)+^J[HS8^\8-XKC/7
MDHRWG5&U1:AJ+L]R=[D7J:K])9[E!-U-ZG[W8%&4SF%0N#7TI[D394;@OCL8
MD\.!GJN*V2@,\H(4BIUI<2T9G+Q*\P3+T8[&X_ZP.U9\QYZ^9@A'@(ZMC$J8
M`$-YJIGGGUI-`H=TR]GPT=]VO>"H9GOPP?52]XG/6S-SP&XQ5D-<(;E'>F>X
M5N,PI0%V'7W])"TI$Y+%AZYEPM[8MP>#5TL":.S5];B[G,Y+4/.S!=\>$$5T
ME6`,8FC6G\2JO^R5^"I7ND?Z:,"A1C'*']\5$Q,0;#E:XLT&A!W#S8SAY%H7
MHSMX,48D(ZF0^O:!"^!U'TL<0%E'A^90AHPHH^B%E(DN].-TOGQ+>=!]!13?
MKV1OS*+[D_!Z&;XW:S'&:R#P)CR\74$]*6WM+2Y+',%:@B?2G9QRP2(&?<;8
MB70_#4)5*89AI5K^R42$Q:T9-&<7'#@1KX*L_HCW>4XGEU3?2LE^E<"I&G]U
MV#S38V%CZE])9/X-@6%J%RY^GB?`,SO%42S-ST97NM%X2!OG0BX&Q1DS&'>'
M&/->3"L7I;DCX60Q-MR-L4_\/7K!60.!NW5LB*V6+X1N8%:P^J]LX%`O@UB3
M"[+,1UG:T$(WL?)QE<:IP<M.5@@%-L1!R<^6>'^O+(#F2>?\Y&@?KP]J<2#_
M3>ECZ6*)&HE[*9#0[5N*V:J_`-6LL^Q?S80E`2V[EV'7&OPIF5KD%>@N1\@)
M1^01YI'?!":LE/8<).]`CH[AN`V:I]VYW_,UK*-XM*5LK<QTL7A^!0DN1QS=
M)UI1K'8TC*)-]@-WJNTX*2KV4I1IX%QG:=]3UT?.N1*-V);@+4NBZ>K^U"A:
MZ]-(.CC,7^@&ACT8IU$<NXP5XL"1@^-)ON8RH'SR9>)KVN6G1_>&YJ@SN#*N
M-SBL^/+&CJ@,Z,T]1M--V9V;D-LWSC"1^RCYQE`*NRKI_$;5I.F1XVV_9"AL
M=.OXO9&GB9OOCI_;ZC4>+-BKI5N/U-8#O3*[#\EB&3<*M::3KB@84P`'_EW!
M:V:2'5B'-3/-]+QQ9II&3MBK)Q!YR(*&1)U,N1ZGG/3'_2OM-R4ZHOO(";5/
M<]$XTT8TL_1<&E&@>TBW:?U84O%IHXC[0"`MWFA2.`S+YYP2H7SSG*'Y&JQL
MN"%"+EGV:`'3AWJ!QI&G_YDSVP,G^Q`!+7I!K9862B5G$A78J1\?'38/]O.)
M>46YQU00);ZW,#!'E%YQ=+T(\Y^?ZZ#ZG'NM_1`4IRP&;5!=W26>GX<(+0L`
ME]]K_-_?$/^WO@%O_;/^^?_[L[[_=WW_[_K^W_7]O^O[?]?W_Z[O_UW?_[N^
M_W=]_^_Z_M_U_;_K^W_7]_^N[_]=W_^[OO]W??_O^O[?_][[?_\/SJ]VTP"@
"``!]
`
end
----------------------------------------------------------------


From owner-gcl  Wed Oct 16 13:35:25 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA14134; Wed, 16 Oct 1996 13:33:47 -0500
Received: from tardis.almaden.ibm.com by cli.com (SMI-8.6/SMI-SVR4)
	id NAA14128; Wed, 16 Oct 1996 13:33:36 -0500
Received: (from tmb@localhost) by tardis.almaden.ibm.com (8.7.5/8.6.11) id LAA00737; Wed, 16 Oct 1996 11:27:36 -0700
Date: Wed, 16 Oct 1996 11:27:36 -0700
From: tmb@almaden.ibm.com
Message-Id: <199610161827.LAA00737@tardis.almaden.ibm.com>
To: gcl@cli.com, leonid@VNET.IBM.COM
Subject: Re: [Q] Inlining in GCL 2.2
Sender: owner-gcl
Precedence: bulk
content-length: 289

|How is it possible to get GCL compiler to inline user-defined functions?

The only way I have found to get inlining to happen reliably
across different Lisp implementations is to write a macro
DEFINT that looks like DEFUN but defines another macro instead
of a function.

Cheers,
Thomas.

From owner-gcl  Wed Oct 16 19:55:28 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id TAA15735; Wed, 16 Oct 1996 19:53:44 -0500
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id TAA15729; Wed, 16 Oct 1996 19:53:41 -0500
Received: from orasis.vis.toronto.edu ([128.100.3.1]) by yonge.cs.toronto.edu with SMTP id <86520>; Wed, 16 Oct 1996 20:53:34 -0400
Received: by orasis.vis.toronto.edu id <16158>; Wed, 16 Oct 1996 20:53:19 -0400
From: Richard Mann <mann@vis.toronto.edu>
To: gcl@cli.com
Subject: Error: calling 'dl' function sun did not supply..exitting
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Oct16.205319edt.16158@orasis.vis.toronto.edu>
Date: 	Wed, 16 Oct 1996 20:53:14 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 396

Does anyone know what causes this error?

I am trying to build a FFI to OpenGL/Mesa.  I think I have the bindings
correct, but I get this error when I try to open a window.  I also get the
same error when I try to open a window from Xgcl.

I am running GCL 2.2 on Sun Solaris.  (I removed "-static" from the
makefiles as suggested in the file xgcl-2.solaris.)

Thanks for any help,
    Richard.


From owner-gcl  Fri Oct 18 13:58:41 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA18042; Fri, 18 Oct 1996 13:50:44 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id NAA18036; Fri, 18 Oct 1996 13:50:40 -0500
Date: Fri, 18 Oct 96 13:49:54 CDT
Posted-Date: Fri, 18 Oct 96 13:49:54 CDT
Message-Id: <9610181849.AA07398@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA07398; Fri, 18 Oct 96 13:49:54 CDT
From: Bill Schelter <wfs@math.utexas.edu>
To: leonid@vnet.ibm.com
Cc: gcl@cli.com
In-Reply-To: <9610160833.AA37504@rs250-29> (message from Leonid Gluhovsky on
	Wed, 16 Oct 1996 10:33:00 +0200 (IST))
Subject: Re: [Q] Inlining in GCL 2.2
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl
Precedence: bulk
content-length: 306


At the moment you would have to use

(si::define-inline-function foo (a b) (+ a b))

to force the code for foo to be substituted into its caller.

Note that this does not work as well with declarations as might
be hoped, so that if you have declared types, you will still want
to use a macro.


Bill






From owner-gcl  Sat Oct 19 21:24:37 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id VAA02677; Sat, 19 Oct 1996 21:18:52 -0500
Received: from univie.ac.at by cli.com (SMI-8.6/SMI-SVR4)
	id VAA02671; Sat, 19 Oct 1996 21:18:45 -0500
Received: by univie.ac.at (NX5.67c/NX3.0M)
	id AA00609; Sun, 20 Oct 96 04:05:42 +0200
Date: Sun, 20 Oct 96 04:05:42 +0200
Message-Id: <9610200205.AA00609@univie.ac.at>
Received: by NeXT.Mailer (1.87.1)
Received: by NeXT Mailer (1.87.1)
To: gcl@cli.com
Subject: Trapping eval errors
From: a9050756@unet.univie.ac.at (Mike Alexander)
Sender: owner-gcl
Precedence: bulk
content-length: 926


I've been trying to catch errors from evals of large sexpressions with many  
degrees of freedom. I don't want to catch a particular error type, but rather  
test if a given eval will fail or not within a running program. 


si:error-set is not sufficient,

( / 1 0) and others should be trapped. What can I do?


Best Regards,

Michael Alexander
Doctoral Student at the University of Vienna

-----BEGIN PGP PUBLIC KEY BLOCK-----
Version: 2.6.3i

mQCNAzIhxYwAAAEEALtfkL/X6GuZpEECWnmkmbqqtGwNalb94Om82VUiBE8iU1OX
2e5WXQGsq1oManSqVQn3TpVo7VE9pMJr5vITAmkEA6szGRt5zbK5u/dIqhLnJnRE
sVpiY61Xw6RvQKoXX7LSqOYSCqvIiY8GJ5gRpiKQNPZVuJRqbLipmU0fPqylAAUR
tDFNaWNoYWVsIEYuIEFsZXhhbmRlciA8YTkwNTA3NTZAdW5ldC51bml2aWUuYWMu
YXQ+iQCVAwUQMiHFjbipmU0fPqylAQGy4QP+LjB6lZXVYFZDpoVB7j8AGvkghSsr
XicZapXPmsFX6xpt+S29EF4DGoDJIDq6VLJMZ2rQ1gFfEvvWzL7ekZ3orhLSpJoO
WWRZF1MNZVWBNhzxBcdK2T6yrx4cBwQX7t299Ho0y1Go69VE9e3LN8YInIXoQYp5
bc4M0u16GqmV5eI=
=5l49

From owner-gcl  Sun Oct 20 14:05:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA00954; Sun, 20 Oct 1996 13:49:07 -0500
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id NAA00949; Sun, 20 Oct 1996 13:49:05 -0500
Date: Sun, 20 Oct 1996 13:49:05 -0500
From: sandel (Charles Sandel)
Message-Id: <199610201849.NAA00949@cli.com>
To: gcl
Subject: GCL Mailing List Info
Sender: owner-gcl
Precedence: bulk
content-length: 3167


FYI:  Here is information on using the automatic
features of the GCL mailing list.


------------------------------------------------------------
This is the GNU Common LISP (GCL) mailing list.

All routine administrative requests (including
subscriptions and un-subscriptions) concerning this mailing
list are handled by an automated server. The instructions
for using this automated server are included below. Please
read this message carefully to find the information
relevant to you.

All command messages described below should be addressed to:

	gcl-request@cli.com

************************************************************
NOTE: ALL COMMANDS DESCRIBED BELOW ARE INTENDED TO BE
PLACED IN THE BODY OF YOUR MESSAGE. PUTTING THE COMMAND
              ^^^^
IN THE SUBJECT LINE OF YOUR MESSAGE IS NOT SUFFICIENT.
A command in the subject line will be silently ignored.
************************************************************

SUBSCRIBING (Getting ON the list)
=================================

To subscribe to the GCL mailing-list, send the following in
the BODY of an email message addressed to
"gcl-request@cli.com":

	subscribe

This will subscribe the account from which you sent the
message to the GCL list.

If the address from which you are initiating your message
is NOT the mailbox that you wish to have put on the list,
you can instead use a command of the form:

	subscribe gcl other-address@your_site.your_net

This is useful if the address from which you are sending
the message is not your preferred address, or if you want
to include a local (to your site) redistribution address on
the list instead of your personal mail address.

UN-SUBSCRIBING (Getting OFF the list)
=====================================

To unsubscribe from the GCL mailing-list, send the
following in the BODY of an email message addressed to
"gcl-request@cli.com":

	unsubscribe

This will unsubscribe the account from which you sent the
message. If you are subscribed to the list with some
address that is not the same as the one from which you will
initiate the message, you'll have to send a command of the
following form instead:

	unsubscribe gcl other-address@your_site.your_net

If you don't know what address you are subscribed with, you
can send the following command to see who is on the list:

	who

This command will send an email message back to you with
the current list of subscribers.

INFO
====

To get general info about this mailing list (a copy of the
message you are now reading), send the following in the
BODY (NOT the subject line) of an email message to
"gcl-request@cli.com":

	info

OTHER MAILING LIST MANAGER COMMANDS
===================================

To get a more complete list of the commands that the
mailing-list manager understands, send the following in the
BODY of an email message to "gcl-request@cli.com":

	help

HUMAN-ASSISTED HELP
===================

If you believe that you need to reach a human instead of a
piece of software, send your email request to

	owner-gcl@cli.com

This will deliver your message to the human who is currently
in charge of the list.
------------------------------------------------------------

From owner-gcl  Tue Oct 22 14:30:07 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA08792; Tue, 22 Oct 1996 14:11:08 -0500
Received: from daisy.snet.net by cli.com (SMI-8.6/SMI-SVR4)
	id OAA08787; Tue, 22 Oct 1996 14:11:05 -0500
Received: from stolpec (nrwc00-sh1-port30.snet.net [204.60.28.30]) by daisy.snet.net (8.7.5/8.7.3/SNET-1.2) with SMTP id PAA21096 for <gcl@cli.com>; Tue, 22 Oct 1996 15:11:54 -0400 (EDT)
Message-ID: <326D1C73.59D1F00F@snet.net>
Date: Tue, 22 Oct 1996 15:11:47 -0400
From: Chris Stolpe <u16079@snet.net>
X-Mailer: Mozilla 3.0 (X11; I; Linux 1.2.13 i586)
MIME-Version: 1.0
To: gcl@cli.com
Subject: Need help compiling gcl 2.1 under linux
Content-Type: multipart/mixed; boundary="------------6452A3C53F5F311E35F734AB"
Sender: owner-gcl
Precedence: bulk
content-length: 744

This is a multi-part message in MIME format.

--------------6452A3C53F5F311E35F734AB
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

I need help comiling gcl 2.1 under linux attached is the last few lines
of the compilation. I have no idea where to begin to find the problem.

Thanks
Chris Stolpe

--------------6452A3C53F5F311E35F734AB
Content-Type: text/plain; charset=us-ascii; name="gcl.txt"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline; filename="gcl.txt"

../unixport/raw_gcl ../unixport/ -libdir /usr/local/gcl-2.1/ < foo
GCL (GNU Common Lisp)  April 1994  32768 pages

Unrecoverable error: Segmentation violation..
make[1]: *** [saved_gcl] Error 134

--------------6452A3C53F5F311E35F734AB--


From owner-gcl  Tue Oct 22 15:26:37 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA08996; Tue, 22 Oct 1996 15:24:54 -0500
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id PAA08991; Tue, 22 Oct 1996 15:24:51 -0500
Received: by yonge.cs.toronto.edu via suspension id <86475>; Tue, 22 Oct 1996 16:25:03 -0400
Received: from orasis.vis.toronto.edu ([128.100.3.1]) by yonge.cs.toronto.edu with SMTP id <86518(2)>; Tue, 22 Oct 1996 13:39:33 -0400
Received: by orasis.vis.toronto.edu id <16157>; Tue, 22 Oct 1996 13:39:16 -0400
From: Richard Mann <mann@vis.toronto.edu>
To: gcl@cli.com
Subject: GCL interface for OpenGL/Mesa
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Oct22.133916edt.16157@orasis.vis.toronto.edu>
Date: 	Tue, 22 Oct 1996 13:39:12 -0400
Sender: owner-gcl
Precedence: bulk
content-length: 590

Dear GCL hackers,

I am trying to build an interface to OpenGL/Mesa.  I have a set of bindings to
the C functions in Mesa, but I cannot figure out how to build a new LISP image
containing these bindings.  If anyone would like to help, please let me know.
In particular, I would like help from someone who understands the details of
how GCL loads and links to foreign files and foreign libraries.

You can see what I have so far in:
    ftp://ftp.cs.toronto.edu/pub/mann/Lisp/GCL-GL.tar.gz

Please note that this is only preliminary work.  Any comments are welcome.

Thank you,
    Richard.

From owner-gcl  Wed Oct 23 14:36:59 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA06328; Wed, 23 Oct 1996 14:31:09 -0500
Received: from cse.psu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id OAA06323; Wed, 23 Oct 1996 14:31:05 -0500
Received: from daneel.cse.psu.edu (daneel.cse.psu.edu [130.203.1.42]) by cse.psu.edu (8.7.5/8.7.3) with ESMTP id PAA17423 for <gcl@cli.com>; Wed, 23 Oct 1996 15:32:02 -0400 (EDT)
Message-Id: <199610231932.PAA17423@cse.psu.edu>
To: gcl@cli.com
Subject: GCL 2.2/Solaris 2.5/Tk 4.1/Tcl 7.5  :-(
X-uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Wed, 23 Oct 1996 15:31:21 EDT
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 1390

Hello,

I just compiled GCL 2.2 under Solaris 2.5 with Tk 4.1/Tcl 7.5 and was having
some problems with the gcl-tk/demos/widget.lisp demos.  First, unless I have
LD_LIBRARY_PATH set to include /usr/local/lib (where libtk.so lives) I get
the following error when trying to run (si::tkconnect)

trantor:222> xbin/gcl
GCL (GNU Common Lisp)  Version(2.2) Wed Oct 23 14:32:34 EDT 1996
Licensed under GNU Public Library License
Contains Enhancements by W. Schelter
 
>(si::tkconnect)
Loading /usr/local/src/gcl-2.2/gcl-tk/tkl.o
start address -T 2dd000 Finished loading /usr/local/src/gcl-2.2/gcl-tk/tkl.o
ld.so.1: /usr/local/src/gcl-2.2/gcl-tk/gcltkaux: fatal: libtcl7.5.so: can't open file: errno=2
Killed
^\Quit

If I have set LD_LIBRARY_PATH to include /usr/local/lib (which is where
libtcl7.5.so is located) then (si::tkconnect) works.  But most of the menu
items result in a error dialogue box popping up with text something like:

	Error: invalid command name
	"mkCheck"

I kludged add-defs to add -R/usr/local/lib the TCL_LIBS and TK_LIBS macros.
So I am at a bit of a loss as to what is happening.  I do not claim to be
a LISP guru nor do I really understand how it goes about doing the dynamic
loading.  So, if someone would/could provide me with some suggestions it
would be appreciated.  I have the output from the make run if anyone wants
to look at that.

Thanks!

-- Dan Ehrlich




From owner-gcl  Thu Oct 24 12:54:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id MAA22564; Thu, 24 Oct 1996 12:48:13 -0500
Received: from cse.psu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id MAA22559; Thu, 24 Oct 1996 12:48:10 -0500
Received: from daneel.cse.psu.edu (ehrlich@daneel.cse.psu.edu [130.203.1.42]) by cse.psu.edu (8.7.5/8.7.3) with ESMTP id NAA03192 for <gcl@cli.com>; Thu, 24 Oct 1996 13:49:13 -0400 (EDT)
Message-Id: <199610241749.NAA03192@cse.psu.edu>
To: gcl@cli.com
Subject: Printing the GCL 2.2 Documentation
X-uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Thu, 24 Oct 1996 13:48:27 EDT
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 1557

Hello,

I still have not resolved my Tk/Tcl problems, but I decided to try and print
out the documentation in the info subdirectory.  Running 'make tex' generates
an error '! unbalanced parens in @def arguments.' when working on gcl-si.tex.
I have attached the tex log file below.  If anyone can tell me what needs
to be done to get this to work it would be appreciated.

Thanks,
Dan Ehrlich


daneel:1> make tex
tex gcl-si.texi
This is TeX, Version 3.14159 (C version 6.1)
(gcl-si.texi
Hyphenation patterns for english, german, loaded.
(/usr/local/teTeX/texmf/tex/texinfo/texinfo.tex
Loading texinfo package [Version 2.185]: Basics, fonts, page headings, tables,
indexing, sectioning, toc printing, environments, defuns, cross reference,
and turning on texinfo input format.) (gcl-si.aux) [1] () (number.texi
Chapter1 [1] [2]
! unbalanced parens in @def arguments.
@defunargs ...unbalanced parens in @def arguments}
                                                  @fi @interlinepenalty =100...

@defunheader ...name {#1}{Function}@defunargs {#2}
                                                  @endgroup @catcode 61=@other 

@spacesplitfoo ...lax #3#1{#2}{}@else #1{#2}{#3#4}
                                                  @fi 
l.78 ...-array2 &optional (result-bit-array nil) )
                                                  
? x
Output written on gcl-si.dvi (3 pages, 432 bytes).
Transcript written on gcl-si.log.
*** Error code 1
make: Fatal error: Command failed for target `tex'
daneel:2> ^Dexit

script done on Thu Oct 24 13:45:03 1996



From owner-gcl  Thu Oct 24 14:14:50 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA22783; Thu, 24 Oct 1996 14:10:29 -0500
Received: from marie.ma.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id OAA22778; Thu, 24 Oct 1996 14:10:27 -0500
Date: Thu, 24 Oct 96 14:09:56 CDT
Posted-Date: Thu, 24 Oct 96 14:09:56 CDT
Message-Id: <9610241909.AA01992@marie.ma.utexas.edu>
Received: by marie.ma.utexas.edu (4.1/5.51)
	id AA01992; Thu, 24 Oct 96 14:09:56 CDT
From: Bill Schelter <wfs@math.utexas.edu>
To: gumb@cs.uml.edu
Cc: gcl@cli.com
In-Reply-To: <199610232327.TAA31665@jupiter.cs.uml.edu> (gumb@cs.uml.edu)
Subject: Re: file /usr/local/lib/gcl-2.2/info/gcl.info
Reply-To: wfs@math.utexas.edu
Sender: owner-gcl
Precedence: bulk
content-length: 540


   Subject: file /usr/local/lib/gcl-2.2/info/gcl.info
   Cc: gumb@jupiter.cs.uml.edu, oneill@jupiter.cs.uml.edu

  Hi Bill,
    Our system manager tells me it is missing from the distribution.
  Is there any way to obtain it?
  Thank you,

That file is on ftp.ma.utexas.edu:pub/gcl/gcl.info.tgz it is basically
the draft ansi doc for common lisp, which i converted to texinfo from
the original tex.  It is about 700k compressed, or 2.6MB uncompressed.
The individual info files are usually left gzipped, so they take up
only 700k.

Bill



From owner-gcl  Thu Oct 24 20:52:37 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id UAA23639; Thu, 24 Oct 1996 20:44:13 -0500
Received: from digger1.defence.gov.au by cli.com (SMI-8.6/SMI-SVR4)
	id UAA23634; Thu, 24 Oct 1996 20:44:06 -0500
Received: from fang.dsto.defence.gov.au (fang.dsto.defence.gov.au [131.185.2.5]) by digger1.defence.gov.au (8.7.5/8.7.3) with ESMTP id LAA26683 for <gcl@cli.com>; Fri, 25 Oct 1996 11:14:04 +0930 (CST)
Received: from itd3.dsto.defence.gov.au (itd3.dsto.defence.gov.au [131.185.4.3]) by fang.dsto.defence.gov.au (8.7.6/8.7.6) with ESMTP id LAA19693 for <gcl@cli.com>; Fri, 25 Oct 1996 11:14:24 +0930 (CST)
Received: from hci-sun2 (hci-sun2 [131.185.10.164]) by itd3.dsto.defence.gov.au (8.7.5/sendmail.ITD.EDB+userdb.960305) with SMTP id LAA14558 for <gcl@cli.com>; Fri, 25 Oct 1996 11:14:21 +0930 (CST)
From: Conn Copas <Conn.Copas@dsto.defence.GOV.AU>
Received: by hci-sun2 (SMI-8.6) id LAA16038; Fri, 25 Oct 1996 11:17:11 +0930
Message-Id: <199610250147.LAA16038@hci-sun2>
Subject: GCL2.2/Solaris2.5/Tk 4.1/Tcl 7.5
To: gcl@cli.com
Date: Fri, 25 Oct 1996 11:17:08 +0930 (CST)
X-Mailer: ELM [version 2.4 PL25]
MIME-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Sender: owner-gcl
Precedence: bulk
content-length: 1880

Dan Ehrlich writes:

>I just compiled GCL 2.2 under Solaris 2.5 with Tk 4.1/Tcl 7.5 and was having
>some problems with the gcl-tk/demos/widget.lisp demos.  First, unless I have
>LD_LIBRARY_PATH set to include /usr/local/lib (where libtk.so lives) I get
>the following error when trying to run (si::tkconnect)"

I can run under 2.5 without any of the environment variables LD_LIBRARY_PATH,
TK_LIBRARY, TCL_LIBRARY or GCL_LIBDIR being set. The crucial variable seems
to be *tk-library*, and that is set by this statement in bin/gcl:
 
   -eval '(setq si::*tk-library* "/usr/local/lib/tk4.1")' \

Also, unless you always change into the demos directory first, you need to
uncomment this statement in gcl-tk/demos/widget.lisp:

;(setq si::*load-path* (cons (tk-conc si::*lib-directory* "gcl-tk/demos/") si::*
load-path*))

>If I have set LD_LIBRARY_PATH to include /usr/local/lib (which is where
>libtcl7.5.so is located) then (si::tkconnect) works.  But most of the menu
>items result in a error dialogue box popping up with text something like:
>
>        Error: invalid command name
>        "mkCheck"
>

If you look in gcl-tk/demos, you will notice a mix of lisp and tcl files. The
problem is not Solaris-specific; gcl is trying to load a lisp file which 
contains the function "mkCheck", but only has a tcl file to work with. See if
you can get the radiobuttons up.

While I am thinking about it, also beware of a small inaccuracy in the docs.
As far as I can tell, the function "notice-text-variables" is confounded with
the non-existent function "notice-linked-variables".

-- 
Conn V Copas
Information Technology Division
Defence Science and Technology Organisation
PO Box 1500
Salisbury            tel: +61 (0)8 25 95349
SA  5108             fax: +61 (0)8 25 95980
Australia       e-mail: Conn.Copas@dsto.defence.gov.au
------------------------------------------------------

From owner-gcl  Mon Oct 28 09:45:48 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA06112; Mon, 28 Oct 1996 09:40:05 -0600
Received: from cse.psu.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA06107; Mon, 28 Oct 1996 09:39:53 -0600
Received: from daneel.cse.psu.edu (ehrlich@daneel.cse.psu.edu [130.203.1.42]) by cse.psu.edu (8.7.5/8.7.3) with ESMTP id KAA13549; Mon, 28 Oct 1996 10:41:09 -0500 (EST)
Message-Id: <199610281541.KAA13549@cse.psu.edu>
To: Conn Copas <Conn.Copas@dsto.defence.gov.au>
cc: gcl@cli.com
Subject: Re: GCL2.2/Solaris2.5/Tk 4.1/Tcl 7.5 
X-uri: <URL:http://www.cse.psu.edu/~ehrlich/>
X-Work-Address: Department of Computer Science and Engineering
		121A Pond Laboratory
		The Pennsylvania State University
		University Park, PA 16802
X-Work-Phone: +1 814 863 1142 (Voice) +1 814 865 3176 (FAX)
In-reply-to: Your message of Fri, 25 Oct 1996 11:17:08 +0930.
             <199610250147.LAA16038@hci-sun2> 
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Mon, 28 Oct 1996 10:39:59 EST
From: Daniel R Ehrlich <ehrlich@cse.psu.edu>
Sender: owner-gcl
Precedence: bulk
content-length: 2273

>Dan Ehrlich writes:
>
>>I just compiled GCL 2.2 under Solaris 2.5 with Tk 4.1/Tcl 7.5 and was having
>>some problems with the gcl-tk/demos/widget.lisp demos.  First, unless I have
>>LD_LIBRARY_PATH set to include /usr/local/lib (where libtk.so lives) I get
>>the following error when trying to run (si::tkconnect)"
>
>I can run under 2.5 without any of the environment variables LD_LIBRARY_PATH,
>TK_LIBRARY, TCL_LIBRARY or GCL_LIBDIR being set. The crucial variable seems
>to be *tk-library*, and that is set by this statement in bin/gcl:
> 
>   -eval '(setq si::*tk-library* "/usr/local/lib/tk4.1")' \
>

Hmmm.... Seems that if I run this as `me' as opposed to `root' I do not need
to set LD_LIBRARY_PATH.  Maybe solaris is being paranoid about where root gets
shared libraries from.

>Also, unless you always change into the demos directory first, you need to
>uncomment this statement in gcl-tk/demos/widget.lisp:
>
>;(setq si::*load-path* (cons (tk-conc si::*lib-directory* "gcl-tk/demos/") si:
:*
>load-path*))
>
>>If I have set LD_LIBRARY_PATH to include /usr/local/lib (which is where
>>libtcl7.5.so is located) then (si::tkconnect) works.  But most of the menu
>>items result in a error dialogue box popping up with text something like:
>>
>>        Error: invalid command name
>>        "mkCheck"
>>
>
>If you look in gcl-tk/demos, you will notice a mix of lisp and tcl files. The
>problem is not Solaris-specific; gcl is trying to load a lisp file which 
>contains the function "mkCheck", but only has a tcl file to work with. See if
>you can get the radiobuttons up.
>

Much better after uncommenting the setq above.  And radiobuttons work.  So, can
I assume that the Tk extensions are OK?

>While I am thinking about it, also beware of a small inaccuracy in the docs.
>As far as I can tell, the function "notice-text-variables" is confounded with
>the non-existent function "notice-linked-variables".

Thanks for the warning.

-- Dan Ehrlich

>
>-- 
>Conn V Copas
>Information Technology Division
>Defence Science and Technology Organisation
>PO Box 1500
>Salisbury            tel: +61 (0)8 25 95349
>SA  5108             fax: +61 (0)8 25 95980
>Australia       e-mail: Conn.Copas@dsto.defence.gov.au
>------------------------------------------------------



From owner-gcl  Fri Nov  1 14:10:32 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA15033; Fri, 1 Nov 1996 14:04:02 -0600
Received: from upe.csres.utexas.edu by cli.com (SMI-8.6/SMI-SVR4)
	id OAA15028; Fri, 1 Nov 1996 14:03:59 -0600
Received: from localhost (parrott@localhost) by upe.csres.utexas.edu (8.7.4/8.7.3) with SMTP id OAA00891 for <gcl@cli.com>; Fri, 1 Nov 1996 14:04:56 -0600
Date: Fri, 1 Nov 1996 14:04:55 -0600 (CST)
From: Chris Parrott <parrott@upe.csres.utexas.edu>
To: gcl@cli.com
Subject: patch for gcl 2.2 available
Message-ID: <Pine.LNX.3.95.961101132359.457A-100000@upe.csres.utexas.edu>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 2593


I have created a patch for gcl 2.2 which will be of interest to the
following groups of people:

  - people running recent Linux kernels, including the new 2.1 series

  - people running the latest Tcl/Tk (7.6/4.2)

This patch consists of the changes I had to make to the gcl source tree to
get it to compile and link successfully with the above configuration. 
Even if you are not running Linux, you may want to grab the patch for use
with the latest Tcl/Tk.  Note that this patch will NOT work with Tcl
7.5/Tk 4.1, due to some changes from 7.5/4.1 to 7.6/4.2. 

The patch is available at the following site:

	ftp://upe.csres.utexas.edu/pub/gcl-2.2-fixed.patch.gz

To apply it, simply change to the directory where your gcl-2.2 source tree
sits (e.g. /usr/src) and run the following Unix command: 

	gzip -dc gcl-2.2-fixed.patch.gz | patch -p0

I have not used gcl-tk, and so I have not tested my changes with the new
Tcl/Tk.  It does compile and link against the new Tcl/Tk okay, and I
*believe* it should work.  However, your mileage may vary.

Anyway, here is a brief summary of the changes I made in this patch:

add-defs:
  Added a section to test for Linux when adding TCL_LIBS to
  makedefs.  Recent versions of Linux seem to require that libdl.so be
  linked along with libtcl.so in gcl-tk, in order to enable the dynamic
  loading and unloading capabilities of Tcl/Tk.  Hence the extra -ldl
  library flag for Linux.

  Added a section to test for Linux kernel 2.1 versus previous versions.
  Linux 2.1 changed the name of the "sigcontext_struct" data structure to
  just "sigcontext" -- so I work around this using some #ifdefs below.
  If you are compiling against a pre-2.1 version of the Linux headers,
  nothing changes. If you are running 2.1 or later, NO_SIGCONTEXT_STRUCT
  is defined.

h/386-linux.h:
  Added a section of #ifdefs to test for NO_SIGCONTEXT_STRUCT and then
  define the GET_FAULT_ADDR macro to use the correct name for the
  sigcontext data structure.  This prevents a "dereferencing an incomplete
  data type" error message in gcc.

gcl-tk/tkAppInit.c:
  Eliminated the assignment to the tcl_RcFileName global variable, which
  was eliminated in Tcl 7.4.  Replaced it with a call to the Tcl_SetVar()
  function, which sets the new tcl_rcFileName variable inside Tcl to this
  value.

gcl-tk/tkMain.c:
  Many changes.  I took the tkMain.c file which came with Tk 4.2 and then
  added in the gcl-specific code to this file.  As I stated earlier, this
  is NOT TESTED!  Though it does compile and link okay, and I believe it
  should work.


Enjoy.

-chris



From owner-gcl  Tue Nov  5 14:58:06 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id OAA08940; Tue, 5 Nov 1996 14:50:13 -0600
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id OAA08935; Tue, 5 Nov 1996 14:50:04 -0600
Received: from orasis.vis.toronto.edu ([128.100.3.1]) by yonge.cs.toronto.edu with SMTP id <86508-25174>; Tue, 5 Nov 1996 15:49:38 -0500
Received: by orasis.vis.toronto.edu id <16157>; Tue, 5 Nov 1996 15:49:19 -0500
From: Richard Mann <mann@vis.toronto.edu>
To: gcl@cli.com
Subject: DEFPACKAGE in GCL?
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Nov5.154919est.16157@orasis.vis.toronto.edu>
Date: 	Tue, 5 Nov 1996 15:49:15 -0500
Sender: owner-gcl
Precedence: bulk
content-length: 296

Does anyone know if DEFPACKAGE is included in GCL 2.2?  I see it in the
documentation, but it doesn't seem to be defined...

Do I need to get it from somewhere else?  If so, can someone please tell me
where it is and describe the exact steps necessary to install it in GCL.

Thanks,
    Richard.

From owner-gcl  Tue Nov  5 18:55:57 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id SAA09605; Tue, 5 Nov 1996 18:51:33 -0600
Received: from epic.com by cli.com (SMI-8.6/SMI-SVR4)
	id SAA09600; Tue, 5 Nov 1996 18:51:29 -0600
Received: from weber.EPIC by epic.com (SMI-8.6/SMI-SVR4)
	id QAA05627; Tue, 5 Nov 1996 16:51:26 -0800
X-organization: EPIC Design Technology, Inc.
Received: by weber.EPIC (SMI-8.6/SMI-SVR4)
	id QAA17550; Tue, 5 Nov 1996 16:51:26 -0800
Date: Tue, 5 Nov 1996 16:51:26 -0800
From: hxl@epic.com (Charlie Xiaoli Huang)
Message-Id: <199611060051.QAA17550@weber.EPIC>
To: gcl@cli.com
Subject: fail to compile on solaris 2.5 with gcc 2.6.3
Sender: owner-gcl
Precedence: bulk
content-length: 285


I'm runnniing into two problems compiling gcl 2.2 on solaris
2.5 gcc 2.6.3:

1. there's a C file called sgc.c (?) which chokes the compiler 
   near GET_FAULT_ADDR. 
2. When linking, mp2.c's shifts comflicts with libnsl.a.

Please email to hxl@epic.com if you have suggestions.

hxl


From owner-gcl  Wed Nov  6 09:59:46 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA21695; Wed, 6 Nov 1996 09:57:30 -0600
Received: from haymarket.ed.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id JAA21690; Wed, 6 Nov 1996 09:57:14 -0600
Received: from aiai.ed.ac.uk (skye-alter.aiai.ed.ac.uk [192.41.104.6]) by haymarket.ed.ac.uk (8.6.13/8.6.12) with SMTP id PAA15167; Wed, 6 Nov 1996 15:55:26 GMT
Received: from subnode.aiai.ed.ac.uk (bute) by aiai.ed.ac.uk; Wed, 6 Nov 96 15:53:57 GMT
Date: Wed, 6 Nov 96 15:53:52 GMT
Message-Id: <13984.9611061553@subnode.aiai.ed.ac.uk>
From: Jeff Dalton <jeff@aiai.ed.ac.uk>
Subject: Re: DEFPACKAGE in GCL?
To: Mann@cs.toronto.edu, gcl@cli.com
In-Reply-To: Richard Mann's message of Tue, 5 Nov 1996 15:49:15 -0500
Sender: owner-gcl
Precedence: bulk
content-length: 671

> Does anyone know if DEFPACKAGE is included in GCL 2.2?  I see it in the
> documentation, but it doesn't seem to be defined...
> 
> Do I need to get it from somewhere else?  If so, can someone please tell me
> where it is and describe the exact steps necessary to install it in GCL.

I don't know about 2.2.  I have never been able to get 2.anything to
completely work on either 4.1.3 Suns or PCs running FreeBSD (which are
the only two cases I've tried).  But I have a defpackage from CMUCL
that works in GCL-1.1.  Look in:

  http://www.aiai.ed.ac.uk/~jeff/lisp/tools/

Installation is just: load it in, save an image (by calling si:save-system)
if you want.

-- jeff

From owner-gcl  Sat Nov  9 16:27:49 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id PAA01887; Sat, 9 Nov 1996 15:59:43 -0600
Received: from garfield.cs.mun.ca by cli.com (SMI-8.6/SMI-SVR4)
	id PAA01882; Sat, 9 Nov 1996 15:59:36 -0600
Received: from ganymede.cs.mun.ca (gharvey@ganymede.cs.mun.ca [134.153.39.1]) by garfield.cs.mun.ca (8.7.6/8.7.3) with SMTP id SAA27323 for <gcl@cli.com>; Sat, 9 Nov 1996 18:29:30 -0330 (NST)
Date: Sat, 9 Nov 1996 18:29:30 -0330 (NST)
From: Gregory Harvey <gharvey@cs.mun.ca>
To: gcl@cli.com
Subject: Re: DEFPACKAGE in GCL?
In-Reply-To: <96Nov5.154919est.16157@orasis.vis.toronto.edu>
Message-ID: <Pine.SUN.3.91.961109182711.13295B-100000@ganymede.cs.mun.ca>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 608



On Tue, 5 Nov 1996, Richard Mann wrote:

> Does anyone know if DEFPACKAGE is included in GCL 2.2?  I see it in the
> documentation, but it doesn't seem to be defined...
> 
> Do I need to get it from somewhere else?  If so, can someone please tell me
> where it is and describe the exact steps necessary to install it in GCL.
> 
> Thanks,
>     Richard.
> 
There is a package package at the Cmu ai repository that will work with 
gcl 2.2 with slight tuning. I can't remember exactly what is necessary, 
but if you have any trouble I could mail a patch (it's only something 
like 2 lines).
gharvey@cs.mun.ca

From owner-gcl  Tue Nov 12 01:03:32 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA09668; Tue, 12 Nov 1996 00:32:51 -0600
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id AAA09663; Tue, 12 Nov 1996 00:32:47 -0600
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id WAA04576; Mon, 11 Nov 1996 22:32:50 -0800
Date: Mon, 11 Nov 1996 22:32:50 -0800
Message-Id: <199611120632.WAA04576@aurora.romoidoy.com>
From: chapman@afferent.com (David Chapman)
To: gcl@cli.com
subject: GCL under IRIX 6.2?
Sender: owner-gcl
Precedence: bulk
content-length: 803

Does anyone have experience with this?

I've gotten (almost) everything working before under IRIX 5.2 and 5.3,
but have a new machine running 6.2 that doesn't go.  I'm not sure if
this is a 6.2 problem, or specific to this machine's configuration in
some way.

Two problems:

(1) saved_gcl dies when you try to run it.  raw_gcl is fine, and the
    SI::SAVE-SYSTEM that creates saved_gcl seems to execute OK, but
    saved_gcl loses.  So does a dump directly from raw_gcl (without
    executing ``foo'').  

(2) Interrupts aren't working.  If you kill -USR1 a raw_gcl, or a
    raw_gcl that has had the ``foo'' initialization script loaded, it
    dies.  Ditto for -IO.  This is after loading the tkl.lsp SIGUSR1
    and SIGIO handlers.

Has any had success, or failure, with this?

Thanks much!

David

From owner-gcl  Wed Nov 13 10:08:51 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA22932; Wed, 13 Nov 1996 09:34:10 -0600
Received: from garfield.cs.mun.ca by cli.com (SMI-8.6/SMI-SVR4)
	id JAA22927; Wed, 13 Nov 1996 09:34:02 -0600
Received: from ganymede.cs.mun.ca (gharvey@ganymede.cs.mun.ca [134.153.39.1]) by garfield.cs.mun.ca (8.7.6/8.7.3) with SMTP id MAA19309 for <gcl@cli.com>; Wed, 13 Nov 1996 12:03:56 -0330 (NST)
Date: Wed, 13 Nov 1996 12:03:55 -0330 (NST)
From: Gregory Harvey <gharvey@cs.mun.ca>
To: gcl@cli.com
Subject: Current status
Message-ID: <Pine.SUN.3.91.961113120144.25526A-100000@ganymede.cs.mun.ca>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-gcl
Precedence: bulk
content-length: 271

	I was wondering if anyone out there is working on bringing gcl up to
ansi (I sent a message to wfs, but no response). Mainly because I'd like to
help, but I don't want to start attacking the (somewhat) clean 2.2 sources
if work has already been done.

gharvey@cs.mun.ca

From owner-gcl  Thu Nov 14 00:27:09 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA29014; Thu, 14 Nov 1996 00:12:29 -0600
Received: from yonge.cs.toronto.edu by cli.com (SMI-8.6/SMI-SVR4)
	id AAA29007; Thu, 14 Nov 1996 00:12:26 -0600
Received: from dvp.cs.toronto.edu ([128.100.1.15]) by yonge.cs.toronto.edu with SMTP id <86585-5824>; Thu, 14 Nov 1996 01:12:17 -0500
Received: by dvp.cs.toronto.edu id <15396-14145>; Thu, 14 Nov 1996 01:12:10 -0500
From: Richard Mann <mann@cs.toronto.edu>
To: gcl@cli.com
Subject: Announce: preliminary interface to Mesa/OpenGL
Reply-to: Mann@cs.toronto.edu
Message-Id: <96Nov14.011210edt.15396-14145@dvp.cs.toronto.edu>
Date: 	Thu, 14 Nov 1996 01:12:10 -0500
Sender: owner-gcl
Precedence: bulk
content-length: 341

I have built a foreign function interface to access Mesa/OpenGL (and Xlib)
functions from GCL.

This is only preliminary work, but since several people have expressed
interest, I would like to distribute it as soon as possible.

The code is at:
    ftp://ftp.cs.toronto.edu/pub/mann/Lisp/GCL-GL.tar.gz

Comments are welcome...

    Richard.

From owner-gcl  Thu Nov 14 00:28:04 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id AAA00114; Thu, 14 Nov 1996 00:23:34 -0600
Received: from aurora.romoidoy.com by cli.com (SMI-8.6/SMI-SVR4)
	id AAA00095; Thu, 14 Nov 1996 00:23:25 -0600
Received: (from zvona@localhost) by aurora.romoidoy.com (8.6.12/Romoidoy-Non-Hub-022896) id WAA00157; Wed, 13 Nov 1996 22:18:25 -0800
Date: Wed, 13 Nov 1996 22:18:25 -0800
Message-Id: <199611140618.WAA00157@aurora.romoidoy.com>
From: chapman@afferent.com (David Chapman)
To: gcl@cli.com
subject: fix for sgbc problem under linux
Sender: owner-gcl
Precedence: bulk
content-length: 601

I just upgraded from RedHat 3 to RedHat 4, and hit the old ``dereferencing
pointer to incomplete type'' in sgbc.c.  I have fixed this problem
before under solaris with the patch that was helpfully posted by
someone here, but hadn't run into it under linux before.  I also
haven't seen a fix for it posted here.

The fix is very simple: you add

  #include<asm/sigcontext.h>

just before the definition of memprotect_handler.

Why this is necessary, and was not before, I've no idea, but it it works.

Hope someone finds this useful, and they spend less time dealing with
the problem than I just have.

From owner-gcl  Thu Nov 14 04:08:26 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id DAA10531; Thu, 14 Nov 1996 03:56:38 -0600
Received: from mailb.surrey.ac.uk by cli.com (SMI-8.6/SMI-SVR4)
	id DAA10526; Thu, 14 Nov 1996 03:56:35 -0600
Received: from soc.surrey.ac.uk (actually host boris-gate.soc.surrey.ac.uk) 
          by mailb.surrey.ac.uk with SMTP (PP); Thu, 14 Nov 1996 09:56:24 +0000
Received: from socpc42 by boris.soc.surrey.ac.uk   via Ethernet 
          with SMTP           id aa23027; 14 Nov 96 9:56 GMT
X-Sender: scs1ng@boris.soc.surrey.ac.uk
Message-Id: <v03007800aeb09b2ab2ee@[131.227.118.140]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 14 Nov 1996 09:56:05 +0000
To: gcl@cli.com
From: Nigel Gilbert <Nigel.Gilbert@soc.surrey.ac.uk>
Subject: Fatal compilation error making GCL on Solaris 5.5?
Sender: owner-gcl
Precedence: bulk
content-length: 3586

I am trying to make gcl2-2 on a Sun Solaris (specifically:
{josef:9} uname -a
SunOS josef 5.5 Generic sun4u sparc SUNW,Ultra-1
{josef:10}

I have ungziped the tar file with -dc, executed 'add-defs solaris' and done
a make.  The result is that the compilation ceases with:

sgbc.c: In function `memprotect_handler':
sgbc.c:1124: void value not ignored as it ought to be
make[1]: *** [gbc.o] Error 1

(see below).

I am using gcc version 2.7.2.

Is this a known problem?  Any workarounds?  Help much appreciated.

===================

{josef:21} make
cat h/config.h | sed -e "1,/Begin for cmpincl/d" \
        -e "/End for cmpinclude/,50000d" > tmpx
cat h/cmpincl1.h h/compbas.h h/enum.h h/object.h h/vs.h h/bds.h h/frame.h
h/lex.
h h/eval.h    h/funlink.h h/att_ext.h h/new_decl.h h/compbas2.h h//compat.h
h//c
mponly.h >> tmpx
./xbin/move-if-changed mv tmpx h/cmpinclude.h
tmpx and h/cmpinclude.h were not the same.
ln tmpx h/cmpinclude.h
./xbin/move-if-changed ln h/cmpinclude.h o/cmpinclude.h
h/cmpinclude.h and o/cmpinclude.h were not the same.
ln h/cmpinclude.h o/cmpinclude.h
(cd bin; make all)
make[1]: Entering directory `/opt/work/gcl-2.2/bin'
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char -DUNIX -o
dpp dpp
.c
make[1]: Leaving directory `/opt/work/gcl-2.2/bin'
(cd mp ; make all)
make[1]: Entering directory `/opt/work/gcl-2.2/mp'
make all1 "MPFILES=./mpi-sol-sparc.o ./sparcdivul3.o ./libmport.a"
make[2]: Entering directory `/opt/work/gcl-2.2/mp'
gcc -S -I../h -O mpi.c -o mpi-sol-sparc.s
/usr/ccs/bin/as -P -D__svr4__ mpi-sol-sparc.s -o mpi-sol-sparc.o
/usr/ccs/bin/as -P -D__svr4__ sparcdivul3.s -o sparcdivul3.o
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp_divul3.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp_bfffo.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp_mulul3.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp2.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp_dblrsl3.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char  -c -O
-I../h -I.
 -c   -I../h -O4 mp_dblrul3.c
rm -f libmport.a
/usr/ccs/bin/ar qc libmport.a mp_divul3.o  mp_bfffo.o mp_mulul3.o mp2.o
mp_dblrs
l3.o mp_dblrul3.o
true libmport.a
make[2]: Leaving directory `/opt/work/gcl-2.2/mp'
make[1]: Leaving directory `/opt/work/gcl-2.2/mp'
rm -f o/cmpinclude.h ; ln h/cmpinclude.h o
(cd o; make all)
make[1]: Entering directory `/opt/work/gcl-2.2/o'
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O
-I../gcl-tk
 -I../h/ -O4  main.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O
-I../gcl-tk
 -I../h/ -O4  alloc.c
gcc -I/opt/work/gcl-2.2/o -static -DVOL=volatile -fsigned-char -c -O
-I../gcl-tk
 -I../h/ -O4  gbc.c
sgbc.c: In function `sgc_quit':
In file included from gbc.c:1321:
sgbc.c:1072: warning: assignment makes pointer from integer without a cast
sgbc.c:1074: warning: assignment makes integer from pointer without a cast
sgbc.c: In function `memprotect_handler':
sgbc.c:1124: void value not ignored as it ought to be
make[1]: *** [gbc.o] Error 1
make[1]: Leaving directory `/opt/work/gcl-2.2/o'
make: *** [all] Error 2

_________________________________________________________________________
Prof G. Nigel Gilbert, Dept of Sociology, University of Surrey, Guildford,
GU2 5XH, United Kingdom.  Tel: +44 (0)1483 259173 Fax: +44 (0)1483 306290



From owner-gcl  Thu Nov 14 09:24:46 1996
Return-Path: <owner-gcl>
Received: by cli.com (SMI-8.6/SMI-SVR4)
	id JAA12098; Thu, 14 Nov 1996 09:12:38 -0600
Received: from spot.uchicago.edu by cli.com (SMI-8.6/SMI-SVR4)
	id JAA12092; Thu, 14 Nov 1996 09:12:31 -0600
Received: (from goldin@localhost) by spot.uchicago.edu (8.7.6/8.7.3) id JAA29337; Thu, 14 Nov 1996 09:10:24 -0600
To: gcl@cli.com
Subject: gcl on Sparc Linux
From: Alexey Goldin <goldin@spot.uchicago.edu>
Date: 14 Nov 1996 09:10:23 -0600
In-Reply-To: chapman@afferent.com's message of Wed, 13 Nov 1996 22:18:25 -0800
Message-ID: <m1afskww4g.fsf@spot.uchicago.edu>
Lines: 47
X-Mailer: Gnus v5.3/Emacs 19.34
Sender: owner-gcl
Precedence: bulk
content-length: 1791


What problems should I be aware of trying to compile gcl on Sparc
Linux? gcl works on Solaris, SunOs and Intel Linux so supposedly it
should not be VERY difficult to port it to Sparc Linux as well.

I wrote new files sparc-linux.h and sparc-linux.defs combining
solaris.h and linux.h (I defined BIG_ENDIAN, looked carefully into
signal handlers and changed some stuff, I think correctly). I even managed to compile it. But gcl_raw segfaults
when I try to run it: 


GDB is free software and you are welcome to distribute copies of it
 under certain conditions; type "show copying" to see the conditions.
There is absolutely no warranty for GDB; type "show warranty" for details.
GDB 4.16 (sparc-unknown-linux), Copyright 1996 Free Software Foundation, Inc...
(gdb) r
Starting program: /usr/src/redhat/BUILD/gcl-2.2/unixport/raw_gcl 
GCL (GNU Common Lisp)  April 1994  16384 pages
loading ../lsp/export.lsp
Initializing ../lsp/defmacro.o
Initializing ../lsp/evalmacros.o
Initializing ../lsp/top.o

Program received signal SIGSEGV, Segmentation fault.
0x123dc in alloc_object (t=t_vfun) at alloc.c:224
224             if (obj == OBJNULL) {
(gdb) list
219             tm = tm_of(t);
220
221             CHECK_INTERRUPT;         
222
223             obj = tm->tm_free;
224             if (obj == OBJNULL) {
225                     if (tm->tm_npage >= tm->tm_maxpage)
226                             goto CALL_GBC;
227                     if (available_pages < 1) {
228                             sSAignore_maximum_pagesA->s.s_dbind = Cnil;



What should I check before giving up? 

I realize there is not enough information to make any conclusions, if
someone is ready to give me a helping hand I will dump tons of info on
him and may give him temporary account on my machine to try it ;-)



From root  Fri Nov 15 11:41:23 1996
Return-Path: <root>
Received: from ftp.cli.com by cli.com (SMI-8.6/SMI-SVR4)
	id LAA29265; Fri, 15 Nov 1996 11:41:23 -0600
From: root (Super-User)
Received: by ftp.cli.com (SMI-8.6) id LAA04887; Fri, 15 Nov 1996 11:41:20 -0600
Date: Fri, 15 Nov 1996 11:41:20 -0600
Message-Id: <199611151741.LAA04887@ftp.cli.com>
To: gcl-archive
Subject: test
content-length: 7


test


