From dxs@evolving.com Thu Jan 6 23:01:42 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14312; Thu, 6 Jan 94 23:01:42 +0100 Received: by csn.org with UUCP id AA10262 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Thu, 6 Jan 1994 14:53:57 -0700 Received: by kafka (AIX 3.2/UCB 5.64/4.03) id AA68925; Thu, 6 Jan 1994 14:43:18 -0700 Date: Thu, 6 Jan 1994 14:43:18 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9401062143.AA68925@kafka> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: garnet under clisp i have tried to build garnet under clisp. i am running clisp on a rs6000. after building garnet i tried to run garnetdraw and i got the following error: ;; Loading of file /home/dxs/garnet/src/demos/garnetdraw.lsp is finished. T > (garnetdraw:do-go) *** - X-Error: ALLOC-ERROR in current request Code 84.0 [AllocColor] 1. Break> has anybody gotten this error and could they give me some insight into it? thanks dan stanger From haible Fri Jan 7 19:25:59 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15441; Fri, 7 Jan 94 19:25:59 +0100 Date: Fri, 7 Jan 94 19:25:59 +0100 From: haible (Bruno Haible) Message-Id: <9401071825.AA15441@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: New CLISP version Cc: AI.Repository@cs.cmu.edu, friedman@gnu.ai.mit.edu Once more, there is a new version of CLISP at the usual place: ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source . Excerpt from the change log: Important note -------------- * Changed bytecode format. All .fas files generated by previous CLISP versions are invalid and must be recompiled. User visible changes -------------------- * X3J13 votes <186> and <31> are implemented: the Common Lisp Condition System. New macros DEFINE-CONDITION, IGNORE-ERRORS, HANDLER-CASE, HANDLER-BIND, RESTART-CASE, WITH-RESTARTS, WITH-SIMPLE-RESTART, RESTART-BIND, WITH-CONDITION-RESTARTS, new types RESTART, CONDITION, SERIOUS-CONDITION, ERROR, PROGRAM-ERROR, CONTROL-ERROR, ARITHMETIC-ERROR, DIVISION-BY-ZERO, FLOATING-POINT-OVERFLOW, FLOATING-POINT-UNDERFLOW, CELL-ERROR, UNBOUND-VARIABLE, UNDEFINED-FUNCTION, TYPE-ERROR, PACKAGE-ERROR, STREAM-ERROR, END-OF-FILE, FILE-ERROR, STORAGE-CONDITION, WARNING, SIMPLE-CONDITION, SIMPLE-ERROR, SIMPLE-TYPE-ERROR, SIMPLE-WARNING, new functions MAKE-CONDITION, SIGNAL, COMPUTE-RESTARTS, FIND-RESTART, INVOKE-RESTART, INVOKE-RESTART-INTERACTIVELY, ABORT, CONTINUE, MUFFLE-WARNING, STORE-VALUE, USE-VALUE, INVOKE-DEBUGGER, RESTART-NAME, ARITHMETIC-ERROR-OPERATION, ARITHMETIC-ERROR-OPERANDS, CELL-ERROR-NAME, TYPE-ERROR-DATUM, TYPE-ERROR-EXPECTED-TYPE, PACKAGE-ERROR-PACKAGE, STREAM-ERROR-STREAM, FILE-ERROR-PATHNAME, SIMPLE-CONDITION-FORMAT-STRING, SIMPLE-CONDITION-FORMAT-ARGUMENTS, new variables *BREAK-ON-SIGNALS*, *DEBUGGER-HOOK*. See impnotes.txt for details. Thanks to David Gadbois who wrote most of this. * X3J13 vote <40> is partially implemented: New variable *PRINT-READABLY*. * X3J13 vote <34> is implemented: Arrays and packages may now appear as constants in compiled code. * X3J13 vote <90> is implemented: FUNCTIONP on symbols and conses now always returns NIL. The type FUNCTION is disjoint from SYMBOL and CONS. (COERCE object 'FUNCTION) is implemented. Warning: Old style calls like (FUNCTIONP object) may need to be converted to (OR (FUNCTIONP object) (SYMBOLP object) (AND (CONSP object) (EQ (CAR object) 'LAMBDA)) ) This fixes a CLOS bug: (TYPEP object 'FUNCTION) wasn't equivalent to (TYPEP object (FIND-CLASS 'FUNCTION)). * Two new debugger commands Break+ and Break- permit to set resp. remove breakpoints at specified EVAL or APPLY frames. * Warnings and errors produced by COMPILE-FILE are now accompanied by source line number information. * The sub-char passed as second argument to read dispatch macros is now exactly the first non-digit read from the stream. Previously it was its upper-case equivalent. * DEFPACKAGE now accepts an option (:DOCUMENTATION doctring). * DIRECTORY now accepts a keyword argument :CIRCLE. If it is non-NIL, the directory search for ".../" and "**/" wildcards on Unix avoids endless loops that may result from symbolic links. * The variable *LOAD-PATHS* in the Unix versions of config.lsp now uses "~/" (the home directory at run time) instead of #"~/" (the home directory at installation time). Thanks to Gabor Herr. * Unix and OS/2 versions: New dangerous functions MAKE-PIPE-IO-STREAM, RUN-SHELL-COMMAND and RUN-PROGRAM. * Unix version only: The command shell used by MAKE-PIPE-...-STREAM is now always /bin/sh; the environment variable SHELL is only used as interactive shell. Fixed a race condition in the functions EXECUTE, MAKE-PIPE-INPUT-STREAM, MAKE-PIPE-OUTPUT-STREAM that caused the child process to fail mysteriously. * Attacks such as (DO-ALL-SYMBOLS (S) (UNLESS (CONSTANTP S) (SET S NIL))) no longer crash CLISP. * Fixed a CLOS bug: DEFCLASS failed to signal an error if several direct slots had identical names. * Fixed a bug in the reader: When reading hash tables which contain #n# references, the hash codes must be recomputed after resolving the references. Thanks to Marcus Daniels. * Fixed a bug in the printer: Printed representations with two different #1= definitions could result when PRINT-OBJECT methods were called while *PRINT-CIRCLE* was true. Thanks to Marcus Daniels. Portability ----------- * Fixed five bugs in the number crunching routines that appeared on 64-bit processors or in combination with the WIDE tagging scheme. * More support for 64-bit processors like DEC Alpha. * Added support for NeXT running NeXTstep 3.1. Thanks to Marcus Daniels. * Added support for Amiga 3000 running AMIX Unix. Thanks to Michel Loi. * Fixed a problem with Ctrl-C on HP-UX. Thanks to Gabor Herr. * Added support for HP9000/300 running HP-UX. Thanks to Gabor Herr. * Added support for WATCOM C 9.5 on DOS. * Amiga version: Tolerate memory outside the 27-bit addressable range. * Remove support for the Atari ST assembly language version CLISP1. Other modifications ------------------- * Added some documentation of the GNU readline library. * Changed the default memory size back from 2.5 megabytes to 2 megabytes. * Miscellaneous documentation updates. CLISP now compiles and runs on * microcomputers: * Atari ST/TT * Amiga 500-4000 * DOS * MS Windows 3.1 * OS/2 2.0 * Unix workstations: * PC, Linux * PC, USL SVR4 * Sun4, SunOS 4 or 5 * HP9000/800, HP-UX * SGI Mips, Irix 4 or 5 * DEC Alpha AXP, OSF 1.3 * DECstation 5000, Ultrix 4.2 * IBM RS/6000, AIX 3.2 * M88000 * Sun386, SunOS 4 * Sun3, SunOS 4 (?) * HP9000/300, HP-UX or NetBSD * Apple MacII, A/UX (?) * Amiga 3000, Amiga Unix 2.1 * NeXT, NeXTstep 3.1 * PC, 386BSD or NetBSD * PC, Coherent 4.0 * Atari ST/TT, MiNT (?) New binaries have been built for: Sun4, SunOS 5.2 982055 Dec 3 sun4-sunos52/clisp.tar.z Binaries have been rebuilt for the following architectures: Linux 1128826 Jan 7 linux/clisp-english.tar.z Linux 1134023 Jan 7 linux/clisp-deutsch.tar.z DEC Alpha AXP, OSF 1.3 1379905 Dec 5 decalpha-osf/clisp.tar.z Amiga 500-4000 536424 Dec 11 amiga/CLisp-931211-Part1-high.lha Amiga 500-4000 542329 Dec 11 amiga/CLisp-931211-Part1-low.lha Amiga 500-4000 532023 Dec 11 amiga/CLisp-931211-Part2.lha Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From brent@amber.ssd.csd.harris.com Fri Jan 7 22:02:05 1994 Return-Path: Received: from travis.csd.harris.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20579; Fri, 7 Jan 94 22:02:05 +0100 Received: from amber.ssd.csd.harris.com by travis.csd.harris.com (5.61/harris-5.1) id AA14350; Fri, 7 Jan 94 15:54:59 -0500 Received: by amber (5.61/CX/UX-5.0) id AA20946; Fri, 7 Jan 94 15:54:58 -0500 Date: Fri, 7 Jan 94 15:54:58 -0500 From: brent@amber.ssd.csd.harris.com (Brent Benson) Message-Id: <9401072054.AA20946@amber> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: linked SGI binary Reply-To: brent@travis.csd.harris.com I've recently come into position of an SGI Iris Indigo running IRIX 4.0.1. It doesn't have a development environment (no C compiler, header files, libraries, etc.) so I am unable to link the CLISP library from the binaries directory on ma2s2 into an image for my machine. Would someone be able to provide me with such a binary for the latest version of CLISP? I would be ever so grateful. ;Brent From WECHARD@VM2.YorkU.CA Sat Jan 8 18:08:31 1994 Return-Path: Received: from vm2.yorku.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21953; Sat, 8 Jan 94 18:08:31 +0100 Message-Id: <9401081708.AA21953@ma2s2.mathematik.uni-karlsruhe.de> Received: from VM2.YorkU.CA by vm2.yorku.ca (IBM VM SMTP V2R1) with BSMTP id 8472; Sat, 08 Jan 94 11:59:56 EST Date: Sat, 08 Jan 94 11:55:33 EST From: William Echard Subject: DOS Executable request To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Hi Everyone. I'm new to this list and quite new to LISP as well. I've been using an older verion of CLISP to learn the basics of the language and would like to get the new version (JAN 7) running. However, I don't have the skill or free time right now to compile it myself. So I'm asking if anyone has compiled the new version for DOS yet (I am using a 486) and if I could get it. Failing that, what is the latest version for DOS that is available? Thanks in advance for your help. Playing with CLISP and browsing the group is turning out to be a great way for me to learn---William Echard. From jbishop@babel.ling.nwu.edu Sat Jan 8 20:28:32 1994 Received: from relay.acns.nwu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22059; Sat, 8 Jan 94 20:28:32 +0100 Received: from babel.ling.nwu.edu by relay.acns.nwu.edu (4.1/SMI-ACNS-relay-%I%) id AA06718; Sat, 8 Jan 94 13:21:23 CST Return-Path: Received: by babel.ling.nwu.edu (4.1/SMI-4.0) id AA03721; Sat, 8 Jan 94 13:21:20 CST Date: Sat, 8 Jan 1994 13:21:19 -0600 (CST) From: Jeff Bishop Sender: Jeff Bishop Reply-To: Jeff Bishop Subject: OS/2 and SunOS 4 versions To: Clisp List Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII Has anyone built the new version of CLISP on either of the above platforms? Perhaps they could upload and have it replace the older versions in the binaries directory? _____________________________________________________________________________ Jeff Bishop Department of Linguistics Northwestern University From haible Sat Jan 8 21:59:01 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22370; Sat, 8 Jan 94 21:59:01 +0100 Date: Sat, 8 Jan 94 21:59:01 +0100 From: haible (Bruno Haible) Message-Id: <9401082059.AA22370@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: My last CLISP version Once again, there is a new version of CLISP at the usual place: ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source . The change log is small since yesterday: Portability ----------- * Remove (incomplete) support for VMS. Binaries have been rebuilt for: Sun4, SunOS 4 1130288 Jan 7 22:43 sun4-sunos4/clisp-english.tar.z DEC Alpha AXP, OSF 1.3 1446907 Jan 8 21:10 decalpha-osf/clisp.tar.z This is my last release of CLISP. I have to concentrate on other things. * I don't have the time to maintain CLISP any more. * I don't have the time to port CLISP to any new architecture any more. * I don't have the time to answer trivial questions about CLISP any more. CLISP now needs new ideas for improvement and a new maintainer. If one of you all on this mailing list volunteers to maintain CLISP, please let us know. It's not that time consuming. Depending on your skills it may be routine or it may be challenging. It may be fun in any case. Until a new maintainer is found, any of you can submit patches. They will be stored in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source/patches/ each consisting of a description and a context diff. Two patches are already there. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Sat Jan 8 22:27:40 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22434; Sat, 8 Jan 94 22:27:40 +0100 Date: Sat, 8 Jan 94 22:27:40 +0100 From: haible (Bruno Haible) Message-Id: <9401082127.AA22434@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: contributions There is also /pub/lisp/clisp/contrib/ directory for enhancements to CLISP, goodies, demoes etc. For now it contains xterm.tar.z If clisp is running under X11, it can open xterm windows and create a bidirectional stream to each such window. The file x-graph.lsp implements pixel graphics primitives using xterm's tek mode. The corresponding graphics primi- tives for DOS and Linux (non-X11) can be found in clisp's SYSTEM package. Contributions are welcome. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From marcus@ee.pdx.edu Sun Jan 9 01:30:54 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22639; Sun, 9 Jan 94 01:30:54 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA16354; Sat, 8 Jan 94 16:24:59 PST Date: Sat, 8 Jan 94 16:24:59 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401090024.AA16354@ursula.ee.pdx.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Hooray for Bruno! I'd like to thank Bruno Haible for his infinite patience, skill and investment in CLISP. CLISP is the highest quality software -- commercial, non commercial, GPL'ed, PD, whatever! To say ``I appreciate'' the literally tens of thousands of hours spent developing, testing, debugging, and tuning CLISP is unsufficient and pathetic (at best). The support that Bruno has singlehandedly provided is remarkable by any standard. Unfortunately, spoiling some of us. In the words of Wayne and Garth ``We're not worthy!! We're not worthy!!''... Many, many, many thanks Bruno. Best of luck (not that you need it!) From hjstein@MATH.HUJI.AC.IL Sun Jan 9 08:58:35 1994 Return-Path: Received: from sunset.ma.huji.ac.il by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22919; Sun, 9 Jan 94 08:58:35 +0100 Received: by sunset.ma.huji.ac.il id AA28931 (5.65c/HUJI 4.152 for clisp-list ); Sun, 9 Jan 1994 09:52:31 +0200 Date: Sun, 9 Jan 1994 09:52:31 +0200 From: "Harvey J. Stein" Message-Id: <199401090752.AA28931@sunset.ma.huji.ac.il> To: clisp-list In-Reply-To: <9401082059.AA22370@ma2s2.mathematik.uni-karlsruhe.de> Subject: My last CLISP version Cc: hjstein@MATH.HUJI.AC.IL Bruno Haible writes: > This is my last release of CLISP. I have to concentrate on other things. I'm sorry to see you go! Thanks for the lisp, and good luck in your future endeavors. Harvey Stein From jhi@alpha.hut.fi Sun Jan 9 20:10:33 1994 Return-Path: Received: from alpha.hut.fi by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23193; Sun, 9 Jan 94 20:10:33 +0100 Received: by alpha.hut.fi; id AA29061; Sun, 9 Jan 1994 21:03:13 +0200 Date: Sun, 9 Jan 1994 21:03:13 +0200 From: Jarkko Hietaniemi Message-Id: <9401091903.AA29061@alpha.hut.fi> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp 1994-01-07 installation problems on AXP OSF/1 1.3 Reply-To: Jarkko.Hietaniemi@hut.fi I can't figure what am I doing wrong: the lisp.run always core dumps. I use gcc 2.5.7, -g -DNO_SINGLEMAP -DNO_MULTIMAP_SHM in CFLAGS. I get no errors during configuration with "target", no errors on compilation (lotsa warnings, though). But this all I get, after starting afresh the whole procedure now about 10 ten times: ... gcc -O -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -O2 -g -DNO_SINGLEMAP -DNO_MULTIMAP_SHM spvw.o spvwtabf.o spvwtabs.o spvwtabo.o eval.o control.o pathname.o stream.o socket.o io.o array.o hashtabl.o list.o package.o record.o sequence.o charstrg.o debug.o error.o misc.o predtype.o symbol.o lisparit0.o stdwin.o graph.o unixaux.o libreadline.a -ltermcap -L/usr/lib -lX11 -o lisp.run sync ./lisp.run -m 750KW -x "(load \"init.lsp\") (sys::%saveinitmem) (exit)" /bin/sh: 24219 Memory fault - core dumped make: *** [interpreted.mem] Error 139 ./txt2c < _README > txt.c ... That core above is fruitless: the stack trace (displayed either by gdb 4.11 or DEC dbx) shows nothing useful: the damn thing craps out deep in system malloc() _before_ even entering main(). Could someone who has succesfully compiled CLISP 1994-01-07 on AXP OSF/1 1.3 (_and_ still has the compilation directory intact) please send me uuencoded (maybe gzipped?) the tar made by this command tar cvf /tmp/foo.tar `find . -type f -print | egrep '(ake(file)*|(config|/machine|ports).(h|status))$'` in his compilation directory. This should include all the files created during the configuration, I will compare those with the ones I have. ++jhi; From marcus@ee.pdx.edu Sun Jan 9 20:53:07 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23250; Sun, 9 Jan 94 20:53:07 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA27700; Sun, 9 Jan 94 11:47:07 PST Date: Sun, 9 Jan 94 11:47:07 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401091947.AA27700@ursula.ee.pdx.edu> To: clisp-list Subject: clisp 1994-01-07 installation problems on AXP OSF/1 1.3 In-Reply-To: <9401091903.AA29061@alpha.hut.fi> References: <9401091903.AA29061@alpha.hut.fi> >>>>> "JH" == Jarkko Hietaniemi writes: JH> That core above is fruitless: the stack trace (displayed either by JH> gdb 4.11 or DEC dbx) shows nothing useful: the damn thing craps JH> out deep in system malloc() _before_ even entering main(). I'm sure you've tried this, but have you recompiled without -fomit-frame-pointer (and optimization). Your stack trace description sounds like this is the problem. If not, sorry for the dumb advice. I've been trying to get CLISP working with a Mach MULTIMAP configuration. Unfortunately, I use NEXTSTEP, which lacks external pagers. So I can use the vm_map function. If I figure out a workaround, I'll finish that particular configuration (with IMMUTABLE support). However, it was easy to make a SINGLEMAP configuration based on vm_allocate. It should work with OSF also. If your in a hurry, let me know. Otherwise I'll wait to upload the patches until I figure out a workaround for the memory mapping problem (or get my hands on a complete Mach implementation). From haible Mon Jan 10 00:45:33 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23515; Mon, 10 Jan 94 00:45:33 +0100 Date: Mon, 10 Jan 94 00:45:33 +0100 From: haible (Bruno Haible) Message-Id: <9401092345.AA23515@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Hooray for Bruno! > I'd like to thank Bruno Haible for ... And I would like to thank Michael Stoll. From haible Mon Jan 10 02:23:03 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23657; Mon, 10 Jan 94 02:23:03 +0100 Date: Mon, 10 Jan 94 02:23:03 +0100 From: haible (Bruno Haible) Message-Id: <9401100123.AA23657@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: Re: DOS Executable request Upon request from William Echard : Binaries have been rebuilt for DOS 1369306 Jan 9 20:45 dos/clisp-english.zip DOS 1375995 Jan 9 22:31 dos/clisp-deutsch.zip OS/2 1219436 Jan 10 00:21 os2/clisp.zip The RUN-PROGRAM and PIPE stuff are untested under OS/2. > However, I don't have the skill or free time right now to > compile it myself. Skills? You don't need skills for that. The entire procedure is explained in the INSTALL file. Free time? You get some free time while your computer is busy for two hours :-) Bruno From marcus@ee.pdx.edu Mon Jan 10 03:49:37 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23913; Mon, 10 Jan 94 03:49:37 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA02044; Sun, 9 Jan 94 18:43:30 PST Date: Sun, 9 Jan 94 18:43:30 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401100243.AA02044@ursula.ee.pdx.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Maintaining CLISP The good news is CLISP is a mature portable LISP. More good news is that the maintainer and co-author has larger challenges ahead of him. Bigger fish to fry (or maybe a nice nap). The bad news is the same. I'm no LISP guru, that's for sure. But I use CLISP for `real work' and would like to see it continue to evolve. I'll integrate your patches and try to keep CLISP running. Send your mail to the list or to me as appropriate. I'm no Bruno, but that's life. You'll rarely if ever get enlightened by me, so it probably isn't worth the effort asking (not that I mind). For now we are relying on Bruno's FTP server, and mailing list. If anyone has resources or skills to offer. Please let me know! Thanks. Marcus Daniels From schrod@iti.informatik.th-darmstadt.de Mon Jan 10 12:04:47 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24767; Mon, 10 Jan 94 12:04:47 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA16301 (5.65c/IDA-1.4.4 for ); Mon, 10 Jan 1994 11:57:21 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id LAA11656; Mon, 10 Jan 1994 11:57:19 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA15413; Mon, 10 Jan 1994 11:57:20 +0100 From: Joachim Schrod Message-Id: <9401101057.AA15413@spice.iti.informatik.th-darmstadt.de> Subject: Re: Maintaining CLISP To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 10 Jan 1994 11:57:19 +0100 (MEZ) In-Reply-To: <9401100243.AA02044@ursula.ee.pdx.edu> from "Marcus Daniels" at Jan 10, 94 03:53:31 am X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 675 Marcus Daniels wrote: > > I'll integrate your patches and try to keep CLISP running. Thanks. > For now we are relying on Bruno's FTP server If there is need for another place, I can provide it on ftp.th-darmstadt.de, one of the major ftp archives in Germany. CLISP is there already (in pub/programming/languages/lisp/clisp/), it gets mirrored currently. Cheers, Joachim PS: We will supply binaries for RS/6000 (AIX 3.2) and HP 9000s400 (HP-UX 8) RSN. -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From jbishop@babel.ling.nwu.edu Mon Jan 10 16:34:04 1994 Received: from relay.acns.nwu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA25343; Mon, 10 Jan 94 16:34:04 +0100 Received: from babel.ling.nwu.edu by relay.acns.nwu.edu (4.1/SMI-ACNS-relay-%I%) id AA08446; Mon, 10 Jan 94 09:26:31 CST Return-Path: Received: by babel.ling.nwu.edu (4.1/SMI-4.0) id AA05983; Mon, 10 Jan 94 09:26:29 CST Date: Mon, 10 Jan 1994 09:26:28 -0600 (CST) From: Jeff Bishop Subject: Re: Maintaining CLISP To: clisp-list In-Reply-To: <9401101057.AA15413@spice.iti.informatik.th-darmstadt.de> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII On Mon, 10 Jan 1994, Joachim Schrod wrote: > PS: We will supply binaries for RS/6000 (AIX 3.2) and HP 9000s400 > (HP-UX 8) RSN. > Has anyone tried building binaries for the Mac? Is it possible, or are there some mutual incompatibilities? _____________________________________________________________________________ Jeff Bishop Graduate Student Department of Linguistics Northwestern University From marcus@ee.pdx.edu Tue Jan 11 11:18:12 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26544; Tue, 11 Jan 94 11:18:12 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA06983; Tue, 11 Jan 94 02:11:57 PST Date: Tue, 11 Jan 94 02:11:57 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401111011.AA06983@ursula.ee.pdx.edu> To: clisp-list Subject: Re: Maintaining CLISP In-Reply-To: <9401101057.AA15413@spice.iti.informatik.th-darmstadt.de> References: <9401101057.AA15413@spice.iti.informatik.th-darmstadt.de> >> For now we are relying on Bruno's FTP server Joachim> If there is need for another place, I can provide it on Joachim> ftp.th-darmstadt.de, one of the major ftp archives in Joachim> Germany. CLISP is there already (in Joachim> pub/programming/languages/lisp/clisp/), it gets mirrored Joachim> currently. Good news! Can I get back to you? Bruno didn't say anything to me about your message.. I'll check on his disk-space needs, wishes, etc. Joachim> PS: We will supply binaries for RS/6000 (AIX 3.2) and HP Joachim> 9000s400 (HP-UX 8) RSN. More Good news! Two O.S.'s I don't have access to! Thanks, Marcus Daniels From marcus@ee.pdx.edu Tue Jan 11 12:32:11 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26695; Tue, 11 Jan 94 12:32:11 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA07678; Tue, 11 Jan 94 03:25:56 PST Date: Tue, 11 Jan 94 03:25:56 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401111125.AA07678@ursula.ee.pdx.edu> To: clisp-list Subject: Re: Maintaining CLISP In-Reply-To: References: >>>>> "Jeff" == Jeff Bishop writes: Jeff> Has anyone tried building binaries for the Mac? Is it possible, Jeff> or are there some mutual incompatibilities? I'd be inclined to follow the party line on this one. Incompatibilities? depends how you look at it :-). CLISP GPL status makes me feel like that isn't be something I should be considering. This, and given the quality of MCL and XLISPSTAT for Macs, it's hard to see a motivation for a port. But I don't know the authors' opinion on this matter -- if they were strong, naturally, I'd revise mine. However, there is A/UX support already. I'll help where I can on supporting that. Mach-ten wouldn't be much work either. Macintosh would be among the harder O.S.'s to port to. From haible Tue Jan 11 20:52:27 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27807; Tue, 11 Jan 94 20:52:27 +0100 Date: Tue, 11 Jan 94 20:52:27 +0100 From: haible (Bruno Haible) Message-Id: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: CLISP on the Mac Jeff Bishop : > Has anyone tried building binaries for the Mac? Is it possible, > or are there some mutual incompatibilities? Marcus Daniels : > CLISP GPL status makes me feel like that isn't be something I should > be considering. Why? I don't see any relation between the GPL and Apple or Mac or MacOS. We shouldn't discriminate any computer users just because of the brand of computers or software they use. Perhaps they didn't even buy them themselves, it may be the standard equipment they have to use. Furthermore, I haven't had any negative experience with Apple. They even sent me their Dylan manual without fee :-) Did you have problems with Apple, Brent? > However, there is A/UX support already. I'll help where I can on > supporting that. Thank you, Marcus. > This, and given the quality of MCL and XLISPSTAT for Macs, it's hard to > see a motivation for a port. > Macintosh would be among the harder O.S.'s to port to. But if someone is doing the port, he should be welcome. But apparently less Apple Mac users are inclined to do programming work themselves. Only one out of five who asked me about porting CLISP to the Mac indeed took a look at the source. But he won't finish it: he is now porting Linux to the Mac :-) Just my personal opinion. Bruno From aaronn@LINFIELD.EDU Tue Jan 11 21:09:52 1994 Return-Path: Received: from LINFIELD.EDU (calvin.linfield.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27868; Tue, 11 Jan 94 21:09:52 +0100 Received: by LINFIELD.EDU (5.65/1.35) id AA29486; Tue, 11 Jan 94 12:10:23 -0800 Date: Tue, 11 Jan 1994 12:08:16 -0800 (PST) From: Aaron Neerenberg Subject: Re: CLISP on the Sequent under dynix/ptx 3.1 To: clisp-list In-Reply-To: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Has anyone had much success on this platform? I keep getting the following: make ./lisp.run -m 750KW -x "(load \"init.lsp\") (sys::%saveinitmem) (exit)" Cannot allocate private shared memory segment. errno = 22 ./lisp.run: Not enough memory for Lisp. *** Error code 1 Make: . Stop. lisp.run Cannot allocate private shared memory segment. errno = 22 lisp.run: Not enough memory for Lisp. any thoughts and ideas would be greatly appreciated -aaron neerenberg From brent@amber.ssd.csd.harris.com Tue Jan 11 21:15:39 1994 Return-Path: Received: from travis.csd.harris.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27936; Tue, 11 Jan 94 21:15:39 +0100 Received: from amber.ssd.csd.harris.com by travis.csd.harris.com (5.61/harris-5.1) id AA17805; Tue, 11 Jan 94 15:15:51 -0500 Received: by amber (5.61/CX/UX-5.0) id AA27997; Tue, 11 Jan 94 15:15:48 -0500 Date: Tue, 11 Jan 94 15:15:48 -0500 From: brent@amber.ssd.csd.harris.com (Brent Benson) Message-Id: <9401112015.AA27997@amber> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> (haible@ma2s2.mathematik.uni-karlsruhe.de) Subject: Re: CLISP on the Mac Reply-To: brent@travis.csd.harris.com # Date: Tue, 11 Jan 94 20:53:28 +0100 # From: haible@ma2s2.mathematik.uni-karlsruhe.de (Bruno Haible) # # Furthermore, I haven't had any negative experience with Apple. They even # sent me their Dylan manual without fee :-) # Did you have problems with Apple, Brent? # I dislike Apple's policy as it relates to user interface copyright and related litigation. On the other hand, they have some great products (like Macintosh Common Lisp) and I like the direction they're going as far as far as the Dylan programming langauge is concerned. As I was developing Marlais (an interpreter for a subset of Dylan) they were very open with me. They've also given me an opportunity to give some feedback on the language as its specification solidifies. They people working on the Dylan design are pretty cool. Many of them are Lisp hackers of legendary stature (e.g., David Moon of MIT/Symbolics fame). ;Brent From marcus@ee.pdx.edu Tue Jan 11 21:31:35 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28034; Tue, 11 Jan 94 21:31:35 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA13493; Tue, 11 Jan 94 12:33:10 PST Date: Tue, 11 Jan 94 12:33:10 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401112033.AA13493@ursula.ee.pdx.edu> To: clisp-list Subject: Re: CLISP on the Mac In-Reply-To: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> References: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> >>>>> "Bruno" == Bruno Haible writes: >> CLISP GPL status makes me feel like that isn't be something I >> should be considering. Bruno> Why? I don't see any relation between the GPL and Apple or Mac Bruno> or MacOS. Some FSF folks have strong feelings on the matter. I don't have a strong opinion. I didn't want to interfere with the authors' intent, that's all! Bruno> We shouldn't discriminate any computer users just because of Bruno> the brand of computers or software they use. Perhaps they Bruno> didn't even buy them themselves, it may be the standard Bruno> equipment they have to use. Well, boycotts are have drawbacks. That's for sure. >> This, and given the quality of MCL and XLISPSTAT for Macs, it's >> hard to see a motivation for a port. Macintosh would be among the >> harder O.S.'s to port to. Bruno> But if someone is doing the port, he should be welcome. But Bruno> apparently less Apple Mac users are inclined to do programming Bruno> work themselves. Only one out of five who asked me about Bruno> porting CLISP to the Mac indeed took a look at the source. But Bruno> he won't finish it: he is now porting Linux to the Mac :-) Jeff: your answer! From marcus@ee.pdx.edu Tue Jan 11 21:47:44 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28134; Tue, 11 Jan 94 21:47:44 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA13681; Tue, 11 Jan 94 12:49:22 PST Date: Tue, 11 Jan 94 12:49:22 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401112049.AA13681@ursula.ee.pdx.edu> To: clisp-list Subject: Re: CLISP on the Sequent under dynix/ptx 3.1 In-Reply-To: References: >>>>> "Aaron" == Aaron Neerenberg writes: Aaron> any thoughts and ideas would be greatly appreciated Yes, I've compiled it. But without shared memory. Not ideal, but it works. A few other minor things. I'm not familar with the PTX memory map, but would be relatively easy to fix. I'll put binaries and the patches up as soon as I can. I need to clean up the autoconfiguration. Email me if you need quick fixes. From marsj@ida.liu.se Tue Jan 11 22:03:29 1994 Return-Path: Received: from ida.liu.se (curofix.ida.liu.se) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28314; Tue, 11 Jan 94 22:03:29 +0100 Received: from obelix by ida.liu.se (5.65b/ida.minimaster-V1.0b6d5) id AA23022; Tue, 11 Jan 94 22:03:45 +0100 From: Martin Sjolin Received: from obel27 by obelix (5.65b/ida.slave-V1.0b3) id AA03484; Tue, 11 Jan 94 22:03:43 +0100 Received: by obel27 (5.65b/ida.slave-V1.0b3) id AA24162; Tue, 11 Jan 94 22:03:41 +0100 Date: Tue, 11 Jan 94 22:03:41 +0100 Message-Id: <9401112103.AA24162@obel27> To: clisp-list Subject: Re: CLISP on the Mac In-Reply-To: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> References: <9401111952.AA27807@ma2s2.mathematik.uni-karlsruhe.de> >>>>> "Bruno" == Bruno Haible writes: Bruno> Jeff Bishop : >> Has anyone tried building binaries for the Mac? Is it possible, >> or are there some mutual incompatibilities? Should not be that hard, but take some time. Preferably using "using" gcc under MPW, apple's cc or think C. Bruno> But if someone is doing the port, he should be welcome. But apparently Bruno> less Apple Mac users are inclined to do programming work themselves. Bruno> Only one out of five who asked me about porting CLISP to the Mac indeed Bruno> took a look at the source. But he won't finish it: he is now porting Linux Bruno> to the Mac :-) Since I'm the individual refereed to above :-) ... I been teaching (Common) Lisp for three years now, and i have put up the last releases of CLISP (Amiga, Atari, PC) etc to enable the student to do some programming at home. I started in on the mac port quite some time ago, but then the linux port (half finished now) took a higher priority (!). A change of job further have pushed these side activities further down the list (working with an object-centered database running on regular unix system (including linux) distributed under GPL), but hopefully I should be to do some work on clisp/maclinux during this spring ... Regards, msj PS. I tend to agree with Bruno, it looks like Apple Mac User do less programming work themself! -- Martin Sj\"olin | e-mail: marsj@ida.liu.se Intelligent Information Systems Laboratory | phone : +46 13 28 24 10 Department of Computer and Information Science | fax : +46 13 28 26 66 University of Link\"oping, S-581 83 Link\"oping, SWEDEN From dxs@evolving.com Tue Jan 11 22:23:20 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28493; Tue, 11 Jan 94 22:23:20 +0100 Received: by csn.org with UUCP id AA21899 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Tue, 11 Jan 1994 14:23:37 -0700 Received: from natasha by kafka (AIX 3.2/UCB 5.64/4.03) id AA75100; Tue, 11 Jan 1994 14:14:37 -0700 Received: by natasha (AIX 3.2/UCB 5.64/4.03) id AA97140; Tue, 11 Jan 1994 14:14:58 -0700 Date: Tue, 11 Jan 1994 14:14:58 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9401112114.AA97140@natasha> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clx, c function calls from clisp i am running garnet, clx and clisp on a rs6000. unfortunatly it is very slow. to improve its speed i am wondering which would be better. rewrite clx in c and include it into the clisp executable or build a c interface to clisp or some other option that i havent thought of. does anybody have any thoughts on the subject? thanks, dan stanger dxs@evolving.com From donc@ISI.EDU Tue Jan 11 23:26:02 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28750; Tue, 11 Jan 94 23:26:02 +0100 Received: from ips.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Tue, 11 Jan 1994 14:26:21 -0800 Date: Tue, 11 Jan 94 14:27:26 -0800 Posted-Date: Tue, 11 Jan 94 14:27:26 -0800 Message-Id: <9401112227.AA07710@ips.isi.edu> Received: by ips.isi.edu (1.37.109.4/4.0.3-4) id ; Tue, 11 Jan 94 14:27:26 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: enhancements needed, resources for achieving them I've been discussing (via netmail) with Bruno and, more recently Marcus, some enhancements to CLISP that we (at least I) think would be useful. I thought it was time to open the discussion to a wider audience. As the subject line indicates, it is not only useful to see what the larger community desires, but also what resources are available for achieving it. Therefore I urge you to respond to this message not only if you have opinions about how CLISP should be enhanced, but also if you are capable and interested in contributing to the effort. It seems that there are several different sorts of human resources that would be useful: lisp programming ability, C programming ability, and familiarity with various operating systems. Now on to the enhancements. I'll start with the ones I've been hoping for. - a good implementation of the stdwin library for DOS The current implementation only provides for one window - the full screen. I'd like to be able to use others (rectangular regions within the screen). If necessary I can describe in more detail what is required or you can see for yourself by looking at the stdwin documentation. I assume that people who use other systems (like MSWindows) would also like reasonable implementations of stdwin, or some other access to their window systems. I don't know much about which implementations of stdwin are reasonably complete or what other systems are well integrated with CLISP. I'm sure you'll tell me, though. - a "generic" stream capability, where the programmer supplies lisp functions to do all the primitive operations on the stream. I'm convinced that this would be easy for anyone who is capable of changing the CLISP source. (Again I can supply more details to anyone who's interested.) I'm prepared, if necessary, to use this capability (if it is provided) to implement the one above in lisp. another that Marcus has suggested: - foreign function interface (He has suggested a few others but I'm not sure what he has in mind, so I'll let him speak for himself.) Another possible enhancement that comes to mind: - support for "multiple processes" that share the same lisp address space (I'm not asking for it since I don't need it at the moment.) Bruno seemed opposed to this when I last mentioned it to him. I don't know how hard it would be to implement (might be hard). From marsj@ida.liu.se Tue Jan 11 23:53:23 1994 Return-Path: Received: from ida.liu.se (curofix.ida.liu.se) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28820; Tue, 11 Jan 94 23:53:23 +0100 Received: from obelix by ida.liu.se (5.65b/ida.minimaster-V1.0b6d5) id AA26508; Tue, 11 Jan 94 23:53:24 +0100 From: Martin Sjolin Received: from obel27 by obelix (5.65b/ida.slave-V1.0b3) id AA03949; Tue, 11 Jan 94 23:53:22 +0100 Received: by obel27 (5.65b/ida.slave-V1.0b3) id AA27573; Tue, 11 Jan 94 23:53:22 +0100 Date: Tue, 11 Jan 94 23:53:22 +0100 Message-Id: <9401112253.AA27573@obel27> To: clisp-list Subject: enhancements needed, resources for achieving them In-Reply-To: <9401112227.AA07710@ips.isi.edu> References: <9401112227.AA07710@ips.isi.edu> >>>>> "Don" == Don Cohen writes: Don> Now on to the enhancements. I'll start with the ones I've been hoping for. Don> - a good implementation of the stdwin library for DOS Don> The current implementation only provides for one window - the full screen. Don> I'd like to be able to use others (rectangular regions within the screen). Don> If necessary I can describe in more detail what is required or you can see Don> for yourself by looking at the stdwin documentation. Don> I assume that people who use other systems (like MSWindows) would also Don> like reasonable implementations of stdwin, or some other access to their Don> window systems. I don't know much about which implementations of stdwin Don> are reasonably complete or what other systems are well integrated with Don> CLISP. I'm sure you'll tell me, though. Also, I'm VERY interesting to see a clisp (possible structure) (like the Medley editor, SEDIT) or any more powerfull editor written in Clisp, running in lisp. If and when you have a "multiple processes" then each editor could be running in its own process. Don> another that Marcus has suggested: Don> - foreign function interface YES, together with a dynamic loading interface. For the dynamic loading we can use either the dld (GNU) or the tcl/tk implementation (I think it different than dld, but not sure). Don> - support for "multiple processes" that share the same lisp address Don> space (I'm not asking for it since I don't need it at the moment.) Don> Bruno seemed opposed to this when I last mentioned it to him. I don't Don> know how hard it would be to implement (might be hard). Bruno, could you extend your thought on this? Of course you could always use an existing thread packae(?), but i do not how portable these are and to what degree that might help us! msj -- Martin Sj\"olin | e-mail: marsj@ida.liu.se Intelligent Information Systems Laboratory | phone : +46 13 28 24 10 Department of Computer and Information Science | fax : +46 13 28 26 66 University of Link\"oping, S-581 83 Link\"oping, SWEDEN From attardi@DI.UniPi.IT Thu Jan 13 00:27:33 1994 Return-Path: Received: from apollo.di.unipi.it by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29928; Thu, 13 Jan 94 00:27:33 +0100 Message-Id: <9401122327.AA29928@ma2s2.mathematik.uni-karlsruhe.de> Received: by apollo.di.unipi.it (16.7/16.2) id AA24276; Thu, 13 Jan 94 00:27:02 +0100 Organization: Dipartimento di Informatica - Universita' di Pisa - Italy Date: Thu, 13 Jan 94 00:27:02 +0100 From: Giuseppe Attardi To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: enhancements needed, resources for achieving them I just want to mention some work that I have been doing that might be of relevance to this discussion. I have an implementation of an Embeddable Common Lisp (ECL). It compiles from Lisp to C (like AKCL, from which it is derived) using standard C procedure conventions. This provides a two-way foreign function interface: from Lisp to C and from C to Lisp. Lisp functions can be called from C, and of course also the opposite is easy. ECL uses a conservative GC, so that Lisp objects can be passed to C procedures without worring of them being garbage collected. Compiled C code is loaded dynamically with a dynamic loader. ECL includes a native CLOS implementation and a Multiple Thread facility. I currently have versions of ECL for Sun, SGI and DOS. Code is available for HP and IBM-RT, but I have not tested these yet. I think CLISP and ECL have complementary features that might be worth integrating. I am currenting writing documentation and restructuring the code to improve modularity. The goal is to create a library with the run-time support so that a Lisp kernel can be incorporated in applications. ECL is free software available under the GNU GPL. Interested people can ask me where to ftp the sources. The following table compares the performance of several PD CL. Times are in seconds on a Sun4 ECL diskless with 16MB of memory. The following table compares the performance of several PD CL. Times are in seconds on a Sun4 ECL diskless with 16MB of memory. Bench ECL AKCL CMU CLISP (0.1) (1.615) (16f) (5.5) BOYER 2.067 2.233 4.100 22.600 BROWSE 3.750 4.167 9.130 15.510 CTAK 0.967 1.517 0.500 4.270 DDERIV 1.717 1.200 1.980 5.000 DERIV 1.200 0.817 1.910 3.800 DESTRU 0.350 0.400 0.340 2.070 DIV2 2.467 2.033 1.990 4.860 FFT 2.317 71.333 0.410 9.900 FPRINT 0.167 0.150 0.990 0.260 FREAD 0.133 0.167 0.810 0.320 PUZZLE 1.833 1.300 1.300 17.990 STAK 0.000 0.550 0.380 1.920 TAK 0.200 0.067 0.080 0.890 TAKL 0.267 0.283 0.520 4.300 TAKR 0.233 0.100 0.190 2.260 TPRINT 0.117 0.167 1.270 3.110 TRAVERSE 6.783 6.717 11.310 69.780 TRIANG 10.067 13.133 32.210 198.220 -- Beppe From donc@ISI.EDU Thu Jan 13 00:48:24 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29993; Thu, 13 Jan 94 00:48:24 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Wed, 12 Jan 1994 15:48:12 -0800 Date: Wed, 12 Jan 94 15:49:14 -0800 Posted-Date: Wed, 12 Jan 94 15:49:14 -0800 Message-Id: <9401122349.AA15502@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Wed, 12 Jan 94 15:49:14 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: attardi@di.unipi.it, clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: ECL - more details please! I'd appreciate more details, such as: - How large is the image? - How conformant is it to CLtL1, CLtL2, proposed Ansi CL? - What are the limitations on heap size, stack size, etc.? - Does it do its own paging or must everything fit in main memory? (This question only applies to OS's like DOS that don't do this for you.) - Is it able to call DOS/UNIX programs (like CLISP)? - Does it contain any support for screen windows, as described in earlier messages? - Does it contain any support for window systems such as MSWindows, X, etc.? - Does it compile into native machine instructions or use a byte code interpreter? Pretend that I also asked any other questions that you think a prospective user would be interested in. From attardi@DI.UniPi.IT Thu Jan 13 02:30:37 1994 Return-Path: Received: from apollo.di.unipi.it by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00207; Thu, 13 Jan 94 02:30:37 +0100 Message-Id: <9401130130.AA00207@ma2s2.mathematik.uni-karlsruhe.de> Received: by apollo.di.unipi.it (16.7/16.2) id AA24673; Thu, 13 Jan 94 02:29:52 +0100 Organization: Dipartimento di Informatica - Universita' di Pisa - Italy Date: Thu, 13 Jan 94 02:29:52 +0100 From: Giuseppe Attardi To: donc@ISI.EDU Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Don Cohen's message of Wed, 12 Jan 94 15:49:14 -0800 <9401122349.AA15502@hpai19.isi.edu> Subject: ECL - more details please! Date: Wed, 12 Jan 94 15:49:14 -0800 Posted-Date: Wed, 12 Jan 94 15:49:14 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU I'd appreciate more details, such as: - How large is the image? The kernel without compiler is 700KB, with compiler and some preallocated memory 2MB. - How conformant is it to CLtL1, CLtL2, proposed Ansi CL? It is fully CLtL1 conformant. It has a CLtL2-conformant CLOS. - What are the limitations on heap size, stack size, etc.? Those of your machine: heap is obtained with sbrk, the stack is the C stack. - Does it do its own paging or must everything fit in main memory? (This question only applies to OS's like DOS that don't do this for you.) It relies on the OS for paging: on DOS it uses go32. - Is it able to call DOS/UNIX programs (like CLISP)? Definitely: either through a direct function call or through the Lisp function (SYSTEM string). - Does it contain any support for screen windows, as described in earlier messages? No. - Does it contain any support for window systems such as MSWindows, X, etc.? I have a specially optimized version of CLX. - Does it compile into native machine instructions or use a byte code interpreter? It compiles to C and then uses the C compiler on your machine to generate native code. From buyukisik_osman@ae.ge.com Thu Jan 13 13:45:15 1994 Return-Path: Received: from crdems.ge.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01013; Thu, 13 Jan 94 13:45:15 +0100 Received: from c0228.ae.ge.com by crdems.ge.com (5.65/GE 1.73) id AA26441; Thu, 13 Jan 94 07:40:05 -0500 Message-Id: <9401131240.AA26441@crdems.ge.com> Received: from c0230.ae.ge.com by c0228.ae.ge.com with SMTP(1.37.187.4/15.6) id AA29621; Thu, 13 Jan 94 07:43:05 -0500 Received: by c0230.ae.ge.com(1.37.187.4/16.2) id AA10267; Thu, 13 Jan 94 07:44:09 -0500 Date: Thu, 13 Jan 94 07:44:09 -0500 From: U-E59264-Osman Buyukisik To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9401122327.AA29928@ma2s2.mathematik.uni-karlsruhe.de> (message from Giuseppe Attardi on Thu, 13 Jan 94 00:31:23 +0100) Subject: Re: enhancements needed, resources for achieving them Hi, Where can I get a copy for dos and HP710 hpux8.07a? Thanks Osman From marcus@ee.pdx.edu Thu Jan 13 15:24:05 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01220; Thu, 13 Jan 94 15:24:05 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA00614; Thu, 13 Jan 94 06:25:05 PST Date: Thu, 13 Jan 94 06:25:05 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401131425.AA00614@ursula.ee.pdx.edu> To: buyukisik_osman@ae.ge.com Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: location of CLISP Source is located at: ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source Current source code: clispsrc.tar.z Binaries can be found at: ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/binaries Joachim Scrod mirrors most of this on: ftp.th-darmstadt.de:/pub/programming/languages/lisp/clisp Here is the current list: 386bsd amiga atari coherent386 dec5000-ultrix decalpha-osf dos hp9000s800 linux os2 rs6000 sgi-irix4 sun3-sunos4 sun386 sun4-solaris21 -> sun4-sunos51 sun4-solaris22 -> sun4-sunos52 sun4-sunos4 sun4-sunos51 sun4-sunos52 Of these, I can only test: dos linux sun4-sunos4 If there is interest I can also build binaries for: NEXTSTEP 3.[12] PTX (SYSV) Please coordinate with me if you can't find what you need. Thanks, Marcus Daniels From kaehms@sedbsvr.se.ssd.lmsc.lockheed.com Thu Jan 13 15:57:42 1994 Return-Path: Received: from eagle.is.lmsc.lockheed.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01291; Thu, 13 Jan 94 15:57:42 +0100 Received: from sedbsvr.ssd.lmsc.lockheed.com by eagle.is.lmsc.lockheed.com (5.65/Ultrix4.3-C) id AA07803; Thu, 13 Jan 1994 06:57:00 -0800 Message-Id: <9401131457.AA07803@eagle.is.lmsc.lockheed.com> Received: by sedbsvr.se.ssd.lmsc.lockheed.com (1.36.108.7/16.2) id AA12692; Thu, 13 Jan 1994 06:56:47 -0800 From: Bob Kaehms Subject: x To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 13 Jan 94 6:56:47 PST In-Reply-To: <9401131240.AA26441@crdems.ge.com>; from "U-E59264-Osman Buyukisik" at Jan 13, 94 1:48 pm Mailer: Elm [revision: 70.30] > > Hi, > Where can I get a copy for dos and HP710 hpux8.07a? > Thanks > > Osman > ftp.cae.wisc.edu... (if you are looking for clisp.. it might be an old copy though) > From haible Thu Jan 13 17:25:10 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01524; Thu, 13 Jan 94 17:25:10 +0100 Date: Thu, 13 Jan 94 17:25:10 +0100 From: haible (Bruno Haible) Message-Id: <9401131625.AA01524@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: location of clisp > ftp.cae.wisc.edu... (if you are looking for clisp.. it might be an old copy This FTP server contains only HP-UX binaries, from a very old clisp version (not even CLOS). Please use the binaries on ma2s2.mathematik.uni-karlsruhe.de instead: HP 9000/800/700, HP-UX 1242849 Jan 13 16:22 hp9000s800/clisp.tar.z Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Thu Jan 13 17:41:34 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01587; Thu, 13 Jan 94 17:41:34 +0100 Date: Thu, 13 Jan 94 17:41:34 +0100 From: haible (Bruno Haible) Message-Id: <9401131641.AA01587@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: enhancements needed, resources for achieving them [Forwarded from David Gadbois = .] Date: Tue, 11 Jan 1994 16:28-0600 From: donc@ISI.EDU (Don Cohen) I've been discussing (via netmail) with Bruno and, more recently Marcus, some enhancements to CLISP that we (at least I) think would be useful. I thought it was time to open the discussion to a wider audience. Here are a few things (in no particular order) I plan to work on whenever I get the time over the next few months: o Logical pathnames (2/3 done) o A fancy debugger o LOOP o Source code locators o Who-calls o ILISP interface (mostly working) If you are already working on some of these or have thoughts on what is needed, please let me know. These are is all straightforward things that can be pretty much just churned out. (Well, not the debugger.) More ambitious projects I would like to do but will probably never have enough time to get around to are: o Threads Doing a nice thread package ala Genera/Lucid/Allegro involves changing things at a really basic level, since assumptions the system makes about global state will not necessarily hold. And doing it portably without giving up on using the C stack would be really tricky. o More compiler analysis I really like having a compiler that really grovels over the source code looking for problems ala CMU CL. - a "generic" stream capability, where the programmer supplies lisp functions to do all the primitive operations on the stream. The hard parts of this appear to be designing a good, extensible protocol and dealing with system bootstrapping issues. Check out the Gray stream proposal on parcftp for a semi-standardized generic stream interface for "character" streams. A complete solution would have to deal with block-oriented streams, asynchronous events, encapsulation, etc. The stream protocol in the CLIM 2.0 spec may be a good guide for all this that. --David Gadbois From donc@ISI.EDU Thu Jan 13 18:01:03 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01676; Thu, 13 Jan 94 18:01:03 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Thu, 13 Jan 1994 09:00:59 -0800 Date: Thu, 13 Jan 94 09:02:03 -0800 Posted-Date: Thu, 13 Jan 94 09:02:03 -0800 Message-Id: <9401131702.AA17742@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Thu, 13 Jan 94 09:02:03 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU Tp: David Gadbois Subject: loop, editor To: clisp-list I've been using the "ansi loop" package that I got from the CMU archive. It compiles and loads with no trouble in CLISP. It claims to conform to the ansi proposal and so far I have no reason to doubt it. I've also installed it in place of the Lucid supplied loop in lucid CL at work and made a large system with lots of loops work with only minor change - which I believe is justified by the standard. So "no reason to doubt" is not just for lack of trying. It's also easy to extend. I'd recommend trying it before you waste any time trying to modify another one or building your own. Another topic: Another thing that I've heard is that people would like to integrate clisp (or other lisps) with editors on DOS. My normal mode of using lisp at work is through gnu emacs and I assume that's what people would like. It's what I'd like on DOS if I only had a window system. (I know I could use MSwindows - but at the moment we don't have a CLISP interface to that either, e.g., an implementation of STDWIN.) One problem is that I don't have an editor that does that on the PC. Have any of you actually tried OEMACS, and does it work in that mode with CLISP? I probably don't have room for OEMACS (another reason I'm trying to avoid windows). I've tried it with EPSILON (the editor I normally use on the PC, from Lugaru Software, another EMACS like editor that does allow a shell window) (Note also that epsilon is not free) but I can't get CLISP to run in that shell. I haven't yet determined what the cause is. CLISP starts ok but the keyboard input gets lost somewhere between epsilon and clisp. (Each side, of course, suspects the other.) Another problem is that if your lisp application wants to do graphics etc. then you can't do that to the emacs buffer. That's why you'd need to be able to create and use other windows from CLISP. I have been using another partial solution that may interest some of you. I use the ability of CLISP to call DOS programs to simulate a top level loop in epsilon. The top level loop calls epsilon with a command that I've defined in epsilon. This puts a transcript file in one window and an empty input buffer in another (these are two halves of the edit window). I create a sequence of lisp forms to be evaluated in the input window and then use another command that I've defined (meta return) to indicate that I'm done. This causes the input buffer to be written and returns to lisp. Lisp evaluates the forms, pretty prints them, along with their results to the transcript file, and then calls the editor again for more input. (Standard output is bound to the transcript file as well.) Any program that does a lot of graphic input and output works fine (although the output on the screen does not survive the call to the editor). Among the limitations are the fact that the debugger does not use the editor, and the fact that the editor context (what files are open, what string you last searched for, etc.) is lost between interactions. Nevertheless, it's pretty reasonable for lots of stuff. The MSWindows solution seems plausible (at the cost of running windows) if and when we get a CLISP interface to the windows. problem is o Logical pathnames (2/3 done) o A fancy debugger o LOOP o Source code locators o Who-calls o ILISP interface (mostly working) If you are already working on some of these or have thoughts on what is needed, please let me know. These are is all straightforward things that can be pretty much just churned out. (Well, not the debugger.) More ambitious projects I would like to do but will probably never have enough time to get around to are: o Threads Doing a nice thread package ala Genera/Lucid/Allegro involves changing things at a really basic level, since assumptions the system makes about global state will not necessarily hold. And doing it portably without giving up on using the C stack would be really tricky. o More compiler analysis I really like having a compiler that really grovels over the source code looking for problems ala CMU CL. - a "generic" stream capability, where the programmer supplies lisp functions to do all the primitive operations on the stream. The hard parts of this appear to be designing a good, extensible protocol and dealing with system bootstrapping issues. Check out the Gray stream proposal on parcftp for a semi-standardized generic stream interface for "character" streams. A complete solution would have to deal with block-oriented streams, asynchronous events, encapsulation, etc. The stream protocol in the CLIM 2.0 spec may be a good guide for all this that. --David Gadbois From calistri@oracorp.com Thu Jan 13 19:24:15 1994 Return-Path: Received: from oracorp.com (scylla.oracorp.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06186; Thu, 13 Jan 94 19:24:15 +0100 Received: from mars.oracorp.com by oracorp.com (4.1/2.1-ORA Corporation) id AA00753; Thu, 13 Jan 94 13:23:11 EST Date: Thu, 13 Jan 94 13:23:09 EST Received: by mars.oracorp.com (4.1/1.3-ORA Corporation) id AA14362; Thu, 13 Jan 94 13:23:09 EST Message-Id: <9401131823.AA14362@mars.oracorp.com> From: calistri@oracorp.com (Randy Calistri-Yeh) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: current source file? What is the proper way in CLISP to retrieve the name of the current source file (the equivalent of Lucid's and Allegro's *source-pathname*)? ______________________________________________________________________ ORA calistri@oracorp.com 301 Dates Dr. ==> Randy Calistri-Yeh <== (607) 277-2020 Ithaca, NY 14850 Fax: (607) 277-3206 ______________________________________________________________________ From haible Thu Jan 13 19:39:09 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06251; Thu, 13 Jan 94 19:39:09 +0100 Date: Thu, 13 Jan 94 19:39:09 +0100 From: haible (Bruno Haible) Message-Id: <9401131839.AA06251@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: current source file? > What is the proper way in CLISP to retrieve the name of the current > source file (the equivalent of Lucid's and Allegro's *source-pathname*)? Since 1993-11-08, CLISP has the variables *LOAD-PATHNAME*, *LOAD-TRUENAME*, *COMPILE-FILE-PATHNAME*, *COMPILE-FILE-TRUENAME*. See CLtL2 for details. In CLISP there is no way to get at the file name a particular function came from. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From blake@netcom.com Fri Jan 14 02:24:27 1994 Return-Path: Received: from mail.netcom.com (netcom4.netcom.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06947; Fri, 14 Jan 94 02:24:27 +0100 Received: from localhost by mail.netcom.com (8.6.4/SMI-4.1/Netcom) id RAA19560; Thu, 13 Jan 1994 17:24:52 -0800 From: blake@netcom.com (Blake McBride) Message-Id: <199401140124.RAA19560@mail.netcom.com> Subject: Re: enhancements needed, resources for achieving them To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 13 Jan 1994 17:24:49 -0800 (PST) In-Reply-To: <9401131641.AA01587@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jan 13, 94 05:42:18 pm X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 285 I think a nice enhancement which should be simple is to allow the loading and saving of arbitrary image files by name without having to exit CLISP. -- Blake McBride (615) 790-8521 voice 3020 Liberty Hills Drive (615) 791-7736 fax Franklin, TN 37064 blake@netcom.com U.S.A. From dxs@evolving.com Fri Jan 14 06:14:59 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07124; Fri, 14 Jan 94 06:14:59 +0100 Received: by csn.org with UUCP id AA19304 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Thu, 13 Jan 1994 22:14:52 -0700 Received: from natasha by kafka (AIX 3.2/UCB 5.64/4.03) id AA22974; Thu, 13 Jan 1994 19:03:49 -0700 Received: by natasha (AIX 3.2/UCB 5.64/4.03) id AA115597; Thu, 13 Jan 1994 19:04:12 -0700 Date: Thu, 13 Jan 1994 19:04:12 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9401140204.AA115597@natasha> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: terminal-raw mode has anybody used terminal-raw mode in clisp using the rs6000? my program is the following (defun get-field ( stream y-position x-position field-length) (let ((s (make-string field-length))) (screen:set-window-cursor-position stream y-position x-position) (system::terminal-raw *keyboard-input* t) (do ((i 0)) ((> i field-length)) (setf (char s i) (read-char *keyboard-input*)) (break) (setf i (+ i 1))) (system::terminal-raw *keyboard-input* nil) s)) (setf s (screen:make-window)) when i execute (get-field s 10 10 3) the read-char does not terminate until a carriage return is pressed. i would like to be able to read all the keystrokes entered. thanks, dan stanger dxs@evolving.com From haible Fri Jan 14 17:43:08 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12405; Fri, 14 Jan 94 17:43:08 +0100 Date: Fri, 14 Jan 94 17:43:08 +0100 From: haible (Bruno Haible) Message-Id: <9401141643.AA12405@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: terminal-raw mode > my program is the following > (system::terminal-raw *keyboard-input* t) ... > (system::terminal-raw *keyboard-input* nil) I suggest you use the macro WITH-KEYBOARD documented in impnotes.txt instead of using Unix specific, undocumented CLISP internals. A look into the CLISP source reveals that system::terminal-raw expects *terminal-io* as argument, not *keyboard-input*. Btw, your comparison should read (>= i field-length) in > (let ((s (make-string field-length))) > (do ((i 0)) ((> i field-length)) > ... > (setf i (+ i 1))) Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From schrod@iti.informatik.th-darmstadt.de Fri Jan 14 18:06:37 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12490; Fri, 14 Jan 94 18:06:37 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA05485 (5.65c/IDA-1.4.4 for ); Fri, 14 Jan 1994 18:06:23 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id SAA16812; Fri, 14 Jan 1994 18:06:21 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA18007; Fri, 14 Jan 1994 18:06:23 +0100 From: Joachim Schrod Message-Id: <9401141706.AA18007@spice.iti.informatik.th-darmstadt.de> Subject: Re: terminal-raw mode To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 14 Jan 1994 18:06:22 +0100 (MEZ) In-Reply-To: <9401141643.AA12405@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jan 14, 94 05:46:24 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 646 Bruno wrote: > > I suggest you use the macro WITH-KEYBOARD documented in impnotes.txt Apropos impnotes.txt... It (and CHANGES.LOG) describe the new support for some CLtL2 constructs. This was not updated in cltl2.txt. Is there anything to note concerning this new features? Or may I just change all `no' entries to `yes' for the respective X3J13 votes? (We supply cltl2.txt as one of the information files to our users.) Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From haible Fri Jan 14 18:41:36 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12716; Fri, 14 Jan 94 18:41:36 +0100 Date: Fri, 14 Jan 94 18:41:36 +0100 From: haible (Bruno Haible) Message-Id: <9401141741.AA12716@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: cltl2.txt Joachim Schrod : > ... the new support for some CLtL2 constructs. > Is there anything to note concerning these new features? impnotes.txt mentions every deviation from CLtL2. > Or may I just change all `no' entries to `yes' for the respective > X3J13 votes? Yes. X3J13 votes <30>, <31>, <186> deserve a `yes'. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From marcus@ee.pdx.edu Fri Jan 14 18:46:02 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12847; Fri, 14 Jan 94 18:46:02 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA29920; Fri, 14 Jan 94 09:47:08 PST Date: Fri, 14 Jan 94 09:47:08 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401141747.AA29920@ursula.ee.pdx.edu> To: clisp-list Subject: Re: terminal-raw mode In-Reply-To: <9401141706.AA18007@spice.iti.informatik.th-darmstadt.de> References: <9401141706.AA18007@spice.iti.informatik.th-darmstadt.de> >>>>> "JS" == Joachim Schrod writes: JS> Apropos impnotes.txt... It (and CHANGES.LOG) describe the new JS> support for some CLtL2 constructs. This was not updated in JS> cltl2.txt. Is there anything to note concerning this new JS> features? Or may I just change all `no' entries to `yes' for the JS> respective X3J13 votes? (We supply cltl2.txt as one of the JS> information files to our users.) Thanks, I'll update cltl2.txt with these notes. Marcus From haible Sat Jan 15 16:59:57 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA13968; Sat, 15 Jan 94 16:59:57 +0100 Date: Sat, 15 Jan 94 16:59:57 +0100 From: haible (Bruno Haible) Message-Id: <9401151559.AA13968@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: using Tk in clisp? [Forwarded from Xiaoli Huang ] Is there ongoing work at using Tk from clisp? There's already STK, which allows one to use scheme to drive tk. But I'd prefer to use common lisp, and clisp in particular, to do that. hxl From kuroda@skydog.msi.co.jp Wed Jan 19 13:08:21 1994 Received: from mcsun.EU.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20165; Wed, 19 Jan 94 13:08:21 +0100 Received: by mcsun.EU.net with UUCP id AA11261 (5.65b/CWI-2.242); Wed, 19 Jan 1994 13:07:12 +0100 Received: by kddlab.kddlabs.co.jp (5.61/6.2Junet) id AA00599; Wed, 19 Jan 94 20:44:03 +0900 Received: from skydog.msi.co.jp by msisun.msi.co.jp (4.2/6.4J.5-msi.1.0) id AA24885; Wed, 19 Jan 94 15:48:54 JST Return-Path: Received: by skydog.msi.co.jp (5.67/1.37) id AA26669; Wed, 19 Jan 94 15:46:08 +0900 Date: Wed, 19 Jan 94 15:46:08 +0900 From: kuroda@skydog.msi.co.jp (Hisao Kuroda) Message-Id: <9401190646.AA26669@skydog.msi.co.jp> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp with comint Hello. I now try to use CLISP with emacs(comint). But there's one problem. When I send string to comint like, (process-send-string "*clisp*" "1\n2\n") then, CLISP answers just like below, > 1 > but my expectation is, > 1 > 2 > Why CLISP ignore the string "2\n"? Can anyone tell me why this happen, and how can I fix this. thank you. From hoehle@post.inf-wiss.ivp.uni-konstanz.de Wed Jan 19 13:47:34 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20288; Wed, 19 Jan 94 13:47:34 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA09237; Wed, 19 Jan 94 13:46:26 +0100 Date: Wed, 19 Jan 94 13:46:26 +0100 Message-Id: <9401191246.AA09237@inf-wiss.ivp.uni-konstanz.de> From: hoehle@post.inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Cc: kuroda@skydog.msi.co.jp (Hisao Kuroda) Subject: clisp with comint In-Reply-To: <9401190646.AA26669@skydog.msi.co.jp> References: <9401190646.AA26669@skydog.msi.co.jp> Hisao Kuroda writes: > I now try to use CLISP with emacs(comint). But there's one problem. > When I send string to comint like, > > (process-send-string "*clisp*" "1\n2\n") > > then, CLISP answers just like below, > > > 1 > > Why CLISP ignore the string "2\n"? > Can anyone tell me why this happen, and how can I fix this. When CLISP enters the read part of read-eval-print loop, CLISP empties the input queue to be sure not to get old input. This is why you can only input one lisp form. This is what makes CLISP interaction with EMACS through shell/comint/cmulisp so difficult, because there several Lisp forms are sent to the CLISP process at once. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From schrod@iti.informatik.th-darmstadt.de Wed Jan 19 14:49:32 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20381; Wed, 19 Jan 94 14:49:32 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA41647 (5.65c/IDA-1.4.4 for ); Wed, 19 Jan 1994 14:48:29 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id OAA20908; Wed, 19 Jan 1994 14:48:28 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA13264; Wed, 19 Jan 1994 14:48:28 +0100 From: Joachim Schrod Message-Id: <9401191348.AA13264@spice.iti.informatik.th-darmstadt.de> Subject: Re: clisp with comint To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 19 Jan 1994 14:48:27 +0100 (MEZ) In-Reply-To: <9401191246.AA09237@inf-wiss.ivp.uni-konstanz.de> from "Joerg-Cyril Hoehle" at Jan 19, 94 01:51:04 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 859 Joerg Hoehle wrote: > > When CLISP enters the read part of read-eval-print loop, CLISP empties > the input queue to be sure not to get old input. This is why you can > only input one lisp form. Does this happen always? In the past, I used CLISP with ILISP. I used a no-readline version of CLISP and had to change the process-connection-type to t (i.e., to use pipes instead of pttys). Then it worked. Later I dropped the ILISP usage because I had not adapted all the other stuff needed, and I never found the time to look into that again. So, was my success with ILISP/comint only by luck; did I simply not hit the problematic area? Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From haible Wed Jan 19 15:22:22 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20455; Wed, 19 Jan 94 15:22:22 +0100 Date: Wed, 19 Jan 94 15:22:22 +0100 From: haible (Bruno Haible) Message-Id: <9401191422.AA20455@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp with comint Joerg Hoehle: > When CLISP enters the read part of read-eval-print loop, CLISP empties > the input queue to be sure not to get old input. This is why you can > only input one lisp form. Joachim Schrod: > I had to change the process-connection-type to t (i.e., to > use pipes instead of pttys). Then it worked. This is because I wasn't able to implement CLEAR-INPUT for pipes. For ptys, CLEAR-INPUT does its job. Bruno Haible From olivierp@fwi.uva.nl Thu Jan 20 10:12:02 1994 Received: from mail.fwi.uva.nl ([146.50.4.20]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21283; Thu, 20 Jan 94 10:12:02 +0100 Received: from zoe.fwi.uva.nl by mail.fwi.uva.nl with SMTP (5.65c/5.1) id AA10459; Thu, 20 Jan 1994 10:10:47 +0100 Received: by zoe.fwi.uva.nl id AA13062; Thu, 20 Jan 1994 10:10:45 +0100 Message-Id: <199401200910.AA13062@zoe.fwi.uva.nl> Date: Thu, 20 Jan 1994 10:10:45 +0100 Return-Path: From: olivierp@fwi.uva.nl (Pieter A. Olivier (I89)) X-Organisation: Faculty of Mathematics & Computer Science University of Amsterdam Kruislaan 403 NL-1098 SJ Amsterdam The Netherlands X-Phone: +31 20 525 7463 X-Telex: 10262 hef nl X-Fax: +31 20 525 7490 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clx/garnet: Client is not authorized to connect to server I've spend the last few days trying to get clx going. Everything went smoothly until I ran the "hello-world" demo. which gave me a "*** - Connection failure to X11.0 server display 0: Client is not authorized to connect to Server" error (presumably from the X Server ?). I removed my ~/.Xauthority file and ripped the "xgenauth" entry from my .xserverrc file which seemed to solve my problem. I then continued to build garnet, wich worked fine, but ran terribly slow. No problem I thought, I just run it on our fileserver, which has plenty of memory and is pretty snappy. I ran "rxcmd", which sets up the DISPLAY variable, and tried garnet again. Guess what: the authorization error reappeared ! Has anybody out there experienced the same kind of problems ? Garnet looks great, so any help would be appreciated ! Pieter. From schrod@iti.informatik.th-darmstadt.de Thu Jan 20 11:26:27 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21555; Thu, 20 Jan 94 11:26:27 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA39604 (5.65c/IDA-1.4.4 for ); Thu, 20 Jan 1994 11:25:14 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id LAA22001; Thu, 20 Jan 1994 11:25:13 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA17894; Thu, 20 Jan 1994 11:25:14 +0100 From: Joachim Schrod Message-Id: <9401201025.AA17894@spice.iti.informatik.th-darmstadt.de> Subject: Re: clx/garnet: Client is not authorized to connect to server To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 20 Jan 1994 11:25:13 +0100 (MEZ) In-Reply-To: <199401200910.AA13062@zoe.fwi.uva.nl> from "Pieter A. Olivier \(I89\)" at Jan 20, 94 10:14:39 am X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 799 You wrote: > > I've spend the last few days trying to get clx going. [...] > I then continued > to build garnet, wich worked fine, but ran terribly slow. > No problem I thought, I just run it on our fileserver, which has plenty > of memory and is pretty snappy. Sorry, I can't help with your .Xauthority problem; but you should know that Garnet on an RS/6000 350 with 64 MB real memory (and lots of swap space and no other user on it) is still terribly slow... :( Does anybody use Garnet (and, in particular, Gilt and Lapidary) with CLISP for real work? On which platform? Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From dxs@evolving.com Thu Jan 20 20:09:32 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22361; Thu, 20 Jan 94 20:09:32 +0100 Received: by csn.org with UUCP id AA25361 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Thu, 20 Jan 1994 12:08:15 -0700 Received: from shakey by kafka (AIX 3.2/UCB 5.64/4.03) id AA34097; Thu, 20 Jan 1994 11:51:07 -0700 Received: by shakey (AIX 3.2/UCB 5.64/4.03) id AA65733; Thu, 20 Jan 1994 11:52:30 -0700 Date: Thu, 20 Jan 1994 11:52:30 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9401201852.AA65733@shakey> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: re: problems with garnet i have also tried to use garnet on a rs6000 with 120 meg of real memory. i found it to be slow slow as to be unusable. i think that the problem needs work but i dont know how to figure out how to time different sections of code. From haible Thu Jan 20 22:29:57 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22535; Thu, 20 Jan 94 22:29:57 +0100 Date: Thu, 20 Jan 94 22:29:57 +0100 From: haible (Bruno Haible) Message-Id: <9401202129.AA22535@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: CLX, Garnet, timing code Ad CLX: Those who wish to recompile their CLX with the new (1994-01) CLISP should be aware of the fact that CLX had to be modified because of the new condition system. Get the new CLX from the usual place: ma2s2:/pub/lisp/clisp/packages/. Ad Garnet: Someone should look into Garnet's object system and try to identify operations that would be fast when compiled to machine code but are slow in CLISP. Ad timing: > i dont know how to figure out how to time different sections of code. Does someone have code for "metering" the time used individual functions? That's a thing really missing in CLISP. Bruno From philp@universe.digex.net Fri Jan 21 04:40:43 1994 Return-Path: Received: from universe.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23008; Fri, 21 Jan 94 04:40:43 +0100 Received: by universe.digex.net id AA01010 (5.67a8/IDA-1.5 for clisp-list ); Thu, 20 Jan 1994 22:39:21 -0500 Date: Thu, 20 Jan 1994 22:38:29 -0500 (EST) From: Phil Perucci Subject: unsubscribe To: clisp-list In-Reply-To: <9401191246.AA09237@inf-wiss.ivp.uni-konstanz.de> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII unsubscribe From rodw@cbl.leeds.ac.uk Fri Jan 21 09:41:06 1994 Return-Path: Received: from ixgate02.dfnrelay.d400.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23142; Fri, 21 Jan 94 09:41:06 +0100 Received: from ixgate01.dfnrelay.d400.de by ixgate02.dfnrelay.d400.de with SMTP (PP); Fri, 21 Jan 1994 09:40:43 +0100 X400-Received: by mta d400relay in /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Fri, 21 Jan 1994 09:40:17 +0100 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Fri, 21 Jan 1994 09:38:25 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Fri, 21 Jan 1994 09:38:15 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Fri, 21 Jan 1994 09:38:18 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Fri, 21 Jan 1994 09:38:18 +0100 Date: Fri, 21 Jan 1994 09:38:18 +0100 X400-Originator: rodw@cbl.leeds.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=UK.AC/ADMD= /C=GB/;<27542.9401210838@cblelcc.cbl.le] X400-Content-Type: P2-1984 (2) Content-Identifier: re: problems ... Alternate-Recipient: Allowed From: rodw@cbl.leeds.ac.uk Message-Id: <27542.9401210838@cblelcc.cbl.leeds.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: re: problems with garnet >i have also tried to use garnet on a rs6000 with 120 meg of real memory. >i found it to be slow slow as to be unusable. i think that the problem >needs work but i dont know how to figure out how to time different >sections of code. Isn't clisp compiled down to byte codes and that then interpreted? That would explain why its so easy to port, but doesn't run very fast. I'm not sure that this is the case but it would certainly explain the speed problems. Rod From haible Sat Jan 22 18:21:29 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA25368; Sat, 22 Jan 94 18:21:29 +0100 Date: Sat, 22 Jan 94 18:21:29 +0100 From: haible (Bruno Haible) Message-Id: <9401221721.AA25368@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: metering Cc: Mark_Kantrowitz@GLINDA.OZ.CS.CMU.EDU Jeff Bishop sent me the METERING utility written by Mark Kantrowitz at CMU. I have put it up for anonymous FTP on ma2s2:/pub/lisp/clisp/contrib/. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de !! To unsubscribe from the clisp-list mailing list, send mail to !! !! listserv@ma2s2.mathematik.uni-karlsruhe.de !! !! including the two words "unsubscribe clisp-list" as message body. !! From pcolsen@super.org Sun Jan 23 00:14:57 1994 Return-Path: Received: from descartes (descartes.super.org) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00531; Sun, 23 Jan 94 00:14:57 +0100 Received: by descartes (4.1/SMI-4.1) id AA18956; Sat, 22 Jan 94 18:13:13 EST Date: Sat, 22 Jan 94 18:13:13 EST From: pcolsen@super.org (Peter C Olsen) Message-Id: <9401222313.AA18956@descartes> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Documentation and help files for Maxima I've built the Clisp version, but I can't get the DESCRIBE and APROPOS commands to work. Any suggestions? Peter Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 haible Wed Jan 26 01:18:54 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03085; Wed, 26 Jan 94 01:18:54 +0100 Date: Wed, 26 Jan 94 01:18:54 +0100 From: haible (Bruno Haible) Message-Id: <9401260018.AA03085@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: X3 announces second public review for Common Lisp [Forwarded by Barry Margolin .] Begin forwarded message: From: Guy Steele Below is the full text of the press release from X3. It may be that Kent Pitman will arrange to make the latest draft available on-line as he did for the first public review; if so, details will follow in a later message. (Note: the draft is about 1500 pages or so. It's a lot to print.) In any case, I remind you that any comments, to be officially recognized, must be sent on paper to the two addresses listed in the press release. X3J13 would take it as a great favor if any comments could also be sent electronically (to an address that will be mentioned in the above-mentioned "later message"). --Guy Steele --------------------------------------------------------------------------------- Accredited Standards Committee* Date: January 11, 1994 X3, Information Processing Systems Project: 574-D Reply to: Lynn Barra 202-626-5738 NEWS RELEASE 75300.2665@compuserve.com cc: G. Steele, X3J13 Chairman X3 Announces the Second Public Review and Comment Period on X3.226-199x, Programming Language Common Lisp Washington, D.C. -- Accredited Standards Committee X3, Information Processing Systems announces the two-month public review and comment period on X3.226-199x, Programming Language Common Lisp. The specification set forth in this document is designed to promote the portability of Common Lisp programs among a variety of data processing systems. It is a language specification aimed at an audience of implementors and knowledgeable programmers. It is neither a tutorial nor an implementation guide. The second public review is being announced due to substantive changes made to the draft as a result of comments received during the first public review. The comment period extends from February 4, 1994 through April 5, 1994. Please send all comments to: X3 Secretaiat, Attn.: Lynn Barra, 1250 Eye Street NW, Suite 200, Washington, DC 20005-3922. Send a copy to: American National Standards Institute, Attn.: BSR Center, 11 West 42nd St. 13th Floor, New York, NY 10036. Purchase this standard from: Global Engineering Documents, Inc. 2805 McGaw Ave. Irvine, CA 92714 1-800-854-7179 (within USA) 714-261-1455 (outside USA) Single copy price: $80.00 International price: $104.00 *Operating under the procedures of the Amrican National Standards Institute X3 Secretariat, Computer and Business Equipment Manufacturers Association (CBEMA) 1250 Eye Street NW Suite 200 Washington DC 20005-3922 Telephone: (202)737-8888 (Press 1 twice) FAX: (202)638-4922 --------------------------------------------------------------------------------- From schrod@iti.informatik.th-darmstadt.de Wed Jan 26 14:04:01 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03791; Wed, 26 Jan 94 14:04:01 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA26036 (5.65c/IDA-1.4.4 for ); Wed, 26 Jan 1994 14:01:42 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id OAA27802; Wed, 26 Jan 1994 14:01:41 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA17373; Wed, 26 Jan 1994 14:01:42 +0100 From: Joachim Schrod Message-Id: <9401261301.AA17373@spice.iti.informatik.th-darmstadt.de> Subject: pretty printer To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP discussion list) Date: Wed, 26 Jan 1994 14:01:41 +0100 (MEZ) X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 561 Hi, CLtL2, Chapter 27, describes a prettyprinting facility. Anybody knows a freely distributable implementation that could be used with CLISP? It may not be plug&play, we're not afraid of some programming work. How about XP, is it available by anonymous ftp? Or is one in CMUCL that might be used? Thanks in advance for any answers, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From WECHARD@VM2.YorkU.CA Wed Jan 26 19:45:51 1994 Return-Path: Received: from vm2.yorku.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04418; Wed, 26 Jan 94 19:45:51 +0100 Message-Id: <9401261845.AA04418@ma2s2.mathematik.uni-karlsruhe.de> Received: from VM2.YorkU.CA by vm2.yorku.ca (IBM VM SMTP V2R1) with BSMTP id 7603; Wed, 26 Jan 94 13:42:11 EST Date: Wed, 26 Jan 94 13:37:28 EST From: William Echard Subject: Graphics in DOS To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de I'm a musicology grad student, and I'm experimenting with representing and manipulating phrase-structres as trees in Lisp. I want to write a program to display the trees on the screen, and I would prefer to do it in graphics mode. Right now I'm limited to using Clisp under DOS, in text mode only. Are there extensions that I can get that will make it fairly easy to switch into graphics mode and draw on the screen? I could write something in another language, but I'd like to try and do it all in Lisp if possible. Also, if anyone has code for parsing, analyzing, comparing, displaying, or doing anything else to trees that will work under Clisp, I'd like to know about it. Thanks in advance----William From LARSSON@ntcclu.ntc.nokia.com Thu Jan 27 11:30:54 1994 Return-Path: Received: from NTC02.TELE.NOKIA.FI by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05366; Thu, 27 Jan 94 11:30:54 +0100 Date: Thu, 27 Jan 1994 12:29:10 +0300 (EET) From: LARSSON@ntcclu.ntc.nokia.com Message-Id: <940127122910.23400580@ntcclu.ntc.nokia.com> Subject: RE: Graphics in DOS To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de X-Vmsmail-To: SMTP%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" Apropos Williams question, > Also, if anyone has code for parsing, analyzing, comparing, displaying, >or doing anything else to trees that will work under Clisp, I'd like to know >about it. I quote from lisp-ftp.faq: Peter Norvig's book "Paradigms of AI Programming" includes Common Lisp implementations of a prolog interpreter and compiler. The software is available by anonymous ftp from unix.sri.com:pub/norvig and on disk in Macintosh or DOS format from the publisher, Morgan Kaufmann. For more information, contact: Morgan Kaufmann, Dept. P1, 2929 Campus Drive, Suite 260, San Mateo CA 94403, (800) 745-7323; FAX: (415) 578-0672 Norvig will introduce you to the basics, and more can be found in: A catalog of free and commercial natural language software is available from the Natural Language Software Registry, by anonymous ftp from ftp.dfki.uni-sb.de in the directory /registry, or by email to registry@dfki.uni-sb.de. Musicologists may get ideas from: Common Music is a music composition language written in Common Lisp and CLOS that outputs music (directly or through scorefiles) to a variety of synthesis packages, such as the Music Kit, Common Lisp Music, MIDI, and CSound. Common Music runs under MCL 2.0, Allegro CL 3.1.2 (NeXT), AKCL 1.615 (NeXT), Allegro CL 4.1 beta (SGI Iris), and AKCL 6.15 (Sun4). It is available by anonymous ftp from ccrma-ftp.stanford.edu [36.49.0.93] and ftp.zkm.de [192.101.28.17] in the files pub/cm.tar.Z. To be added to the mailing list, send mail to cmdist-request@ccrma.stanford.edu. For further information, contact Rick Taube, or . [Note: In the Common Music sources, there is a generic portable Lisp Listener style interpreter that supports command dispatching in addition to Lisp evaluation. It is the file ./utils/tl.lisp.] Enjoy! *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* Arne Larsson Nokia Telecommunications Translator Transmission Systems, Customer Services larsson@ntc02.tele.nokia.fi P.O. Box 12, SF-02611 Espoo, Finland larsson@ntcclu.ntc.nokia.com Phone +358 0 5117476, Fax +358 0 51044287 Arne.Larsson@ntc.nokia.com *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* From haible Thu Jan 27 16:00:13 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05862; Thu, 27 Jan 94 16:00:13 +0100 Date: Thu, 27 Jan 94 16:00:13 +0100 From: haible (Bruno Haible) Message-Id: <9401271500.AA05862@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: pretty printing [Forwarded from Brent Benson .] This from part 6 of the Lisp FAQ: 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. and The Lisp Utilities collection is accessible by anonymous ftp to any CMU CS machine (e.g., ftp.cs.cmu.edu [128.2.206.173]) or through AFS in the directory /afs/cs.cmu.edu/project/ai-repository/ai/lang/lisp/ ... xp.tar.Z Waters' XP Lisp Pretty Printer ... From haible Thu Jan 27 16:43:06 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06018; Thu, 27 Jan 94 16:43:06 +0100 Date: Thu, 27 Jan 94 16:43:06 +0100 From: haible (Bruno Haible) Message-Id: <9401271543.AA06018@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: pretty printer Joachim Schrod says: > CLtL2, Chapter 27, describes a prettyprinting facility. CLtL2, Chapter 27, describes the XP "pretty" printer. > How about XP, is it available by anonymous ftp? > Or is one in CMUCL that might be used? XP is used in CMU CL and WCL. > It may not be plug&play, we're not afraid of some programming work. But decide first what you want. I will try a comparison between CLISP's pretty printer and XP as specified in CLtL2 and implemented in xp.lisp. PRO XP: XP is extensible. A programmer/user can specify how his DO, LET, MULTIPLE-VALUE-BIND etc. forms are printed. CONTRA XP: If a pretty-print layout becomes mandatory for every macro, then writing macros becomes combersome. CONTRA XP: It looks ugly when a list containing data which happens to look like (LET ...) is printed as if it were a Lisp form. There is no way by which the system could decide whether some object is data or program. CONTRA CLISP: CLISP indents by 1 for every nesting level. XP indents by 2, which makes up for better readability. (This could be easily fixed in io.d.) PRO CLISP: Closing parentheses are output just below their corresponding opening parenthesis, if *PRINT-RPARS* is T. This makes it much easier for a human reader to find out where a certain nesting level ends. CONTRA XP, PRO CLISP: Heavily nested lists and structures tend to reach the right margin very quickly in XP. This fact is even recognized by the existence of the variable *PRINT-MISER-WIDTH*. And it is not handled satisfactorily in XP: it produces lots of lines with much space on the left and only one token at the right margin, often exceeding the line length. PRO CLISP: While the *PRINT-CIRCLE* mechanism used in XP uses a large hash table which holds every subobject of the object to be printed, CLISP's *PRINT-CIRCLE* handling builds up a (usually much smaller) hash table which holds only those subobjects which occur more than once. (Detection of these subobjects is done by a low-level subroutine.) PRO XP: When *PRINT-LENGTH* or *PRINT-LEVEL* is non-NIL, CLISP may print #n= with no #n# references: #1=(A ...) XP does this better because its decision whether to print #n= comes last. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From schrod@iti.informatik.th-darmstadt.de Thu Jan 27 17:30:17 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06146; Thu, 27 Jan 94 17:30:17 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA30240 (5.65c/IDA-1.4.4 for ); Thu, 27 Jan 1994 17:27:47 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id RAA29833; Thu, 27 Jan 1994 17:27:45 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA13566; Thu, 27 Jan 1994 17:27:46 +0100 From: Joachim Schrod Message-Id: <9401271627.AA13566@spice.iti.informatik.th-darmstadt.de> Subject: Re: pretty printer To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 27 Jan 1994 17:27:46 +0100 (MEZ) In-Reply-To: <9401271543.AA06018@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jan 27, 94 04:45:44 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 1700 Bruno wrote: > > Joachim Schrod says: > > > CLtL2, Chapter 27, describes a prettyprinting facility. > > CLtL2, Chapter 27, describes the XP "pretty" printer. First, thanks to the anon ftp site pointer. (I should have checked the Lisp FAQ by myself. :( ) > > It may not be plug&play, we're not afraid of some programming work. > > But decide first what you want. I will try a comparison between CLISP's > pretty printer and XP as specified in CLtL2 and implemented in xp.lisp. I need a prettyprinting facility that is programmable. Actually, I need them for output of datastructures, not for Lisp programs. In particular, that has the consequence that I must be able to influence the current indentation. Facilities like the `logical block' concept, the specification of indentation and conditional breakpoints, and the pprint dispatcher are helpful in this problem context. That was the reason I started to look for extensible prettyprinters. Since chapter 27, (ie XP, as I learned in the meantime), is simply a Lisp realization of the abstraction beneath the classic prettyprinting papers (Oppen [TOPLAS 2(4)], Rose/Welsh [SP&E 11(11)]), and since these abstractions were quite useful in other projects I did, I thought I might use them. Did anybody have bad experiences in using XP for output of data structures? (The application at hand is the output of nested objects, where a top-level object will cover approx. 40 lines.) Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From donc@ISI.EDU Thu Jan 27 18:12:25 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06336; Thu, 27 Jan 94 18:12:25 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Thu, 27 Jan 1994 09:09:50 -0800 Date: Thu, 27 Jan 94 09:08:07 -0800 Posted-Date: Thu, 27 Jan 94 09:08:07 -0800 Message-Id: <9401271708.AA21478@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Thu, 27 Jan 94 09:08:07 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: WECHARD@vm2.yorku.ca Cc: clisp-list Subject: Graphics in DOS (trees) I think you're approaching this the wrong way. Lisp is full of utilities for trees, e.g. PRINT, READ, EQUAL, SUBST. I think a pretty printer is much more useful than a package for drawing pictures of trees. One other thing that you may find very useful is a "structure editor". This is not part of CL but has been implemented many times and I'm sure is readily available. If you have trouble finding one, let me know. From donc@ISI.EDU Thu Jan 27 18:38:36 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06419; Thu, 27 Jan 94 18:38:36 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Thu, 27 Jan 1994 09:36:05 -0800 Date: Thu, 27 Jan 94 09:34:23 -0800 Posted-Date: Thu, 27 Jan 94 09:34:23 -0800 Message-Id: <9401271734.AA21540@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Thu, 27 Jan 94 09:34:23 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: pretty printer I'd like to mention that I sent a pretty printer to Bruno and Marcus. (I presume they're in the archives, but I'll be happy to send another copy to anyone who wants it.) It is first of all small and simple which makes it a good starting point if you want to alter it. It is programmable in the usual sense - that you get to say how to treat lists that start with a given symbol. It was meant for code, and solves what I consider annoying problems with other pp's. All this is documented in the source. Now some replies: CONTRA XP: If a pretty-print layout becomes mandatory for every macro, then writing macros becomes combersome. I don't think that this is a requirement for any PP CONTRA XP: It looks ugly when a list containing data which happens to look like (LET ...) is printed as if it were a Lisp form. There is no way by which the system could decide whether some object is data or program. The program that prints LET is allowed to look at what's inside. If the form doesn't LOOK like a let form it can print it the default way. If you plan to PP data with lists starting with LET then maybe you should instruct the PP how to recognize them as data. This could include context, e.g., the form that starts the "data" could bind a special variable that would be read by the LET PP macro. PRO CLISP: Closing parentheses are output just below their corresponding opening parenthesis, if *PRINT-RPARS* is T. This makes it much easier for a human reader to find out where a certain nesting level ends. I disagree that it makes anything easier - I think it's a lot uglier. You can generally tell where a nesting level ends by looking down in the same column. CONTRA XP, PRO CLISP: Heavily nested lists and structures tend to reach the right margin very quickly in XP. This fact is even recognized by the existence of the variable *PRINT-MISER-WIDTH*. And it is not handled satisfactorily in XP: it produces lots of lines with much space on the left and only one token at the right margin, often exceeding the line length. This is the main problem (along with the desire for print macros) that caused me to write the one I sent you. How does the CLISP PP solve the problem? While the *PRINT-CIRCLE* ... When *PRINT-LENGTH* or *PRINT-LEVEL* ... These are not addressed in my PP. From pcolsen@super.org Fri Jan 28 04:42:53 1994 Return-Path: Received: from super.super.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06863; Fri, 28 Jan 94 04:42:53 +0100 Received: by super.super.org (4.1/SMI-4.1) id AA09088; Thu, 27 Jan 94 22:40:15 EST Date: Thu, 27 Jan 94 22:40:15 EST From: pcolsen@super.org (Peter C Olsen) Message-Id: <9401280340.AA09088@super.super.org> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Problems running Maxima under CLISP I'm looking for help running maxima under CLISP. I've built it in accordance with the instructions, but I can't get it to work consistently. Some of the commands work (mostly the directly numeric ones) but others don't work at all --- with DESCRIBE, HELP, and APROPOS being the most painful absences. This is probably due to catastrophic user failure, so any help would be greatly appreciated. Here's a sample ... CLISP January 1994 Maxima 4.153 Sun Aug 19 12:02:38 CDT 1990 (with enhancements by W. Schelter). (C1) 10!; (D1) 3628800 (C2) 10!!; (D2) GENFACT(10, 5, 2) (C3) GENFACT(10, 5, 2); (D3) 3840 (C4) DESCRIBE(HELP); (D4) DESCRIBE(HELP) (C5) APROPOS(TRIG); (D5) APROPOS(TRIG) (C6) ENTIER(34.5); (D6) ENTIER(34.5) (C7) ABS(-5); (D7) 5 (C8) EXP(5); 5 (D8) %E (C9) EXIT(); (D9) EXIT() (C10) Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 marcus@ee.pdx.edu Fri Jan 28 10:24:05 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07204; Fri, 28 Jan 94 10:24:05 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA00776; Fri, 28 Jan 94 01:22:50 PST Date: Fri, 28 Jan 94 01:22:50 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9401280922.AA00776@ursula.ee.pdx.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: CLISP 1994-01-25 This release includes no functional changes other than the changes in patches 1-8. There were a handful of autoconfiguration and documentation modifications. The following systems now have support or improved support: * NEXTSTEP 3.2 compiles for Intel and Motorola. It now has a single-block-memory-map configuration for better performance. The Intel configuration has not been tested. * Sequent PTX 3.2.0 (V2.1.0) (GCC). Autoconfiguration is a bit smarter about testing shared memory attach limits. Some superficial changes to make PTX's anonymous-mmap work when a site's shared-memory limits are inadequate. Binaries have been rebuilt for the following architectures: German and English: * DOS (6.2) * Linux (PL14, libc4.5.8) * PTX (3.2.0 V2.1.0) * SunOS 4.1.3 Sun4c (Sparc2) * SunOS 4.1.3 Sun4m (Sparc10) English only: * NEXTSTEP (3.2 -- FAT binaries, but the lispinit.mem is Motorola). This is my first pass at this, no doubt I screwed some things up. Let me know! Everything is in the same place at ma2s2.mathematik.uni-karlsruhe.de (/pub/lisp/clisp/source & /pub/lisp/clisp/binaries). Thanks, Marcus Daniels marcus@ee.pdx.edu From pcolsen@super.org Fri Jan 28 15:02:12 1994 Return-Path: Received: from descartes (descartes.super.org) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00419; Fri, 28 Jan 94 15:02:12 +0100 Received: by descartes (4.1/SMI-4.1) id AA01082; Fri, 28 Jan 94 08:59:15 EST Date: Fri, 28 Jan 94 08:59:15 EST From: pcolsen@super.org (Peter C Olsen) Message-Id: <9401281359.AA01082@descartes> To: clisp-list Subject: CLISP 1994-01-25 References: <9401280922.AA00776@ursula.ee.pdx.edu> Marcus --- Just a quick note... I think that CLISP is great package. Thanks for your leadership in maintaining it. Peter Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 johann@mail4.ai.univie.ac.at Fri Jan 28 16:38:08 1994 Return-Path: Received: from darwin.ai.univie.ac.at by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00562; Fri, 28 Jan 94 16:38:08 +0100 Received: by darwin.ai.univie.ac.at id AA05822 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 28 Jan 1994 16:34:04 +0100 Date: Fri, 28 Jan 1994 16:34:04 +0100 From: Johann Petrak Message-Id: <199401281534.AA05822@darwin.ai.univie.ac.at> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: defsystem with CLISP? Does anybody know of a portable DEFSYSTEM - or something similar - that works with CLISP _and_ CMULISP (and, maybe LUCID)? I tried two of them, both didn't work. I'd rather have something that works than lots of features ... :-) Am I asking too much? Johann Petrak, Email: johann@ai.univie.ac.at Phone: +43/222/533-61-12 Austrian Research Institute for Schottengasse 3 Artificial Intelligence A-1010 Vienna, Austria From dxs@evolving.com Fri Jan 28 19:41:00 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00831; Fri, 28 Jan 94 19:41:00 +0100 Received: by csn.org with UUCP id AA18068 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 28 Jan 1994 11:38:16 -0700 Received: by kafka (AIX 3.2/UCB 5.64/4.03) id AA45071; Fri, 28 Jan 1994 11:27:02 -0700 Date: Fri, 28 Jan 1994 11:27:02 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9401281827.AA45071@kafka> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: question on read-line when i use read-line, i find that it returns multiple values as long as eof is not true. when eof is true, it only returns one value. my understanding of the function is that when eof is false the second value is nil, but when eof is true, the second value is t. can someone clarify this for me? thanks, dan stanger From rdong@playmate.mat.jhu.edu Fri Jan 28 20:08:19 1994 Return-Path: Received: from chow.mat.jhu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01003; Fri, 28 Jan 94 20:08:19 +0100 Message-Id: <9401281908.AA01003@ma2s2.mathematik.uni-karlsruhe.de> Received: from localhost by chow.mat.jhu.edu; Fri, 28 Jan 1994 14:05:38 -0500 Date: Fri, 28 Jan 1994 14:05:38 -0500 From: rdong@playmate.mat.jhu.edu (Rui-Tao Dong ~{6-HpLN~}) Sender: rdong@playmate.mat.jhu.edu To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp with comint In-Reply-To: <9401190646.AA26669@skydog.msi.co.jp> References: <9401190646.AA26669@skydog.msi.co.jp> I have a related problem. I'm trying to run maxima in my emacs buffer and I got *** - terminal type "emacs" unknown to termcap If I do anything, I get *** - symbol *WINDOW* has no value. This doesn't happen to akcl version of maxima. I added some dumb termcap to termcap and maxima started to complaint about something (ability to place cursor etc.) else. I can't bear not running maxima in emacs shell. Any suggestion will be greatly appreciated. Regards, Rui-Tao Dong ~{6-HpLN~} Department of Mathematics rdong@playmate.mat.jhu.edu The Johns Hopkins University (410)516-7406(O) (410)516-5549(Fax) Baltimore, Maryland 21218 From thommark@access.digex.net Fri Jan 28 21:00:02 1994 Return-Path: Received: from access1.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01102; Fri, 28 Jan 94 21:00:02 +0100 Received: by access1.digex.net id AA05054 (5.67a8/IDA-1.5 for Multiple recipients of ); Fri, 28 Jan 1994 14:57:19 -0500 Date: Fri, 28 Jan 1994 14:57:18 -0500 (EST) From: "M. Thomas" Subject: 3 easy questions To: Multiple recipients of Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII First, my thanks to the developers of CLISP for a very useful Lisp system for DOS. I have three minor questions, though: 1. The documented installation procedure (in the README file) had 2 disadvantages for me: -- it prompted me for permission to overwrite many Lisp function/macro definitions. I had to type "continue" repeatedly at the "Break>" prompts; -- the changes I made to *default-time-zone* and *default-dst-check* (in defs1.lsp) didn't take effect; I think the semantics of the Lisp macro "defvar" precludes redefining a defvar'd variable with another defvar. Therefore I installed CLISP by executing the following batch file (which has only 2 executable lines): ----BEGIN clispbld.bat @rem This is how I built lispinit.mem: @rem @rem 1. Unzipped the CLISP distribution into current directory, then @rem deleted all files except for lisp.exe, *.fas, and those @rem *.lsp corresponding to the *.fas. @rem @rem 2. Edited config.lsp to change short-site-name, long-site-name, @rem and *editor*. @rem @rem 3. Edited defs1.lsp to change *default-time-zone* and @rem *default-dst-check*. @rem @rem 4. Recompiled config.lsp and defs1.lsp: lisp -i init.fas -c config defs1 @rem 5. Loaded the *.fas files and saved the resulting memory image: lisp -i init.fas -x(saveinitmem) ----END clispbld.bat Execution of this file appears to install CLISP correctly. Is this indeed the case, or could there be some subtle disadvantage to this procedure? 2. The latest DOS version of CLISP, clisp-english.zip, appears to have been compiled with GCC 2.4.5, whereas the earlier January version of CLISP appears to have been compiled with GCC 2.5.7. Why is this? > (lisp-implementation-version) "January 1994" > (software-version) "GNU C 2.4.5" ;; instead of "GNU C 2.5.7" for earlier January version 3. Which versions of the CLtL2 macros LOOP and SERIES are most compatible with CLISP? From where can these be ftp'd? Thanks. Mark A. Thomas thommark@access.digex.net From haible Sun Jan 30 02:04:42 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02867; Sun, 30 Jan 94 02:04:42 +0100 Date: Sun, 30 Jan 94 02:04:42 +0100 From: haible (Bruno Haible) Message-Id: <9401300104.AA02867@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: MAXIMA --> PUNIMAX I have renamed my MAXIMA port for CLISP. It is now called PUNIMAX. I had to do this because "Macsyma" is a registered trademark of Macsyma Inc. So please stop talking about Maxima, talk about Punimax instead. Peter Olsen noticed about Maxima in Jan.94 CLISP: > Some of the commands work (mostly the directly numeric > ones) but others don't work at all --- with DESCRIBE, HELP, and > APROPOS being the most painful absences. > > This is probably due to catastrophic user failure No, this was caused by the change of the semantics of FUNCTIONP in the 1994-01-07 release of CLISP. This is fixed in the new PUNIMAX. README file for PUNIMAX PUNIMAX is a computer algebra system which runs in CLISP, a Common Lisp implementation by Bruno Haible and Michael Stoll. It is based on MAXIMA, a Common Lisp implementation due to William F. Schelter at Texas University, which itself is based on the original implementation of Macsyma at MIT. This is *not* free software. Because the MIT Macsyma code is copyrighted. To use PUNIMAX or MAXIMA, you are required by US law to first obtain a license from D.O.E. or one of the commercial licensees, then use the ftp'able software as enhancements. Licenses can be obtained from the ESTC, Argonne Ill. Currently their charge for 1 machine is $165 to universities; site licenses are also available. Historically, this situation arose from disputes in the U.S. over the commercialization of partially-government-funded academic research. Various U.S. governmental orders in the mid-1980's affirmed the rights of universities to license such research results. You can then get the PUNIMAX software via FTP from ma2s2.mathematik.uni-karlsruhe.de : /pub/math/punimax/punimax.tar.z . Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From pcolsen@super.org Sun Jan 30 15:46:55 1994 Return-Path: Received: from descartes (descartes.super.org) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03313; Sun, 30 Jan 94 15:46:55 +0100 Received: by descartes (4.1/SMI-4.1) id AA21727; Sun, 30 Jan 94 09:43:55 EST Date: Sun, 30 Jan 94 09:43:55 EST From: pcolsen@super.org (Peter C Olsen) Message-Id: <9401301443.AA21727@descartes> To: clisp-list Subject: MAXIMA --> PUNIMAX References: <9401300104.AA02867@ma2s2.mathematik.uni-karlsruhe.de> Thanks for the correction. Punimax works fine. If you have time, and it's simple, could you point me to one of the changes? I'd like to understand what happened. Thanks again. Peter Olsen Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 ROBERT@C71.CANTERBURY.AC.UK Mon Jan 31 09:43:38 1994 Return-Path: Received: from sun2.nsfnet-relay.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03997; Mon, 31 Jan 94 09:43:38 +0100 Message-Id: <9401310843.AA03997@ma2s2.mathematik.uni-karlsruhe.de> Via: uk.ac.canterbury.c71; Mon, 31 Jan 1994 08:39:09 +0000 Date: Mon, 31 Jan 94 8:41 GMT From: "Rob Neil - ROBERT@UK.AC.CANT.C71" To: CLISP-LIST Subject: RE: defsystem with CLISP? unsubscribe From philp@universe.digex.net Mon Jan 31 13:08:38 1994 Return-Path: Received: from universe.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04332; Mon, 31 Jan 94 13:08:38 +0100 Received: by universe.digex.net id AA19738 (5.67a8/IDA-1.5 for clisp-list ); Mon, 31 Jan 1994 07:05:20 -0500 Date: Mon, 31 Jan 1994 07:04:52 -0500 (EST) From: Phil Perucci Subject: unsubscribe To: clisp-list In-Reply-To: <199401281534.AA05822@darwin.ai.univie.ac.at> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII unsubscribe From haible Mon Jan 31 19:47:13 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04935; Mon, 31 Jan 94 19:47:13 +0100 Date: Mon, 31 Jan 94 19:47:13 +0100 From: haible (Bruno Haible) Message-Id: <9401311847.AA04935@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: 3 easy questions M. Thomas 1. had problems when installing CLISP from source on DOS: > -- it prompted me for permission to overwrite many Lisp > function/macro definitions. I had to type "continue" repeatedly > at the "Break>" prompts; There was a bug in INTERACTIVE-STREAM-P. Marcus has fixed it in his newest release. 2. > The latest DOS version of CLISP, clisp-english.zip, appears to have > been compiled with GCC 2.4.5, whereas the earlier January version of > CLISP appears to have been compiled with GCC 2.5.7. Why is this? Marcus apparently uses emx-0.8g, and I used emx-0.8h. Both EMX versions are equally good. 3. > Which versions of the CLtL2 macros LOOP and SERIES are most compatible > with CLISP? From where can these be ftp'd? The usual place: ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/packages series.clisp.tar.z and UNSUPPORTED/loop.lsp.z Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de !! To unsubscribe from the clisp-list mailing list, send mail to !! !! listserv@ma2s2.mathematik.uni-karlsruhe.de !! !! including the two words "unsubscribe clisp-list" as message body. !! From haible Mon Jan 31 20:58:11 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05241; Mon, 31 Jan 94 20:58:11 +0100 Date: Mon, 31 Jan 94 20:58:11 +0100 From: haible (Bruno Haible) Message-Id: <9401311958.AA05241@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: punimax from within emacs Rui-Tao Dong just told me how he got rid of his problems with maxima: > *** - symbol *WINDOW* has no value. Got punimax instead. > *** - terminal type "emacs" unknown to termcap He uses a shell script like this one: #!/bin/sh if [ "$TERM" = emacs ] ; then TERMCAP='emacs:co#80:li#9999:cl=:cm=' export TERMCAP fi exec /usr/local/lisp/lisp.run -m 4MB -M /usr/local/punimax/punimax.mem Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hoehle@post.inf-wiss.ivp.uni-konstanz.de Tue Feb 1 02:06:37 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05522; Tue, 1 Feb 94 02:06:37 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA13318; Tue, 1 Feb 94 02:03:21 +0100 Date: Tue, 1 Feb 94 02:03:21 +0100 Message-Id: <9402010103.AA13318@inf-wiss.ivp.uni-konstanz.de> From: hoehle@post.inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: *default-time-zone* Defaults Hi, I wonder why a parameter that seems to need local adjustement has found neither entry nor comment into config.lsp. Wouldn't it be wise to put a (defparameter *default-time-zone* -1) ; default set in defs1.lsp into non-UNIX cfg*.lsp files so that everybody sees what s/he has to adjust? Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From marcus@ee.pdx.edu Tue Feb 1 02:25:21 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05616; Tue, 1 Feb 94 02:25:21 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA14393; Mon, 31 Jan 94 17:23:27 PST Date: Mon, 31 Jan 94 17:23:27 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9402010123.AA14393@ursula.ee.pdx.edu> To: clisp-list Subject: *default-time-zone* Defaults In-Reply-To: <9402010103.AA13318@inf-wiss.ivp.uni-konstanz.de> References: <9402010103.AA13318@inf-wiss.ivp.uni-konstanz.de> Joerg-Cyril> I wonder why a parameter that seems to need local Joerg-Cyril> adjustement has found neither entry nor comment into Joerg-Cyril> config.lsp. I don't see any reason this parameter needs to exist at all. Anyone care to comment? I'd be inclined to just the UNIX code for everyone (localtime vs gmtime). It works for DOS, at least. Unless someone objects, I'll just remove this parameter and rely on the user setting the timezone with environment variables. From haible Wed Feb 2 13:21:36 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08133; Wed, 2 Feb 94 13:21:36 +0100 Date: Wed, 2 Feb 94 13:21:36 +0100 From: haible (Bruno Haible) Message-Id: <9402021221.AA08133@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Online access to 2nd dpANS CL [Forwarded from Barry Margolin .] Dear Common Lisp standardization participant, The online files for the dpANS corresponding to the second Public Review of Common Lisp are now in place in the directory /pub/cl/dpANS2/* on Internet host PARCFTP.Xerox.COM, which is accessible by anonymous FTP, IP address 13.1.64.94. (Many thanks to Larry Masinter and Xerox for their help with this.) These files correspond to draft 14.10, also known as document X3J13/93-102, which was forwarded by X3J13 to X3 in October, 1993. Anyone considering transferring the full set of files should FIRST transfer and READ just the file /pub/cl/dpANS2/Reviewer-Notes.text, which contains a guide to the other files and some important notes about the process. Based on the content of that file, you'll most easily be able to determine which of the other files you need. Any problems with those files or the instructions for their use should be directed to me as soon as possible, so that I can get them fixed in a timely way for others who might encounter the same problem. No document--especially of this size--is ever perfect, but we at X3J13 are unofficially hoping that this comment period will serve to confirm our belief that this document is at least as solid as the de facto standards that have preceded it, and that it is time to proceed from a dpANS to a full standard. If you obtain the document and your overall impression concurs with ours--that this standard is finally ready--please feel free to mention this fact as part of your comments! Sincerely, Kent Pitman X3J13 Technical Editor KMP@Harlequin.COM From hoehle@post.inf-wiss.ivp.uni-konstanz.de Wed Feb 2 14:31:42 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08474; Wed, 2 Feb 94 14:31:42 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA18670; Wed, 2 Feb 94 14:28:03 +0100 Date: Wed, 2 Feb 94 14:28:03 +0100 Message-Id: <9402021328.AA18670@inf-wiss.ivp.uni-konstanz.de> From: hoehle@post.inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2], marcus@ee.pdx.edu Subject: *default-time-zone* Defaults In-Reply-To: <9402010123.AA14393@ursula.ee.pdx.edu> References: <9402010123.AA14393@ursula.ee.pdx.edu> Marcus Daniels writes: > Joerg-Cyril> I wonder why a parameter that seems to need local > Joerg-Cyril> adjustement has found neither entry nor comment into > Joerg-Cyril> config.lsp. > > I don't see any reason this parameter needs to exist at all. > > Anyone care to comment? I'd be inclined to just the UNIX code for > everyone (localtime vs gmtime). It works for DOS, at least. DOS and UNIX is not all of the world. You cannot assume some apparently standard C call on every platform. You shouldn't even assume the existence of _any_ C function on any system, for the following reason: When building CLISP, one (of the many) thing(s) Bruno Haible had in mind was portability and that many compilers libraries are broken somewhere. He didn't want to let CLISP rely on a broken C library, behaving differently when compiled with different compilers and their libraries or with different versions of the same compiler. He tried to exclusively use kernel or system calls. For instance, the Amiga version of CLISP doesn't rely on any compilers C library. I only had to write a small startup code and all the rest is in the CLISP source. It doesn't use any malloc, strcmp, strcpy, strlen, sprintf, fprintf or other such common C functions. It doesn't use any time functions other than kernel ones. And it works with any version of the OS that most users can remember. Current ports to other platforms work the same way, only using the C library where unavoidable (?), using the native system I/O, memory allocation, time etc. mechanisms. > Unless someone objects, I'll just remove this parameter and rely > on the user setting the timezone with environment variables. Why not just let that code remain in the source and bring it to the users attention by putting this variable into config.lsp, like I suggested in my previous mail? Not everybody has a TZ variable, uses a TZ variable or sees the use for a TZ variable. My points: I strongly object removing this working code from CLISP. I object intrdoducing into CLISP code the unnamed assumption that everybody has some standard (maybe even worse: ANSI) C functions. The way CLISP works so far is to define local files (unix.d, msdos.d etc.) where #defines are kept and to write separate code in the different modules where it is necessary. If several platforms can share the same code then let them do so, but remember that others may need special case code. No offense intended, Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From hoehle@post.inf-wiss.ivp.uni-konstanz.de Wed Feb 2 14:58:45 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08587; Wed, 2 Feb 94 14:58:45 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA18754; Wed, 2 Feb 94 14:55:11 +0100 Date: Wed, 2 Feb 94 14:55:11 +0100 Message-Id: <9402021355.AA18754@inf-wiss.ivp.uni-konstanz.de> From: hoehle@post.inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2], haible@[129.13.115.2] Subject: Re: *default-time-zone* Defaults In-Reply-To: <9402011700.AA06981@ma2s2.mathematik.uni-karlsruhe.de> References: <9402011700.AA06981@ma2s2.mathematik.uni-karlsruhe.de> Bruno Haible writes: > Joerg, pardonne-moi l'Anglais, c'est pour que Marcus me comprenne aussi. No problem :-) > Maybe. I am planning a file timezone.lsp which will be used for non-Unix > systems. A good idea, but it looks to me more like there's a need for timezone.d. OS-level calls need to be made there. See below: > Second, the Unix solution: The functions localtime() and gmtime() return Thus let UNIX use these. > Atari (TOS): There is no user-accessible environment at all. People set > their clock to local time and adjust it twice a year for DST. > ==> must assume the system's time is local time, and calculate GMT from > that. defs1.lsp or timezone.lsp or cfg*.lsp must contain the timezone. > > DOS: Very similar: There is an environment, but most users set their > clock to local time because > - the DATE and TIME commands are expected to print local time, > - only a minority of the programs react on the TIMEZONE environment variable. > Amiga: I assume the same as for Atari. Joerg? There's a user-accessible environment since the 1.3 version of the operating system, with (per process) local variables since 2.0, but both have nothing to do with the handling of the time zone. However some programs ported from UNIX read a TZ environment variable. There's a notion of a timezone since 2.1, but I'll have to check for DST. The time returned by the function CLISP uses by now is the local time, like with DOS and Atari. The fact that there's operating system dependent support for a time zone requires the existence of a C function. I think that the solution is to add a UNIX-like SYS::default-time-zone call to the amiga version. It will get the OS timezone in newer versions of the OS and return the contents of *default-time-zone* when running under older versions of the OS. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From marcus@ee.pdx.edu Wed Feb 2 15:16:28 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08732; Wed, 2 Feb 94 15:16:28 +0100 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA26347; Wed, 2 Feb 94 06:14:22 PST Date: Wed, 2 Feb 94 06:14:22 PST From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9402021414.AA26347@ursula.ee.pdx.edu> To: clisp-list Subject: *default-time-zone* Defaults In-Reply-To: <9402021328.AA18670@inf-wiss.ivp.uni-konstanz.de> References: <9402021328.AA18670@inf-wiss.ivp.uni-konstanz.de> >> Unless someone objects, I'll just remove this parameter and rely on >> the user setting the timezone with environment variables. Joerg-Cyril> Why not just let that code remain in the source and bring Joerg-Cyril> it to the users attention by putting this variable into Joerg-Cyril> config.lsp, like I suggested in my previous mail? Not Joerg-Cyril> everybody has a TZ variable, uses a TZ variable or sees Joerg-Cyril> the use for a TZ variable. The next release will repair this, one way or another. DOS, for instance, may allow the use of the C library gmtime/localtime as an option. Joerg-Cyril> I object intrdoducing into CLISP code the unnamed Joerg-Cyril> assumption that everybody has some standard (maybe even Joerg-Cyril> worse: ANSI) C functions. The way CLISP works so far is Joerg-Cyril> to define local files (unix.d, msdos.d etc.) where Joerg-Cyril> #defines are kept and to write separate code in the Joerg-Cyril> different modules where it is necessary. Understood. That's why I ask. From wdelias@access.digex.net Thu Feb 3 08:12:21 1994 Return-Path: Received: from access1.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10318; Thu, 3 Feb 94 08:12:21 +0100 Received: by access1.digex.net id AA11855 (5.67a8/IDA-1.5 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Thu, 3 Feb 1994 02:08:41 -0500 From: "W. D. Elias" Message-Id: <199402030708.AA11855@access1.digex.net> Subject: Using CLISP and GARNET 2.2 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 3 Feb 1994 02:08:41 -0500 (EST) X-Mailer: ELM [version 2.4 PL22] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 0 From hoehle@post.inf-wiss.ivp.uni-konstanz.de Fri Feb 4 10:12:11 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23102; Fri, 4 Feb 94 10:12:11 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA00213; Fri, 4 Feb 94 10:08:20 +0100 Date: Fri, 4 Feb 94 10:08:19 +0100 Message-Id: <9402040908.AA00213@inf-wiss.ivp.uni-konstanz.de> From: hoehle@post.inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: bugs in gcc -mc68000 compiled CLISP? Hi, I'd like to know if there are CLISPs other than the Amiga version which have been compiled with gcc for a 68000. It looks like gcc 2.5.4 through 2.5.7 generate bad (e.g. not purely) 68000 code (although 68020/68030/68040 code generation seems fine). Atari, Sun3, NeXT with 68000 only? Thanks, Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From wdelias@access.digex.net Fri Feb 4 14:00:35 1994 Return-Path: Received: from access3.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23305; Fri, 4 Feb 94 14:00:35 +0100 Received: by access3.digex.net id AA21644 (5.67a8/IDA-1.5 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 4 Feb 1994 07:56:39 -0500 From: "W. D. Elias" Message-Id: <199402041256.AA21644@access3.digex.net> Subject: Using Garnet 2.2 and Clisp on Linux (0.99pl13) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 4 Feb 1994 07:56:39 -0500 (EST) X-Mailer: ELM [version 2.4 PL22] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 490 I am trying to run GARNET 2.2 under CLISP on a linux (0.99pl13) platform. After compiling garnet and running some demos I receive the following Continuable Error message: X-ERROR: Asynchronous FONT-ERROR in request **** Code 56.0 [ChangeGC] ID #x1800001 After entering "continue" a number of times, I usually receive following error: *** - UNIX error 9 (EBADF): Bad file number. I should be most appreciative if someone could help me correct this problem. Thanks, Wayne D. Elias From rbfeens@cs.vu.nl Fri Feb 4 14:48:30 1994 Return-Path: Received: from top.cs.vu.nl by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23404; Fri, 4 Feb 94 14:48:30 +0100 Received: from clipper.cs.vu.nl by top.cs.vu.nl id aa24757; 4 Feb 94 14:44 MET Received: from javelin.cs.vu.nl by clipper.cs.vu.nl id aa02053; 4 Feb 94 14:44 MET Date: Fri, 4 Feb 94 14:44:18 MET From: RB Feenstra To: clisp-list Subject: Re: Using Garnet 2.2 and Clisp on Linux (0.99pl13) Message-Id: <9402041444.aa13625@javelin.cs.vu.nl> W. D. Elias writes: > I am trying to run GARNET 2.2 under CLISP on a linux (0.99pl13) platform. > After compiling garnet and running some demos I receive the following > Continuable Error message: > X-ERROR: Asynchronous FONT-ERROR in request **** Code 56.0 [ChangeGC] ID > #x1800001 This problem is probably caused by forgetting to call (opal:disconnect-garnet) before saving the lisp image and the corresponding (opal:reconnect-garnet) after restarting clisp. Both calls are documented in the opal manual; the newer versions of garnet have additional functions that combine these for convenience. Remco Feenstra From xiaobin@cs.uq.oz.au Sat Feb 5 07:24:56 1994 Return-Path: Received: from uqcspe.cs.uq.oz.au by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24300; Sat, 5 Feb 94 07:24:56 +0100 Received: from lacewing.cs.uq.oz.au by uqcspe.cs.uq.oz.au id ; Sat, 5 Feb 94 16:20:52 +1000 Date: Sat, 5 Feb 94 16:20:38 EST From: xiaobin@cs.uq.oz.au Message-Id: <9402050620.AA17749@client> Apparently-To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de help installation From rrb@iex.com Sat Feb 5 17:24:41 1994 Return-Path: Received: from iex.com (iex.iex.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24611; Sat, 5 Feb 94 17:24:41 +0100 Received: from umbriel (umbriel.tx.iex.com) by iex.com (4.1/SMI-4.1) id AA04868; Sat, 5 Feb 94 10:26:00 CST Received: from neptune by umbriel (4.1/SMI-4.1) id AA11891; Sat, 5 Feb 94 10:16:46 CST Received: by neptune (4.1/SMI-4.1) id AA25665; Sat, 5 Feb 94 10:25:58 CST From: rrb@iex.com (Dick Barbour) Message-Id: <9402051625.AA25665@neptune> Subject: unsuscribe To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Sat, 5 Feb 94 10:25:57 CST X-Mailer: ELM [version 2.3 PL8] unsuscribe From pollen@netcom.com Sun Feb 6 03:16:29 1994 Return-Path: Received: from mail.netcom.com (netcom6.netcom.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24897; Sun, 6 Feb 94 03:16:29 +0100 Received: from localhost by mail.netcom.com (8.6.4/SMI-4.1/Netcom) id SAA09433; Sat, 5 Feb 1994 18:13:04 -0800 Date: Sat, 5 Feb 1994 18:13:04 -0800 From: pollen@netcom.com (David Pollen) Message-Id: <199402060213.SAA09433@mail.netcom.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de help installation From pollen@netcom.com Sun Feb 6 03:27:46 1994 Return-Path: Received: from mail.netcom.com (netcom6.netcom.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24964; Sun, 6 Feb 94 03:27:46 +0100 Received: from localhost by mail.netcom.com (8.6.4/SMI-4.1/Netcom) id SAA10390; Sat, 5 Feb 1994 18:24:22 -0800 Date: Sat, 5 Feb 1994 18:24:22 -0800 From: pollen@netcom.com (David Pollen) Message-Id: <199402060224.SAA10390@mail.netcom.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Installing Clisp on PC I have just started to install Clisp on my new Pentium PC. I got a "VIRTUAL MODE NOT SUPPORTED W/O VCPI" message when I tried to run it. I have no idea what this means. If anyone can help me and/or wants to exchange direct email with another clisp users, let's chat. Thank you: pollen@netcom.com From michaelw@karl.cs.su.oz.au Tue Feb 8 11:28:53 1994 Return-Path: Received: from joyce.cs.su.OZ.AU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28308; Tue, 8 Feb 94 11:28:53 +0100 Message-Id: <9402081028.AA28308@ma2s2.mathematik.uni-karlsruhe.de> Received: from karl.cs.su.oz.au by joyce.cs.su.OZ.AU (mail from michaelw for clisp-list@ma2s2.mathematik.uni-karlsruhe.de) with MHSnet; Tue, 08 Feb 1994 11:12:06 +1100 Date: Tue, 8 Feb 1994 10:59:02 +1100 From: michaelw@karl.cs.su.OZ.AU (Michael Wise) Subject: compiling CLISP on SUN Sparc multiprocessor To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de We are slowly porting stuff over to our newly arrived SUN SPARCserver 1000 running Solaris 2.3. The compiler is gcc 2.5.7 . It seemed to be doing well until it got to the following: gcc -O -E -w arisparc.c | grep -v '^#' > arisparc.s gcc -O -pipe -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -fom it-frame-pointer -O2 -DUNIX_BINARY_DISTRIB -c arisparc.s /usr/ccs/bin/as: "arisparc.s", line 99: error: unknown opcode "wry" /usr/ccs/bin/as: "arisparc.s", line 99: error: statement syntax /usr/ccs/bin/as: "arisparc.s", line 104: error: unknown opcode "orl" /usr/ccs/bin/as: "arisparc.s", line 104: error: statement syntax It then appeared to hang. Changin O2 to O has not appeared to help. Any suggestions? Cheers MichaelW From haible Tue Feb 8 15:31:23 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28764; Tue, 8 Feb 94 15:31:23 +0100 Date: Tue, 8 Feb 94 15:31:23 +0100 From: haible (Bruno Haible) Message-Id: <9402081431.AA28764@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Installing Clisp on PC David Pollen : > I have just started to install Clisp on my ... PC. > I got a "VIRTUAL MODE NOT SUPPORTED W/O VCPI" message Please read the EMX-FAQ.DOC file contained in the DOS distribution of CLISP. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From WECHARD@VM2.YorkU.CA Tue Feb 8 19:32:55 1994 Return-Path: Received: from vm2.yorku.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29240; Tue, 8 Feb 94 19:32:55 +0100 Message-Id: <9402081832.AA29240@ma2s2.mathematik.uni-karlsruhe.de> Received: from VM2.YorkU.CA by vm2.yorku.ca (IBM VM SMTP V2R1) with BSMTP id 3937; Tue, 08 Feb 94 13:26:29 EST Date: Tue, 08 Feb 94 13:24:02 EST From: William Echard Subject: Using 'Dribble' while compiling To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de I'm using the new version of Clisp under DOS. Last night I was compiling a file and got many warnings. I decided to 'Dribble' to a file to try and capture them, but found that they were not saved to the file. Why is this, and what can I do about it?----Thanks, William. From walter@pollux.edv.agrar.tu-muenchen.de Fri Feb 11 18:44:16 1994 Return-Path: Received: from pollux.edv.agrar.tu-muenchen.de ([141.40.10.201]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03296; Fri, 11 Feb 94 18:44:16 +0100 Received: by pollux.edv.agrar.tu-muenchen.de (AIX 3.2/UCB 5.64/4.03) id AA26672; Fri, 11 Feb 1994 18:38:59 +0100 From: walter@pollux.edv.agrar.tu-muenchen.de (Bernhard Walter (DVS)) Message-Id: <9402111738.AA26672@pollux.edv.agrar.tu-muenchen.de> Subject: mma_1.5 unter clisp ? To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 11 Feb 1994 18:38:59 +0100 (NFT) X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 1627 Hi all, I just installed clisp on my 386 PC under linux 0.99pl15. This was possible without problems. The cause for installing clisp is a "common-lisp implementation of a small and efficient algebra system" named mma_1.5 , which i got from the ftp-server 'peoplesparc.berkeley.edu'. According to the README it is a fast reduced public clone of Mathematica (tm). Don't know if this is true, because i didn't manage to get things running. Shortly after loading mma's init.lsp (first rename all *.lisp files into *.lsp files !) the first error occurs. My little lisp knowledge was just enough to deal with the easy ones. mma seems to be developped with some 'Allegro' packet. Maybe it is a lisp derivate, and needs packages like :common-lisp, :excl (seems to be error handling). I don't know how to substitue this with clisp code. So, has anybody ported mma_1.5 to clisp, or knows how this could be done ? Thanks in advance Bernhard ======================================================== // Bernhard Walter ###### ##### // // TU-Muenchen # # # # # // // DVS-Weihenstephan # # # # # // // D-85350 Freising # #### # # // // // // email: walter@pollux.edv.agrar.tu-muenchen.de // // phone: +49-(0)8161-71-5055 // // fax: +49-(0)8161-71-4409 // ========================================================= From pollen@netcom.com Sat Feb 12 02:22:11 1994 Return-Path: Received: from netcom9.netcom.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03777; Sat, 12 Feb 94 02:22:11 +0100 Received: from localhost by netcom9.netcom.com (8.6.4/SMI-4.1/Netcom) id RAA13972; Fri, 11 Feb 1994 17:17:44 -0800 Date: Fri, 11 Feb 1994 17:17:44 -0800 From: pollen@netcom.com (David Pollen) Message-Id: <199402120117.RAA13972@netcom9.netcom.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Manuals I can't seem to decode the .man and .1 manuals for the MS DOS version of ClISP. Can anybody email me a plain text version or tell me how to decode the manuals. I don't have postscript so I can't read .dvi files. Thanks: pollen@netcom.com From dxs@evolving.com Wed Feb 16 22:02:51 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09434; Wed, 16 Feb 94 22:02:51 +0100 Received: by csn.org with UUCP id AA18845 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Wed, 16 Feb 1994 13:56:39 -0700 Received: by kafka (AIX 3.2/UCB 5.64/4.03) id AA43648; Wed, 16 Feb 1994 13:42:02 -0700 Date: Wed, 16 Feb 1994 13:42:02 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9402162042.AA43648@kafka> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: turning off continuable error messages it is possible to turn off the following messages. ;; Loading file /home/dxs/ai/norvig/loop.lsp ... ** - Continuable Error Redefining the COMMON LISP macro LOOP If you continue (by typing 'continue'): The old definition will be lost 1. Break> i would like the lisp system to not query the user but just replace the definition. thanks, dan stanger From haible Wed Feb 16 22:28:09 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09497; Wed, 16 Feb 94 22:28:09 +0100 Date: Wed, 16 Feb 94 22:28:09 +0100 From: haible (Bruno Haible) Message-Id: <9402162128.AA09497@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: turning off continuable error messages Dan Stanger says: (load "loop.lsp") > ** - Continuable Error > Redefining the COMMON LISP macro LOOP > > i would like the lisp system to not query the user but just replace the > definition. You absolutely want to live dangerous? Then (defun sys::exported-lisp-symbol-p (symbol) (declare (ignore symbol)) nil) One should be able to handle this using the new condition system (instead of modifying an undocumented function). Does someone know how? Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From donc@ISI.EDU Wed Feb 16 23:28:03 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09662; Wed, 16 Feb 94 23:28:03 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Wed, 16 Feb 1994 14:21:51 -0800 Date: Wed, 16 Feb 94 14:20:49 -0800 Posted-Date: Wed, 16 Feb 94 14:20:49 -0800 Message-Id: <9402162220.AA27390@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Wed, 16 Feb 94 14:20:49 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: turning off continuable error messages Dan Stanger says: (load "loop.lsp") > ** - Continuable Error > Redefining the COMMON LISP macro LOOP Bruno Haible says: One should be able to handle this using the new condition system My answer: I assume the error message came from CERROR. In that case something like this ought to work: (handler-bind ((t ; provide a more specific condition if you know it #'(lambda (c) ; a condition argument (when (find-restart 'continue) ; cerror is supposed to provide this restart (invoke-restart 'continue))))) (load "loop.lsp")) Bruno responds: Yes, it does. One can also write "error" instead of "t". From gadbois@cs.utexas.edu Wed Feb 16 23:44:25 1994 Return-Path: Received: from cs.utexas.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09777; Wed, 16 Feb 94 23:44:25 +0100 From: gadbois@cs.utexas.edu (David Gadbois) Received: from peaches.cs.utexas.edu by cs.utexas.edu (5.64/1.22/mx-relay) with SMTP id AA27096; Wed, 16 Feb 94 16:38:11 -0600 Received: by peaches.cs.utexas.edu (5.64/Client-v1.3) id AA14775; Wed, 16 Feb 94 16:38:08 -0600 Date: Wed, 16 Feb 94 16:38:08 -0600 Message-Id: <9402162238.AA14775@peaches.cs.utexas.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Bruno Haible's message of Wed, 16 Feb 94 22:29:58 +0100 <9402162128.AA09497@ma2s2.mathematik.uni-karlsruhe.de> Subject: turning off continuable error messages Date: Wed, 16 Feb 94 22:29:58 +0100 From: haible@ma2s2.mathematik.uni-karlsruhe.de (Bruno Haible) Dan Stanger says: (load "loop.lsp") > ** - Continuable Error > Redefining the COMMON LISP macro LOOP > > i would like the lisp system to not query the user but just > replace the definition. You absolutely want to live dangerous? Then (defun sys::exported-lisp-symbol-p (symbol) (declare (ignore symbol)) nil) One should be able to handle this using the new condition system (instead of modifying an undocumented function). Does someone know how? SYSTEM::REMOVE-OLD-DEFINITIONS, which is the function that signals the error, does not use a specific condition type for this error, so you have to look at the control string. (It would be nice to have all the system functions signal typed errors, but that's a tremendous amount of work.) (handler-bind ((simple-error #'(lambda (c) (when (string-equal (simple-condition-format-control c) "Redefining the COMMON LISP ~A ~S") (continue))))) ... Your code here ...) Unfortunately, this isn't working in my hacked up 1994-01-25 (it should) for some obscure reason: SIGNAL does not seem to be calling the handler. I'll look into it. --David Gadbois From RLS@waikato.ac.nz Fri Feb 18 03:59:28 1994 Return-Path: Received: from grace.waikato.ac.nz by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11710; Fri, 18 Feb 94 03:59:28 +0100 Message-Id: <9402180259.AA11710@ma2s2.mathematik.uni-karlsruhe.de> Date: Fri, 18 Feb 94 15:32 +1300 From: RLS@waikato.ac.nz Subject: linux clisp To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" HI there clispers, I've just grabbed the Jan 26 version of clisp for my linux pl0.99.14 and have tried to run a few things that I used to be able to do fine with my previous version of clisp (September 93 I think). But now I get these horrible messages such as: *** No more room for lisp objects. I know there is plenty of RAM available (I have 20MB plus 16MB swap). Is clisp really allocating memory dynamically as it used to? >From the man page it still claims to so I don't understand why these problems are occurring now? Any suggestions please?? Richard Shepherd. From stein@uni-paderborn.de Fri Feb 18 15:30:10 1994 Return-Path: Received: from uni-paderborn.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12502; Fri, 18 Feb 94 15:30:10 +0100 Received: from borkum.uni-paderborn.de by uni-paderborn.de with SMTP id AA18474 (5.65c/IDA-1.5 for ); Fri, 18 Feb 1994 15:23:36 +0100 Received: by borkum.uni-paderborn.de id AA14235 (5.65c/IDA-1.5 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 18 Feb 1994 15:23:35 +0100 Date: Fri, 18 Feb 1994 15:23:35 +0100 From: Benno Stein Message-Id: <199402181423.AA14235@borkum.uni-paderborn.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: enhancements needed, resources for achieving them hello, with maximum interest I read your mail about ECL. I'm very interested to test this package. Does there exist any documentation for it and, where do I find the ftp-sources? thanks a lot and have a nice day, benno From haible Sat Feb 19 21:24:04 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00748; Sat, 19 Feb 94 21:24:04 +0100 Date: Sat, 19 Feb 94 21:24:04 +0100 From: haible (Bruno Haible) Message-Id: <9402192024.AA00748@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Graphics in DOS William Echard asked: > Right now I'm limited to using Clisp under DOS, in text mode > only. Are there extensions that I can get that will make it fairly easy to > switch into graphics mode and draw on the screen? Yes, there are. Graphics primitives in CLISP ============================ In CLISP 1994-01-07 or newer, * DOS version, * Linux version, installed setuid root, there are some pixel graphics primitives in the SYSTEM package. They operate on a VGA card. Similar pixel graphics primitives can be used in the * Unix version running under X11 by use of the small XTERM package available on ma2s2.mathematik.uni-karlsruhe.de. This is the description of the PC/VGA graphics primitives: (SYSTEM::GRAPH-INIT [width [height [colors]]]) initializes the graphics system. The width, height parameters are hints for the size of the desired graphics screen (positive integers). The colors parameter is a hint for the number of colors. The actual width, height is implementation dependent, currently up to 640x480 on VGA cards and up to 1024x768 on ET4000 SVGA cards. Returns an alist ((color-value color-keyword) ...) which lists the available colours and their numerical equivalents. (SYSTEM::GRAPH-SHOW) switches the graphics hardware so that the graphics screen is visible. The text screen is activated on any text output. (SYSTEM::GRAPH-CLEAR [color]) fills the entire graphics screen with a single color. (SYSTEM::GRAPH-DIMS) returns two values: the actual width and the actual height of the graphics screen (in pixels). If (SYSTEM::GRAPH-DIMS) returns the values w and h, then valid screen coordinates are pairs (x,y) with 0 <= x < w and 0 <= y < h. x=0 denotes the left edge, y=0 the top edge. (SYSTEM::GRAPH-DOT x y) returns the colour of the pixel (x,y). (SYSTEM::GRAPH-DOT x y color) sets the colour of the pixel (x,y) to color. (SYSTEM::GRAPH-BOX x1 y1 x2 y2 color) draws a box (= filled rectangle) in colour color, the vertices being the pixels (x1,y1) (x2,y1) (x1,y2) (x2,y2) (SYSTEM::GRAPH-LINE x1 y1 x2 y2 color) Draws a line in colour color from pixel (x1,y1) to pixel (x2,y2). This specification is subject to change. Bruno Haible January 1994 From carney@cern.enet.dec.com Tue Feb 22 10:48:12 1994 Return-Path: Received: from inet-gw-2.pa.dec.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03103; Tue, 22 Feb 94 10:48:12 +0100 Received: from vbormc.vbo.dec.com by inet-gw-2.pa.dec.com (5.65/13Jan94) id AA11599; Tue, 22 Feb 94 01:36:33 -0800 Received: by vbormc.vbo.dec.com; id AA09892; Tue, 22 Feb 94 10:36:13 +0100 Message-Id: <9402220936.AA09892@vbormc.vbo.dec.com> Received: from cern.enet; by vbormc.enet; Tue, 22 Feb 94 10:36:13 MET Date: Tue, 22 Feb 94 10:36:13 MET From: Steve Carney [41](22)782.90.60 22-Feb-1994 1036 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: carney@cern.enet.dec.com Apparently-To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: CLISP under ILISP working? I am trying to get Lucid Emacs 19.9 under MIP/ULTRIX to work with CLISP. The inferior CLISP program comes up OK, and what I type is echoed in the window. However, CLISP does not respond to anything typed in the window. I believe that the ilisp interface is not being initialized properly for CLISP. While bringing up the CLISP I get the "Start Initializing ILISP" in the status line, but I do not get the standard initialization done message. After looking through the archive, I found a message indicating that using a pty instead of a pipe (setting process-connection-type to t) worked for someone a while back. I tried this, but emacs would hang (no typing echo or screen update). Has anyone found similar problems/solutions communicating with an inferior CLISP? Below are my ILISP initializations: (require 'ilisp) (defvar *my-lisp* "/bin/sh -c /usr/local/bin/clisp") (setq inferior-lisp-program *my-lisp*) (setq ilisp-program *my-lisp*) (setq clisp-program *my-lisp*) (setq lisp-wait-p t) ;Synchronous sends (setq term-setup-hook (function (lambda () (clisp)))) Thanks, Steve From ritter@psychology.nottingham.ac.uk Wed Feb 23 21:37:50 1994 Return-Path: Received: from ixgate01.dfnrelay.d400.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05575; Wed, 23 Feb 94 21:37:50 +0100 X400-Received: by mta d400relay in /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Wed, 23 Feb 1994 21:31:22 +0100 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Wed, 23 Feb 1994 21:30:01 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Wed, 23 Feb 1994 21:29:30 +0100 Date: Wed, 23 Feb 1994 21:29:30 +0100 X400-Originator: ritter@psychology.nottingham.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=uk.ac/ADMD= /C=gb/;sun2.mhs-r.315:23.01.94.20.30.01] X400-Content-Type: P2-1984 (2) Content-Identifier: clisp with il... Alternate-Recipient: Allowed From: "Frank E. Ritter" Sender: ritter@psychology.nottingham.ac.uk Message-Id: <"19318 Wed Feb 23 20:30:03 1994"@mhs-relay.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: ritter@psychology.nottingham.ac.uk Subject: clisp with ilisp Source-Info: From (or Sender) name not authenticated. I just started using clisp to teach a course and would like my students to be able to use it with ilisp. Has anyone defined a clisp dialect for ilisp? Under ilisp 5.5 I'm having problems bringing it up as straight clisp (ilisp's default commonlisp, probably not the german clisp). Thanks, Frank Ritter@psyc.nott.ac.uk + 44 (602) 515-292 (office, will bounce eventually to a secretary) + 44 (602) 515-324 (incoming fax) + 44 (602) 436-265 (home) Department of Psychology U. of Nottingham University Park, Nottingham NG7 2RD England From schrod@iti.informatik.th-darmstadt.de Thu Feb 24 12:27:04 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06133; Thu, 24 Feb 94 12:27:04 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA43950 (5.65c/IDA-1.4.4 for ); Thu, 24 Feb 1994 12:19:36 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id MAA11937; Thu, 24 Feb 1994 12:19:35 +0100 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA19444; Thu, 24 Feb 1994 12:19:36 +0100 From: Joachim Schrod Message-Id: <9402241119.AA19444@spice.iti.informatik.th-darmstadt.de> Subject: Re: clisp with ilisp To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 24 Feb 1994 12:19:35 +0100 (MEZ) In-Reply-To: <"19318 Wed Feb 23 20:30:03 1994"@mhs-relay.ac.uk> from "Frank E. Ritter" at Feb 23, 94 09:40:49 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 1696 You wrote: > > I just started using clisp to teach a course and would like my > students to be able to use it with ilisp. Has anyone defined a clisp > dialect for ilisp? Under ilisp 5.5 I'm having problems bringing it up > as straight clisp (ilisp's default commonlisp, probably not the german > clisp). Using CLISP via ILISP, that's a sad story. What's known here, on this mailing list: Ziad H. Najem reported at 12 Mar 1993 that he has a semi-working CLISP with ILISP. He mailed some code. This code is part of the file mailing-list-archive-1993 that's on the CLISP ftp archives in Karlsruhe and Darmstadt. David Gadbois reported on 13 Jan 94 that he has an ``ILISP interface (mostly working)''. We haven't heard about that work later on this mailing list. (No pun intended, it's just five weeks ago. I assume he has real work, too.) Already at 12 Mar 93, Matthias Lindner reported a problem that I've got, too: ``I get an interactive clisp-buffer, but mode reamins :load forever.'' I mentioned at 19 Jan 1994 that changing process-connection-type to t (in lisp-mod.el) has repaired it for me (at least for small examples, didn't try large ones due to the missing adaption of the rest), but for Steve Carney this did not work [22 Feb 94]. Anybody with more information? Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From HELLER@Jetson.UH.EDU Thu Feb 24 16:44:07 1994 Return-Path: Received: from Rosie.UH.EDU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06783; Thu, 24 Feb 94 16:44:07 +0100 Received: from Jetson.UH.EDU by Jetson.UH.EDU (PMDF V4.2-11 #5185) id <01H99C2D41C08X190M@Jetson.UH.EDU>; Thu, 24 Feb 1994 09:36:25 CST Date: Thu, 24 Feb 1994 09:36:25 -0600 (CST) From: And thanks for all the fish Subject: Debugger doesn't listen To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: <01H99C2D4U9E8X190M@Jetson.UH.EDU> X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII Content-Transfer-Encoding: 7BIT One of my students claims he installed CLISP on his IBM PC and followed all directions. He tells me though that when he gets booted into the debugger, "abort" (with no quotes or parentheses) doesn't get him out. What is wrong with the installation? Or just generally what is wrong and how can he fix it? Miriam Heller From hoehle@inf-wiss.ivp.uni-konstanz.de Thu Feb 24 18:15:31 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07018; Thu, 24 Feb 94 18:15:31 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA07362; Thu, 24 Feb 94 18:07:54 +0100 Date: Thu, 24 Feb 94 18:07:54 +0100 Message-Id: <9402241707.AA07362@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: read-label bug in io.d There's some new bug in CLISP Compile a file containing: ---------------- (defun foo () (list '#.(make-pathname :type "foo") '#.(make-pathname :type "bar"))) ---------------- compilation works fine and gives: ---------------- (SYSTEM::VERSION '(SYSTEM::CLISP3 9. LISP:T 101293.)) #Y(#:TOP-LEVEL-FORM-1 #18Y(00 00 00 00 00 00 00 01 D8 2E 01 D8 DA 31 78 C3 19 01) FOO SYSTEM::REMOVE-OLD-DEFINITIONS #Y(FOO #14Y(00 00 00 00 00 00 00 01 D8 D9 60 02 19 01) #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY #1=(:RELATIVE) :NAME NIL :TYPE "foo" :VERSION NIL ) #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY #1# :NAME NIL :TYPE "bar" :VERSION NIL) ) ) ---------------- but loading the compiled file gives: ;; Datei /home/hoehle/test.fas wird geladen... *** - MAKE-PATHNAME: Unzulaessiges :DIRECTORY-Argument # 1. Break> This was tested on Amiga and Sun using January 25th CLISP. The thing is that, like for complex numbers with #C(#1=7.3 #1#), #n# references must be resolved before MAKE-PATHNAME is called: diff -c3 src/io.d.orig src/io.d *** src/io.d.orig Wed Dec 15 02:01:11 1993 --- src/io.d Thu Feb 24 15:58:17 1994 *************** *** 3933,3939 **** }} if (eq(name,S(pathname))) # Symbol PATHNAME ? # ja -> speziell behandeln, keine Structure: ! { pushSTACK(L(make_pathname)); } elif (eq(name,S(byte))) # Symbol BYTE ? # ja -> speziell behandeln, keine Structure: { pushSTACK(S(make_byte)); } --- 3933,3939 ---- }} if (eq(name,S(pathname))) # Symbol PATHNAME ? # ja -> speziell behandeln, keine Structure: ! { STACK_1 = make_references(args); pushSTACK(L(make_pathname)); } elif (eq(name,S(byte))) # Symbol BYTE ? # ja -> speziell behandeln, keine Structure: { pushSTACK(S(make_byte)); } I tested this patch on the Amiga. Thanks for your attention, Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From hoehle@inf-wiss.ivp.uni-konstanz.de Thu Feb 24 18:25:41 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07093; Thu, 24 Feb 94 18:25:41 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA07400; Thu, 24 Feb 94 18:18:05 +0100 Date: Thu, 24 Feb 94 18:18:05 +0100 Message-Id: <9402241718.AA07400@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] set clisp-list From thommark@access.digex.net Thu Feb 24 22:32:22 1994 Return-Path: Received: from access1.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07350; Thu, 24 Feb 94 22:32:22 +0100 Received: by access1.digex.net id AA22667 (5.67a8/IDA-1.5 for Members of ); Thu, 24 Feb 1994 16:24:46 -0500 Date: Thu, 24 Feb 1994 16:24:46 -0500 (EST) From: "M. Thomas" Subject: Error in MACROS1.LSP & SERIES To: Members of Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Hello, CLISPers, The macroexpansion function for MULTIPLE-VALUE-SETQ in the file MACROS1.LSP appears to be incorrect. I found this error when trying to run the test suite that comes with SERIES. (Latest version of CLISP for DOS and SERIES macro package from usual U. Karlsruhe ftp site.) > (multiple-value-setq (a b) (values 2 3)) 2 > (list a b) (2 3) ;;; Everything is fine, since the CLISP evaluator apparently expands ;;; a direct invocation of MULTIPLE-VALUE-SETQ as a special form. > (pprint (macroexpand '(multiple-value-setq (a b) (values 2 3)))) (LET* ((#:G50 (MULTIPLE-VALUE-LIST (VALUES 2 3)))) (PROG1 ((SETQ A (POP #:G50)) (SETQ B (POP #:G50)))) ) ;;; This macroexpansion is not correct; there's an extra pair of ;;; parentheses enclosing the SETQ forms within the PROG1. ;;; SERIES apparently evaluates the code returned by MACROEXPAND. I found the macroexpander code for MULTIPLE-VALUE-SETQ in the file "MACROS1.LSP". I believe the original lines (marked by '-') should be deleted, and lines marked by '+' added. (Replacing LET* by LET is purely cosmetic.) (sys::%put 'multiple-value-setq 'sys::macro (sys::macro-expander multiple-value-setq (varlist form) (let ((g (gensym)) (poplist nil)) (dolist (var varlist) (setq poplist (cons `(SETQ ,var (POP ,g)) poplist))) - `(LET* ((,g (MULTIPLE-VALUE-LIST ,form))) + `(LET ((,g (MULTIPLE-VALUE-LIST ,form))) - ,(if poplist `(PROG1 ,(nreverse poplist)) NIL) + ,(if poplist `(PROG1 ,@(nreverse poplist)) NIL) ) ) ) ) By the way: (1) SERIES fails 2 other tests in the test suite, because some macroexpansion creates a form like (TAGBODY
... NIL ... ...), and CLISP does not allow NIL in such a context. CLtL2, p. 175 implies that NIL in such a context is (or should be) deprecated. To reproduce this error most easily: > (load "series") ;; series.fas, of course > (series::install) > (setq series::*series-implicit-map* T) > (pprint (macroexpand '(collect-nth 1 (catenate #z() ((lambda () 2)))))) Most likely suspect is a macroexpansion function within SERIES, but I don't know for sure. If someone out there has encountered and solved this problem, please let me know (either by email or clisp-list). (2) The latest DOS distribution omitted the file about the X3J13 votes, I think it was called Cltl2.txt. Thanks, and keep up the good work on CLISP. Mark A. Thomas thommark@access.digex.net From stein@uni-paderborn.de Fri Feb 25 15:54:59 1994 Return-Path: Received: from uni-paderborn.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09055; Fri, 25 Feb 94 15:54:59 +0100 Received: from borkum.uni-paderborn.de by uni-paderborn.de with SMTP id AA20532 (5.65c/IDA-1.5 for ); Fri, 25 Feb 1994 15:47:16 +0100 Received: by borkum.uni-paderborn.de id AA24313 (5.65c/IDA-1.5 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 25 Feb 1994 15:47:14 +0100 Date: Fri, 25 Feb 1994 15:47:14 +0100 From: Benno Stein Message-Id: <199402251447.AA24313@borkum.uni-paderborn.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp on atari TT hello clisp netters, I'm looking for atari-TT clisp-binaries which are 32bit clean. The binaries I found in clisp/binaries/atari/ rely on the 24 + 8bit-never-used concept. Did anyone compile the sources to 32bit clean code? Thanks for any help, Benno From haible Fri Feb 25 17:11:13 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09204; Fri, 25 Feb 94 17:11:13 +0100 Date: Fri, 25 Feb 94 17:11:13 +0100 From: haible (Bruno Haible) Message-Id: <9402251611.AA09204@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp with ilisp [Forwarded from David Gadbois .] Date: Thu, 24 Feb 1994 05:29-0600 From: Joachim Schrod Using CLISP via ILISP, that's a sad story. What's known here, on this mailing list: David Gadbois reported on 13 Jan 94 that he has an ``ILISP interface (mostly working)''. We haven't heard about that work later on this mailing list. (No pun intended, it's just five weeks ago. I assume he has real work, too.) Right, I have been caught up in the real world. I did send my "mostly working" mod to the ILISP mailing list (if there is demand I will resend it to clisp-list) in the hopes that someone would take it the last yard. Already at 12 Mar 93, Matthias Lindner reported a problem that I've got, too: ``I get an interactive clisp-buffer, but mode reamins :load forever.'' I mentioned at 19 Jan 1994 that changing process-connection-type to t (in lisp-mod.el) has repaired it for me (at least for small examples, didn't try large ones due to the missing adaption of the rest), but for Steve Carney this did not work [22 Feb 94]. Anybody with more information? The problem is that SYS:READ-FORM decides whether or not to print a prompt based on whether there is input available. ILISP, during its initialization phase, slings a bunch of forms down the pipe before checking for output. If things are timed wrong, clisp will not print a prompt after evaluating the first of these, and so ILISP will hang forever waiting for the prompt to be printed. My workaround was to dike out the test for input in SYS:READ-FORM. Better still would be to add a -ilisp or some such command line flag to clisp to control this behavior and other things (like turning off GNU readline.) --David Gadbois From holdorph@cl-next4.cl.msu.edu Mon Feb 28 04:42:13 1994 Return-Path: Received: from cl-next4.cl.msu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10683; Mon, 28 Feb 94 04:42:13 +0100 Received: by cl-next4.cl.msu.edu (NX5.67c/MSU-2.04) id AA12406; Sun, 27 Feb 94 22:34:06 -0500 From: Cris J. Holdorph Message-Id: <9402280334.AA12406@cl-next4.cl.msu.edu> Subject: Problem installing OS/2 version To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Sun, 27 Feb 1994 22:34:05 -36803936 (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: 1124 I hope this isn't a redundant question on this list, but it was not mentioned in the documentation so I needed help from somewhere. While trying to configure and install the OS/2 version of GNU CLISP I have edited the "config.lsp" file, I then execute "lisp -M lispinit.mem" like the README says. I then execute the compile command and get the following error: > (compile-file "config") Compiling file D:\LISP\CONFIG.LSP ... *** - READ from #: illegal char acter #\Code26 1. Break> What am I doing wrong? I only edited parts in the same format as was already there, i.e. changing "C:\\CLISP\\" to "D:\\CLISP\\". Any help is appreciated, ---- Cris J H -- ================================================== = Christopher J. Holdorph || Team OS/2 = = E-Mail: holdorph@cps.msu.edu || = = Michigan State University || = ================================================== = "...Your dream is over, Or has it just begun?" = = ---"Silent Lucidity", Queensryche = ================================================== From rodw@cbl.leeds.ac.uk Mon Feb 28 10:05:50 1994 Return-Path: Received: from ixgate01.dfnrelay.d400.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10921; Mon, 28 Feb 94 10:05:50 +0100 X400-Received: by mta d400relay in /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Mon, 28 Feb 1994 09:58:26 +0100 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Mon, 28 Feb 1994 09:57:00 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Mon, 28 Feb 1994 09:56:47 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Mon, 28 Feb 1994 09:56:45 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Mon, 28 Feb 1994 09:56:45 +0100 Date: Mon, 28 Feb 1994 09:56:45 +0100 X400-Originator: rodw@cbl.leeds.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=UK.AC/ADMD= /C=GB/;<7293.9402280856@cblelcc.cbl.lee] X400-Content-Type: P2-1984 (2) Content-Identifier: Function keys... Alternate-Recipient: Allowed From: rodw@cbl.leeds.ac.uk Message-Id: <7293.9402280856@cblelcc.cbl.leeds.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Function keys with builtin editor in xterm Hello, Does anyone have a method for running the editor that is provided with clisp in an xterm on sun sparcstation. The problem I'm having is that I want to raise one of the windows using F[1-10] but when I press the key F1 clisp gets an ansi escape sequence rather than an #\F1. Thanks for any suggestions, Rod ---- Roderick Williams R.J.Williams@cbl.leeds.ac.uk From haible Mon Feb 28 16:34:32 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11250; Mon, 28 Feb 94 16:34:32 +0100 Date: Mon, 28 Feb 94 16:34:32 +0100 From: haible (Bruno Haible) Message-Id: <9402281534.AA11250@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Problem installing OS/2 version Cris J. Holdorph asks: > Compiling file D:\LISP\CONFIG.LSP ... > *** - READ from #: > illegal character #\Code26 > 1. Break> > > What am I doing wrong? #\Code26 is usually called Ctrl-Z. Some editors append this to the end of config.lsp. Either - choose an editor that doesn't append this obselete character to the end of the file, or - tell the LISP reader to treat Ctrl-Z as whitespace: (set-syntax-from-char #\Code26 #\Space) (Suggestion by Johann Petrak, 18 Oct 1993 on this mailing list.) Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From redmond@tis.com Mon Feb 28 16:51:02 1994 Return-Path: Received: from relay.tis.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11348; Mon, 28 Feb 94 16:51:02 +0100 Received: by relay.tis.com; id AA29784; Mon, 28 Feb 94 10:43:15 EST Received: from sol.tis.com(192.33.112.100) by relay via smap (V1.3mjr) id sma029775; Mon Feb 28 10:42:47 1994 Received: from sol.tis.com by tis.com (4.1/SUN-5.64) id AA22035; Mon, 28 Feb 94 10:41:47 EST Message-Id: <9402281541.AA22035@tis.com> To: clisp-list Subject: Re: Problem installing OS/2 version In-Reply-To: Your message of "Mon, 28 Feb 94 04:44:05 +0100." <9402280334.AA12406@cl-next4.cl.msu.edu> Date: Mon, 28 Feb 94 10:41:46 -0500 From: Timothy Redmond The problem that you are having is with the ^Z that your editor is setting at the end of your config.lsp file. If it is inconvenient to arrange that the editor does not put ^Z at the end of the file then a possible solution is to put the line (set-syntax-from-char (code-char 26) #\Space) into the config.lsp. This arranges that ^Z is treated like a space. I have found another related problem in that if you share lisp files created and used for CLISP under OS2 (and probably DOS) then the ^M's that DOS/OS2 editors place in the files causes trouble at the UNIX sites. I fix this by putting the line (set-syntax-from-char (code-char 13) #\Space) in the appropriate source file so that the UNIX machine does not get confused by the ^M's. tim. From donc@ISI.EDU Mon Feb 28 18:00:29 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11476; Mon, 28 Feb 94 18:00:29 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Mon, 28 Feb 1994 08:52:13 -0800 Date: Mon, 28 Feb 94 08:51:33 -0800 Posted-Date: Mon, 28 Feb 94 08:51:33 -0800 Message-Id: <9402281651.AA03785@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Mon, 28 Feb 94 08:51:33 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: ^M's in source files From: Timothy Redmond I have found another related problem in that if you share lisp files created and used for CLISP under OS2 (and probably DOS) then the ^M's that DOS/OS2 editors place in the files causes trouble at the UNIX sites. This seems not to be the fault of any editor - just different end-of-line conventions by unix and DOS. (In fact, I've used my editor to FIX that problem.) I fix this by putting the line (set-syntax-from-char (code-char 13) #\Space) in the appropriate source file so that the UNIX machine does not get confused by the ^M's. It turns out this is not a very good solution. In particular, if your source file contains any ; comments, the rest of the file then looks like a comment (since it all appears to be part of the same line). (I thought those files compiled mighty fast!) From jbishop@babel.ling.nwu.edu Mon Feb 28 21:18:16 1994 Received: from relay.acns.nwu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11766; Mon, 28 Feb 94 21:18:16 +0100 Received: from babel.ling.nwu.edu by relay.acns.nwu.edu (4.1/SMI-ACNS-relay-%I%) id AA18068; Mon, 28 Feb 94 14:09:53 CST Return-Path: Received: by babel.ling.nwu.edu (4.1/SMI-4.0) id AA21196; Mon, 28 Feb 94 14:09:50 CST Date: Mon, 28 Feb 1994 14:09:49 -0600 (CST) From: Jeff Bishop Subject: Re: ^M's in source files To: clisp-list In-Reply-To: <9402281651.AA03785@hpai19.isi.edu> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII > This seems not to be the fault of any editor - just different end-of-line > conventions by unix and DOS. (In fact, I've used my editor to FIX that > problem.) > I fix this by putting the line > (set-syntax-from-char (code-char 13) #\Space) > in the appropriate source file so that the UNIX machine does not get > confused by the ^M's. > It turns out this is not a very good solution. In particular, if your > source file contains any ; comments, the rest of the file then looks > like a comment (since it all appears to be part of the same line). > (I thought those files compiled mighty fast!) A better solution, if your Unix system has it, is the dos2unix command which automatically strips the ^Ms. The syntax is: dos2unix Jeff From HELLER@Jetson.UH.EDU Tue Mar 1 03:34:26 1994 Return-Path: Received: from Rosie.UH.EDU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12117; Tue, 1 Mar 94 03:34:26 +0100 Received: from Jetson.UH.EDU by Jetson.UH.EDU (PMDF V4.2-11 #5185) id <01H9FJUWU86E8X2JDS@Jetson.UH.EDU>; Mon, 28 Feb 1994 20:26:01 CST Date: Mon, 28 Feb 1994 20:26:01 -0600 (CST) From: And thanks for all the fish Subject: CLISP on SOFT PC To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: <01H9FJUWU86G8X2JDS@Jetson.UH.EDU> X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" X-Vms-Cc: HELLER Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII Content-Transfer-Encoding: 7BIT Here it is... I'm about to admit all of what I don't know about computing. I've tried to install CLISP on my Quadra 950 running Soft PC - the DOS/Windows emulator. I only have 16 MB RAM so I tried to launch it in DOS. Regardless of what I do, CLISP is savvy enough to determine that it's not running on a native 4 When I try to run clisp, it says: < RSX dpmi-extender alpha v0.61 (c) Rainer Schnitker '92'93 < No DPMI-host found! < < run-time error R6001 < - null pointer assignment When I try to run lisp itself, I get: < This program requires an 80386 CPU. Since I don't have the background to determine how tied into the HW all this is I'll ask in vain: Is there a workaround? Any way in which I might run CLISP on Soft PC?\ Thanks in advance for your response. Miriam Heller ******************************************************************************** * Miriam Heller *** * Asst. Professor ****** ** These views are solely mine and do * Univ. of Houston *** ** ** not consciously reflect those of * Industrial Engineering ***** * ** my employer or anyone else in the * 4800 Calhoun St. **** ** universe for that matter. * Houston, Texas 77204-4812 *** * Email: heller@jetson.uh.edu ******************************************************************************** From rodw@cbl.leeds.ac.uk Tue Mar 1 10:51:18 1994 Return-Path: Received: from ixgate01.dfnrelay.d400.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12409; Tue, 1 Mar 94 10:51:18 +0100 X400-Received: by mta d400relay in /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Tue, 1 Mar 1994 10:26:37 +0100 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Tue, 1 Mar 1994 10:24:51 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Tue, 1 Mar 1994 10:24:35 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Tue, 1 Mar 1994 10:24:34 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Tue, 1 Mar 1994 10:24:34 +0100 Date: Tue, 1 Mar 1994 10:24:34 +0100 X400-Originator: rodw@cbl.leeds.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=UK.AC/ADMD= /C=GB/;<11473.9403010924@cblelcc.cbl.le] X400-Content-Type: P2-1984 (2) Content-Identifier: Re: Problem i... Alternate-Recipient: Allowed From: rodw@cbl.leeds.ac.uk Message-Id: <11473.9403010924@cblelcc.cbl.leeds.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Problem installing OS/2 version [Sorry if anyone has already seen this message, but when I tried to post it yesterday I didn't get a copy back from the list] Hello, Does anyone have a method for running the editor, editor.lsp, in an xterm on a sparcstation. The problem is that clisp doesn't see characters #\F1 - #\F10 when function keys are pressed, rather it gets an ansi escape sequence, the first character of which is an escape which exits the editor. I can cause an xterm to map the function keys to any string but I'm not sure what the ascii equivalent is to F1. Thanks for any assistance, Rod ---- Roderick Williams R.J.Williams@cbl.leeds.ac.uk From ah0i+@andrew.cmu.edu Tue Mar 1 15:56:18 1994 Return-Path: Received: from po3.andrew.cmu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12963; Tue, 1 Mar 94 15:56:18 +0100 Received: from localhost (postman@localhost) by po3.andrew.cmu.edu (8.6.4/8.6.4) id JAA06427 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Tue, 1 Mar 1994 09:47:53 -0500 Received: via switchmail; Tue, 1 Mar 1994 09:47:52 -0500 (EST) Received: from unix6.andrew.cmu.edu via qmail ID ; Tue, 1 Mar 1994 09:46:12 -0500 (EST) Received: from unix6.andrew.cmu.edu via qmail ID ; Tue, 1 Mar 1994 09:46:09 -0500 (EST) Received: from BatMail.robin.v2.14.CUILIB.3.45.SNAP.NOT.LINKED.unix6.andrew.cmu.edu.pmax.ul4 via MS.5.6.unix6.andrew.cmu.edu.pmax_ul4; Tue, 1 Mar 1994 09:46:07 -0500 (EST) Message-Id: Date: Tue, 1 Mar 1994 09:46:07 -0500 (EST) From: "Andrew A. Houghton" To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: *default-time-zone* Good Morning to all, I've been unsuccessfully trying to convince clisp that I'm not in the mid-European time zone. When I first installed the binaries (under dos) I ignored changing the value; now I'm using (get-universal-time) in a program, and the answers are all wrong (took me forever to track that one down, believe me). I've tried re-installing from scratch, changing the default, but it doesn't seem to work. Here's the process: . change congif + defs1 . start clisp, . compile-files config + defs1 . load them . save-init-mem everything works fine (despite numerous continuable errors, complaining about redefining macros) EXCEPT *default-time-zone* isn't getting changed. As I don't read German, I'm at a significant disadvantage in understanding the comments in defs1. Any thoughts? Andrew Houghton (ah0i@andrew.cmu.edu) P.S. While I'm at it, is there a variable to control whether clisp makes noise or not? I'd rather not hear the beep when I try to backspace over the end of a line... From rodw@cbl.leeds.ac.uk Wed Mar 2 09:51:35 1994 Return-Path: Received: from ixgate01.dfnrelay.d400.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14017; Wed, 2 Mar 94 09:51:35 +0100 X400-Received: by mta d400relay in /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Wed, 2 Mar 1994 09:44:00 +0100 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Wed, 2 Mar 1994 09:42:29 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Wed, 2 Mar 1994 09:42:28 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Wed, 2 Mar 1994 09:42:27 +0100 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Wed, 2 Mar 1994 09:42:27 +0100 Date: Wed, 2 Mar 1994 09:42:27 +0100 X400-Originator: rodw@cbl.leeds.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=UK.AC/ADMD= /C=GB/;<13182.9403020842@cblelcc.cbl.le] X400-Content-Type: P2-1984 (2) Content-Identifier: (l)035(r)(l)092( Alternate-Recipient: Allowed From: rodw@cbl.leeds.ac.uk Message-Id: <13182.9403020842@cblelcc.cbl.leeds.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: &?F[1-10] on a sparcstation? Hello, Does anyone have a method for running the editor, editor.lsp, in an xterm on a sparcstation. The problem is that clisp doesn't see characters #\F1 - #\F10 when function keys are pressed, rather it gets an ansi escape sequence, the first character of which is an escape which exits the editor. I can cause an xterm to map the function keys to any string but I'm not sure what the ascii equivalent is to F1. Thanks for any assistance, Rod ---- Roderick Williams R.J.Williams@cbl.leeds.ac.uk From dxs@evolving.com Fri Mar 4 22:54:21 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16588; Fri, 4 Mar 94 22:54:21 +0100 Received: by csn.org with UUCP id AB05476 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 4 Mar 1994 14:45:20 -0700 Received: from shakey by kafka (AIX 3.2/UCB 5.64/4.03) id AA59482; Fri, 4 Mar 1994 14:36:45 -0700 Received: by shakey (AIX 3.2/UCB 5.64/4.03) id AA22808; Fri, 4 Mar 1994 14:37:52 -0700 Date: Fri, 4 Mar 1994 14:37:52 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9403042137.AA22808@shakey> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: break even point between hash tables and lists what is the number of elements that causes hash tables to be more efficient than a list for storing and retrieving data? also has anybody tried using a sorted array and binary search? i am interested in this information if anybody has this. thanks, dan stanger From loewenst@paul.rutgers.edu Sat Mar 5 00:03:17 1994 Return-Path: Received: from paul.rutgers.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16752; Sat, 5 Mar 94 00:03:17 +0100 Received: by paul.rutgers.edu (5.59/SMI4.0/RU1.5/3.08) id AA08557; Fri, 4 Mar 94 17:54:17 EST Date: Fri, 4 Mar 94 17:54:17 EST From: loewenst@paul.rutgers.edu (David Loewenstern) Message-Id: <9403042254.AA08557@paul.rutgers.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9403042137.AA22808@shakey> (dxs@evolving.com) Subject: Re: break even point between hash tables and lists Reply-To: loewenst@paul.rutgers.edu (David Loewenstern) ... On 4 Mar 94, Dan Stanger said: } what is the number of elements that causes hash tables to be more } efficient than a list for storing and retrieving data? also has anybody } tried using a sorted array and binary search? i am interested in } this information if anybody has this. Wouldn't this vary from implementation to implementation? These opinions are shareware. If you like the product, please send your $0.02 to David Loewenstern || From donc@ISI.EDU Sat Mar 5 05:54:42 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16904; Sat, 5 Mar 94 05:54:42 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Fri, 4 Mar 1994 20:45:41 -0800 Date: Fri, 4 Mar 94 20:45:11 -0800 Posted-Date: Fri, 4 Mar 94 20:45:11 -0800 Message-Id: <9403050445.AA24546@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Fri, 4 Mar 94 20:45:11 -0800 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: building clisp on hp pa hpux_09.01 I'm trying to build clisp-1994-01-07. My first error was no definition for length32. The problem seems to be that makemake was not recognizing HP PA. makemake says: # Some shells (A/UX and OSF/1) need the parentheses around "arch" below. HSYS=`((arch) 2>/dev/null || uname -m 2>/dev/null) | $tolower` # system name in lowercase HSYSOS=`((arch) 2>/dev/null || uname 2>/dev/null) | $tolower` # OS name in lowercase These lines both produce values of hp700, which seems not to be what's needed. I've replaced them with HSYS=`(uname -m) | $tolower` # system name in lowercase HSYSOS=`(uname) | $tolower` # OS name in lowercase which produces 9000/730 and hp-ux, which seem to work better - at least it then tries to use arihppa.d My next problem is that arihppa.d contains lines like ADDIL L'divu_32_rest-$global$,%dp Since I get errors like this lisparit0.d:20032: unterminated string or character constant that seem to refer to those lines, I gather that the $global$ was supposed to have been replaced by something ending with a quote. Any advice? From haible Mon Mar 7 15:30:43 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA18365; Mon, 7 Mar 94 15:30:43 +0100 Date: Mon, 7 Mar 94 15:30:43 +0100 From: haible (Bruno Haible) Message-Id: <9403071430.AA18365@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: break even point between hash tables and lists Dan Stanger asks: > what is the number of elements that causes hash tables to be more > efficient than a list for storing and retrieving data? There was a discussion about this in comp.lang.lisp a couple of months ago. For speed, the break-even point (comparing ASSOC to GETHASH) depends much on the Lisp implementation: for some implementations it is about 200 elements, for CLISP it is 2 or 3 elements. For space, however: lists are always more compact. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From jcm@cairo.anu.edu.au Wed Mar 9 03:01:13 1994 Return-Path: Received: from cairo.anu.edu.au by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20023; Wed, 9 Mar 94 03:01:13 +0100 Received: from localhost (jcm@localhost) by cairo.anu.edu.au (8.6.5/8.6.4av) id LAA18882 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Wed, 9 Mar 1994 11:51:27 +1000 From: jcm Message-Id: <199403090151.LAA18882@cairo.anu.edu.au> Subject: Re: MAXIMA --> PUNIMAX To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 9 Mar 1994 11:51:25 +1000 (EST) In-Reply-To: <9401300104.AA02867@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jan 30, 94 02:07:35 am X-Mailer: ELM [version 2.4 PL21] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 517 I'm having trouble installing punimax on a Sun 4/670MP running SunOs4.1.3. I've managed to get clisp installed, and I've changed the various paths to point to the correct source (I haven't got root access ;<). When in ~/lisp/punimax/src I type % Makefile I get the following: jcm 11:46 69% cd lisp/punimax/src src 11:46 70% make clisp -q -c sloop *** - FUNCALL: the function COMPILE-FILE is undefined > (there's a ^D here) clisp -q -i sloop -c make ^Z Suspended What's going on here? ta muchly, James .. From haible Wed Mar 9 16:53:39 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20639; Wed, 9 Mar 94 16:53:39 +0100 Date: Wed, 9 Mar 94 16:53:39 +0100 From: haible (Bruno Haible) Message-Id: <9403091553.AA20639@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: MAXIMA --> PUNIMAX > clisp -q -c sloop > *** - FUNCALL: the function COMPILE-FILE is undefined I guess that clisp is not installed correctly. Your `clisp' script should contain the "-M lispinit.mem" switch, and this lispinit.mem file should be about 500 or 600 KB in size. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From xiaobin@cs.uq.oz.au Mon Mar 21 01:50:03 1994 Return-Path: Received: from uqcspe.cs.uq.oz.au by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02186; Mon, 21 Mar 94 01:50:03 +0100 Received: from lacewing.cs.uq.oz.au by uqcspe.cs.uq.oz.au id ; Mon, 21 Mar 94 10:38:26 +1000 Date: Mon, 21 Mar 94 10:38:25 EST From: xiaobin@cs.uq.oz.au Message-Id: <9403210038.AA16015@client> Apparently-To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de ========================================================================= ------------------------------------------------------------------------ \\\|||/// \\\|||/// \\\|||/// . ======= . ======= . ======= / \| O O | / \| O O | / \| O O | \ / \v_'/ \ / \v_'/ \ / \v_'/ # _| |_ # _| |_ # _| |_ (#) ( ) (#) ( ) (#) ( ) #\//|* *|\\ #\//|* *|\\ #\//|* *|\\ #\/( * )/ #\/( * )/ #\/( * )/ # ===== # ===== # ===== # (\ /) # (\ /) # (\ /) # || || # || || # || || .#---'| |----. .#---'| |----. .#---'| |----. #----' -----' #----' -----' #----' ------' ------------------------------------------------------------------------- This message has been sent to you for good luck. The original is in New England. It has been sent around the world nine times. The luck has now been sent to you.You will receive good luck within four days of receiving this message - Provided you, in turn send it on. This is no joke. You will receive good luck in the mail. But no money. Send copies to people you think need good luck. Don't send money as fate has no price.Do not keep this message. This message must leave your hands in 96 hours. A United States Air Force Officer received 470,000 Dollars. Another Man received 40,000 Dollars and lost it because he broke the chain. Whereas in the Philippines, Gene Welch lost his wife 51 days after receiving the message. He failed to circulate the message. However, before his death, he received 7,555,000 dollars. Please send twenty copies and see what happen in four days. The chain comes from Venezuela and was written by Saul De Groda, A Missionary from South America. Since the copy must tour the world, you must make twenty copies and send them to friends and associates - After a few days you will get a surprise- This is true, even if you are not superstitious. Do not the following: Constantine Dias received this chain in 1958. He asked his secretary to make twenty copies and send them out. A few days later he won a lottery of two million dollars. Carlos Daditt, an office employee, received the message and forgot that it had to leave his hands in 96 hours. He lost his job. Later, after finding that message again, He mailed twentycopies. A few days later he got a better job. Dalan Fairchild received the message and, not believing - Threw the message away. Nine days later he died. In 1987, The message received by a young woman in California was very faded and barely readable. She promised herself that she would retype the message and send it on, But she set it aside to do it later. She was plagued with various problems, including expensive car repairs. The letter did not leave her hands within 96 hours. She finally typed the letter as promised and got a new car. Good Luck but please remember: 20 copies of this message must leave your hands in 96 hours... You must not sign on this message. From haible Mon Mar 21 10:24:27 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02568; Mon, 21 Mar 94 10:24:27 +0100 Date: Mon, 21 Mar 94 10:24:27 +0100 From: haible (Bruno Haible) Message-Id: <9403210924.AA02568@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: Unpleasant things Anyone who abuses clisp-list will immediately be removed from the list. We are proud that Lisp has garbage collection, but this does not mean that we want to *attract* garbage. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From stein@uni-paderborn.de Mon Mar 21 12:01:29 1994 Return-Path: Received: from uni-paderborn.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03019; Mon, 21 Mar 94 12:01:29 +0100 Received: from borkum.uni-paderborn.de by uni-paderborn.de with SMTP id AA27113 (5.65c/IDA-1.5 for ); Mon, 21 Mar 1994 11:49:52 +0100 From: Benno Stein Received: (stein@localhost) by borkum.uni-paderborn.de (8.6.7/8.6.6) id LAA25670 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Mon, 21 Mar 1994 11:49:50 +0100 Date: Mon, 21 Mar 1994 11:49:50 +0100 Message-Id: <199403211049.LAA25670@borkum.uni-paderborn.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp on atari TT hello clisp netters, I'm looking for atari-TT clisp-binaries which are 32bit clean. The binaries I found in clisp/binaries/atari/ rely on the 24 + 8bit-never-used concept. Did anyone compile the sources to 32bit clean code? Thanks for any help, Benno From haible Wed Mar 23 15:43:19 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05215; Wed, 23 Mar 94 15:43:19 +0100 Date: Wed, 23 Mar 94 15:43:19 +0100 From: haible (Bruno Haible) Message-Id: <9403231443.AA05215@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: Re: clisp on atari TT [Forwarded from Scott J. Kolodzieski . The binaries are now also on ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/binaries/atari/TT-MiNT.] Hello all, For those interested there is a 32 bit clean clisp for the AtariTT at menger.eecs.stevens-tech.edu in /pub/scott/Atari/C-Lisp, there are directions there for installation. It only works under MiNT, the BSD'ish multitasking system for the Atari. The binaries are a bit dated, (end of 93') but do work well, I have newer binaries, but am so pressed for time at work it may take a while before they appear at the above address. I will post another message when they are available. Enjoy, Scott Kolodzieski From dxs@evolving.com Fri Mar 25 20:22:04 1994 Return-Path: Received: from csn.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08726; Fri, 25 Mar 94 20:22:04 +0100 Received: by csn.org with UUCP id AA04089 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Fri, 25 Mar 1994 12:09:27 -0700 Received: from shakey by kafka (AIX 3.2/UCB 5.64/4.03) id AA82048; Fri, 25 Mar 1994 11:51:34 -0700 Received: by shakey (AIX 3.2/UCB 5.64/4.03) id AA15994; Fri, 25 Mar 1994 11:52:21 -0700 Date: Fri, 25 Mar 1994 11:52:21 -0700 From: dxs@evolving.com (Dan Stanger) Message-Id: <9403251852.AA15994@shakey> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: questions regarding pathnames can someone give me a example of the use of *default-pathname-defaults*? i am on a unix platform and would like to have a directory fas in the directory that i am working in to contain compiled files. when i load a file i would like to have that directory searched first. thanks, dxs@evolving.com From haible Sun Mar 27 23:07:20 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09552; Sun, 27 Mar 94 23:07:20 +0200 Date: Sun, 27 Mar 94 23:07:20 +0200 From: haible (Bruno Haible) Message-Id: <9403272107.AA09552@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: questions regarding pathnames Dan Stanger asks: > can someone give me a example of the use of *default-pathname-defaults*? *DEFAULT-PATHNAME-DEFAULTS* affects most pathname operations, including PARSE-NAMESTRING. It is similar to CLISP's (DEFAULT-DIRECTORY) function. After (setq *default-pathname-defaults* '#"/tmp/"), a call to (open (merge-pathnames "foo")) actually opens #"/tmp/foo". > i am on a unix platform and would like to have a directory fas in the > directory that i am working in to contain compiled files. when i load a > file i would like to have that directory searched first. Try putting #"fas/" at the head of your *LOAD-PATHS* list. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From d87jakhe@und.ida.liu.se Mon Mar 28 14:09:07 1994 Return-Path: Received: from ida.liu.se (curofix.ida.liu.se) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10468; Mon, 28 Mar 94 14:09:07 +0200 Received: from und.ida.liu.se (astmatix.ida.liu.se) by ida.liu.se (5.65b/ida.minimaster-V1.0b6d5) id AA16907; Mon, 28 Mar 94 13:53:21 +0200 Received: from kolix by und.ida.liu.se (5.65b/ida.minimaster-V1.0b6d2) id AA03417; Mon, 28 Mar 94 13:53:19 +0200 From: Jakob Heinemann Received: from kol22 by kolix (5.65b/ida.slave-V1.0b3) id AA09116; Mon, 28 Mar 94 13:53:17 +0200 Received: by kol22 (5.65b/ida.slave-V1.0b3) id AA01303; Mon, 28 Mar 94 13:53:15 +0200 Date: Mon, 28 Mar 94 13:53:15 +0200 Message-Id: <9403281153.AA01303@kol22> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: DOS CLisp Hello Clisp users! I have a slight problem installing CLisp on my PC. When I have modified and compiled my config.lsp file it can't be properly loaded. What I did was this: c:\bin\clisp> lisp -M lispinit.mem clisp> (compile-file 'config.lsp) clisp> (load 'config) And the result was ;; Loading file C:\BIN\CLISP\CONFIG.FAS ... *** - MAKE-PATHNAME: illegal :DIRECTORY argument (:ABSOLUTE ("BIN" . "") ("CLISP" . #) :WILD) Break> My config.lsp contains (defparameter *load-paths* '(#"C:" #"C:\\bin\\CLISP\\...\\" ) ) and the compiled sequence looks like this #Y(#:TOP-LEVEL-FORM-10 #16Y(00 00 00 00 00 01 D8 30 5B D9 DA 30 53 C4 19 01) (SPECIAL *LOAD-PATHS*) *LOAD-PATHS* (#S(PATHNAME :HOST NIL :DEVICE "C" :DIRECTORY (:RELATIVE) :NAME NIL :TYPE NIL :VERSION NIL ) #S(PATHNAME :HOST NIL :DEVICE "C" :DIRECTORY (:ABSOLUTE ("BIN" . #1="") ("CLISP" . #1#) :WILD) :NAME NIL :TYPE NIL :VERSION NIL )) ) It's not to difficult to get the things running, but it is irritating that I have to manually manipulate the compiled file. The fix is to change the line ("BIN" . #1="") ("CLISP" . #1#) to ("BIN" . "") ("CLISP" . "") Where is the real error? In the loader or the compiler? Please let me know. Since I haven't run clisp a long time I also wonder if there are some nice file handling functions a'la interlisp comsvariables available. Is there a CLisp-package for Interlisp? Does anybody now where I can get a proper Emacs-19 for DOS? I read the messages about the XPP-prettyprinter and the answer about the CLisp pprint-function. It was said that XPP was the described package in Steele 2nd ed and that pprint will do the same job. Whats the difference between those packages and where can I get the doc of CLisp pprint? Please let me know the answers to these questions. Thankfully /Jakob d87jakhe@und.ida.liu.se .. From pink@bagira.fsz.bme.hu Tue Mar 29 11:05:50 1994 Return-Path: Received: from bagira.fsz.bme.hu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14617; Tue, 29 Mar 94 11:05:50 +0200 Received: by bagira.fsz.bme.hu id AA00738 (5.67a8/IDA-1.5 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Tue, 29 Mar 1994 10:53:11 +0200 Date: Tue, 29 Mar 1994 10:53:11 +0200 From: "Szabolcs Szigeti (PinkPanther)" Message-Id: <199403290853.AA00738@bagira.fsz.bme.hu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp on NetBSD ? Hi, I am trying to compile clisp on NetBSD-current. Has anyone succeeded in doing this? I know that it is available in binary for 386bsd, and NetBSD should be able to run this, but since NetBSD is much impoved over 386bsd (shared memory support, etc) i'd like to get clisp work on it. Any help appreciated. szabolcs szigeti (pink@fsz.bme.hu) From haible Tue Mar 29 13:55:47 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14755; Tue, 29 Mar 94 13:55:47 +0200 Date: Tue, 29 Mar 94 13:55:47 +0200 From: haible (Bruno Haible) Message-Id: <9403291155.AA14755@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp on NetBSD ? > I am trying to compile clisp on NetBSD-current. Has anyone succeeded in doing > this? Give it a try. If you have problems, send a log file of the attempted installation to Marcus Daniels (CLISP maintainer). Bruno Haible From bslawson@phobos.astro.uwo.ca Wed Mar 30 08:58:32 1994 Return-Path: Received: from nz11 by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AB15349; Wed, 30 Mar 94 08:58:32 +0200 Received: from phobos.astro.uwo.ca by nz11.rz.uni-karlsruhe.de with SMTP (PP) id <15481-0@nz11.rz.uni-karlsruhe.de>; Tue, 29 Mar 1994 21:39:26 +0200 Message-Id: <9403291934.AA06761@phobos.astro.uwo.ca> Date: Tue, 29 Mar 94 14:34:18 EST From: Bob Slawson To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <199403290853.AA00738@bagira.fsz.bme.hu> (pink@fsz.bme.hu) Subject: Re: clisp on NetBSD ? Reply-To: bslawson@phobos.astro.uwo.ca > Date: Tue, 29 Mar 94 11:08:41 +0200 > From: "Szabolcs Szigeti (PinkPanther)" > > I am trying to compile clisp on NetBSD-current. Has anyone succeeded in doing > this? I know that it is available in binary for 386bsd, and NetBSD should > be able to run this, but since NetBSD is much impoved over 386bsd (shared > memory support, etc) i'd like to get clisp work on it. > > Any help appreciated. > I have CLISP running under NetBSD/Amiga. mmap() and friends and the shm support don't seem to be adequate for CLISP. I can only get working images when CLISP is built with the -DNO_MULTIMAP_FILE and -DNO_MULTIMAP_SHM options set (same as for 386BSD from the porting notes). NetBSD is still evolving so maybe someday. BobS From haible Thu Mar 31 14:14:36 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA18445; Thu, 31 Mar 94 14:14:36 +0200 Date: Thu, 31 Mar 94 14:14:36 +0200 From: haible (Bruno Haible) Message-Id: <9403311214.AA18445@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: Registration Forms for LUV '94: Lisp Users and Vendors Conference [Forwarded from Kent M. Pitman . I take no responsibility for the contents. B. Haible] The Association of Lisp Users invites you to attend LUV '94 The Fourth International Lisp Users and Vendors Conference to be held in Berkeley, California on August 15-19, 1994 Please mark your calendar and plan to join us! Whether you're a user or implementor of Common Lisp, Scheme, Dylan, or EMACS Lisp--or just an interested party--this conference is for you. It's a chance to find out what's been going on and to influence what happens next in the Lisp community. You'll hear what users and vendors have been up to, and what they're planning in the future. You'll participate in the interactive dialog between the users and vendors about the needs of the Lisp community in the years ahead. It's a valuable opportunity to do more than just program in Lisp--it's a chance to be a part of the Lisp community, to learn, and to contribute to a strong future. The keynote address will be by Richard Stallman of the Free Software Foundation. Other interesting talks, panels, and paper presentations are being arranged and will be announced later. The conference will be held at the Berkeley Marina Marriott hotel. We are pleased to announce that this years sleeping room rate is $89.00 (single/double). There is complimentary parking at the hotel. Either the Oakland or San Francisco airport may be used; Oakland is suggested for domestic flights. Information about special airfare and ground transportation rates will be forthcoming. Registration pricing remains unchanged from last year: Monday and Tuesday will be half-day tutorials at the rate of $125 per tutorial. The main conference (Wednesday through Friday) will be $400. Very substantial discounts are available for full-time students. A registration form is attached below. For further information, or to volunteer to help out, please contact: Meetings Unlimited, Kent Pitman, Thomas Pole, LUV '94 Committee Conference Organizers Co-Chairman Co-Chairman luv-94@ai.sri.com CompuServe 76470.3334 (617) 374-2516 (703) 902-7100 luv-organizer@ai.sri.com kmp@harlequin.com pole@chesapeake.ads.com ============================================================================== TUTORIAL SCHEDULE 1. Good Lisp Programming Style A survey of styles and techniques that make code less error prone and more maintainable, both at the individual function level and at the complete system level. Instructor: To be determined. Prerequisite: Basic knowledge of programming concepts. 2. CLOS I An introduction to the Common Lisp Object System (CLOS), the object-oriented extension to the proposed ANSI Common Lisp standard. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 3. Efficiency and Optimization in Lisp A survey of topics such as profiling, common algorithmic optimizations, consing, declarations and type checking, garbage collection, using C code, arrays and delivery considerations. Some general guidelines will be portable, others will be specific to the major commercial Common Lisp implementations. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 4. Macros and Compiler Macros for Abstraction and Efficiency Common Lisp provides a number of syntactic mechanisms for making code more maintainable and efficient. Learn when and how to use macros, compiler macros, reader macros, and inlined functions to improve your coding style and productivity. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 5. CLIM I How to use the Common Lisp Interface Manager (CLIM) to build interfaces to appllication programs. Use of application frames presentations, menus and dialogs, commands, command tables, interaction styles, and drawing graphics. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp and CLOS concepts. 6. CLOS II Complex initializations protocols, customized method combinations, and the various ``meta object'' protocols for CLOS, as well as a survey of existing implementational techniques and their consequences. Instructor: To be determined. Prerequisite: CLOS I and/or a good understanding of CLOS and Lisp. 7. Advanced topics in Common Lisp The topics that most beginning courses never get around to: LOOP, FORMAT, conditions and restarts, UNWIND-PROTECT, PRINT-OBJECT and MAKE-LOAD-FORM methods, the pretty printer, and issues relating to implementation and storage representation that influence practical programs. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 8. GNU EMACS Lisp Programming The EMACS extension language, EMACS Lisp, which allows users to not only customize the popular EMACS editor, but also allows the development of active documents applications that interact with the user. Instructor: Richard Stallman Prerequisite: Basic knowledge of programming concepts. 9. Common Lisp and Databases (Relational and Object-Oriented) A survey of concepts, techniques, and tools for working with relational and object-oriented databases from within Common Lisp. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 10. Hybrid development environments: Getting Lisp, C, and other languages to work together. For example, foreign function interfaces, datatype interchange, external character encodings. Instructor: To be determined. Prerequisite: Basic knowledge of Common Lisp concepts. 11. CLIM II Hardcopy, pointer tracking and manipulation, incremental redisplay, table and graph formatting, drawing in color, the drawing environment, and doing transformations. Instructor: To be determined. Prerequisite: CLIM I and/or a good understanding of CLIM, CLOS and Lisp. 12. Comparing and Contrasting Common Lisp, Scheme, and Dylan An overview of these three languages, with emphasis on where they overlap and how they differ, for programmers who need to move back and forth between them. Instructor: To be determined. Prerequisite: Basic knowledge of programming concepts. 13. Advanced Vendor-Specific Tools and Techniques: Helpful hints for people who already use a certain vendor's Lisp regularly and want to improve their use of that vendor's tools and language extensions. Specify Vendor: ____________________ Instructor: To be determined. Prerequisite: User of specified Common Lisp from specified vendor. ****************************** NOTES ****************************** In items 1-13 above, a prerequisite is specified in order to guide potential attendees to courses at their level of expertise. In NO case is the prerequisite enforced. It is just a guideline to let you know at what level the instructor will be speaking in order to help you get the best value for your money. Tutorial are SUBJECT TO SCHEDULE CHANGE. Tutorials are SUBJECT TO CANCELLATION if there is insufficient enrollment. -----8<----- Cut here -----8<----- Cut here -----8<----- Cut here ----- ***** LUV '94 REGISTRATION FORM ***** (version 3, 30-Mar-94) Confidential? Name __________________________________________________ [ ] Company __________________________________________________ [ ] [ ] Home Address [ ] Work Address __________________________________________________ [ ] City __________________________________________________ [ ] State __________________________________________________ [ ] Zip/Postal Code ____________________ Country _____________________ [ ] [ ] Home Phone [ ] Work Phone __________________________________________________ [ ] (please include country, area, or city codes) E-Mail __________________________________________________ [ ] PRIVACY DISCLAIMER: If you take no special action, the information provided might be published as some form of public record of the conference attendees. If you check the "Confidential?" box in the right column of any line, the information on that line will be excluded from any published record of conference attendees. Registration Status: [ ] Full-time student or full-time academic. (Please bring proof.) [ ] Others, Normal Registration. Must be received BEFORE 8-Jul-94. [ ] Others, Late Registration. - - - - - - - - - - Please send these three pages of registration material plus your check or money order to: Association of Lisp Users attn: LUV 94 Registration P.O. Box 294 Malvern, PA 19355-0294 U.S.A. Registration material sent by e-mail will NOT be accepted. - - - - - - - - - - (LUV'94 REG / PAGE 1 OF 3) TUTORIAL REGISTRATION Monday Morning, 4 hours, 8am-noon (choose one) [ ] 1. Good Lisp Programming Style [ ] 2. CLOS I [ ] 3. Efficiency and Optimization in Common Lisp Monday Afternoon, 4 hours, 1pm-5pm (choose one) [ ] 4. Macros and Compiler Macros for Abstraction and Efficiency [ ] 5. CLIM I [ ] 6. CLOS II Tuesday Morning, 4 hours, 8am-noon (choose one) [ ] 7. Advanced Topics in Common Lisp [ ] 8. GNU EMACS Lisp Programming [ ] 9. Common Lisp and Databases (Relational and Object-Oriented) Tuesday Afternoon, 4 hours, 1pm-5pm (choose one) [ ] 10. Hybrid development environments: Lisp, C, and others [ ] 11. CLIM II [ ] 12. Comparing and Contrasting Common Lisp, Scheme, and Dylan Tuesday EVENING, 3 hours, 8pm-11pm (choose one) [ ] 13. Advanced Vendor-Specific Tools and Techniques Specify vendor: ____________________ - - - - - - - - - - If some tutorial topic is not shown here that you would like to have chosen instead of or in addition to those above, please mention it (and any suggested instructors) here. Please also say whether you want an introductory or advanced level course: If the above schedule is keeping you from enrolling in the tutorials you most want to attend, please explain the nature of the conflict here: Please specify any substitutions you would be willing to make if your first choice tutorials do not receive enough interest: Tutorial times are subject to change, and tutorials themselves could be cancelled if there is insufficient enrollment. If a need to make such changes would create a special hardship for you, please specify the nature of your need/concern: - - - - - - - - - - (LUV'94 REG / PAGE 2 OF 3) CONFERENCE FEES TUTORIALS (Mon-Tue): $50 (per session) for full-time students or full-time academics. $125 (per session) for others--normal registration (BEFORE 8-Jul-94). $175 (per session) for others--late registration. ( price = $ _____ ) x ( number of sessions = _____ ) = $ __________ CONFERENCE (Wed-Fri): Includes exhibits, keynote address by Richard Stallman of the Free Software Foundation, technical paper presentations, and vendor presentations. $100 for full-time students or full-time academics. $400 for others--normal registration (BEFORE 8-Jul-94). $500 for others--late registration. This price is for all three days. One-day fees are not available. $ __________ =============== TOTAL ENCLOSED . . . . . . . . . . . . . . . . . . . . . . . . $ __________ Please pay this part with check or money order made payable (in US funds only) to "Association of Lisp Users". - - - - - - - - - - HOTEL RESERVATIONS A limited number of rooms have been blocked at a special rate of $89.00 single/double per night + 12% tax. Room Preference (check one): [ ] single [ ] double If double, specify roommate: _________________________ Arrival Day and Date: _______________________________ Departure Day and Date: _______________________________ Credit Card Information (to guarantee late arrival only): Card Type: _______________ Expiration Date: _____ / _____ Account Number: ___________________________________________ Signature: ________________________________________________ >>> Warning: NEVER send credit card information by e-mail <<< - - - - - - - - - - (LUV'94 REG / PAGE 3 OF 3) From haible Wed Apr 6 18:48:38 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23527; Wed, 6 Apr 94 18:48:38 +0200 Date: Wed, 6 Apr 94 18:48:38 +0200 From: haible (Bruno Haible) Message-Id: <9404061648.AA23527@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: CALL FOR PAPERS: 1994 Lisp Users and Vendors Conference (LUV '94) [Forwarded from Kent Pitman .] Please send the following announcement to clisp-list@ma2s2.mathematik.uni-karlsruhe.de ============================================================================== CALL FOR PAPERS FOURTH INTERNATIONAL LISP USERS AND VENDORS CONFERENCE (LUV'94) AUGUST 15-19, 1994 BERKELEY MARINA MARRIOTT HOTEL BERKELEY, CALIFORNIA. Attention authors and potential authors of papers on Lisp! As is now traditional, the schedule for this year's Lisp Users and Vendors Conference (LUV '94) provides for technical papers about Lisp. Unlike the more theory-oriented ACM Lisp & Functional Programming Conference, what we're looking for are concrete, practical papers that talk about issues of importance to those who build their commercial business in today's marketplace using Lisp-based products. This is a chance to share your success stories, discuss your techniques, or even document technical and social obstacles you're facing that you haven't yet managed to overcome. The conference together experts who are focused on making Lisp succeed in the marketplace, and there is no better forum for you to engage in a public dialog about the issues facing Lisp today. - - - - - - - - - - SCOPE AND CONTENT. Material in papers must clearly demonstrate a practical value from the use of the Lisp language or Lisp technology; as such, papers need not be especially innovative or original. Preference will be given to previously undisseminated reports or experiences. Topics in the area of programming languages and environments are welcome. Untested or purely theoretical ideas are less suitable. The full range of Lisp dialects are appropriate to this conference, including (but not limited to) Common Lisp, ISLISP, Eulisp, DKLISP, JKLISP, Emacs Lisp, XLISP, AutoLisp, Interleaf Lisp, Scheme, and Dylan. SUBMISSIONS. Authors should submit SEVEN (7) copies of their papers to the LUV '94 at the following address: Bradford Miller, LUV '94 Paper Chair Computer Science Dept. University of Rochester Rochester, NY 14627-0226 The length of the written papers should not exceed TEN (10) pages (numbered, font size 10pt or larger). Submissions should include a return postal address, a telephone number, and (if available) an electronic mail address. DEADLINES. Please mark your calendar with the following dates: 31 May 94 Deadline for receipt of papers (or extended abstracts). 27 Jun 94 Last day for notification of acceptance or rejection. 8 Jul 94 Deadline for "normal" registration. (After this, rates go up...) 22 Jul 94 Deadline for receipt of final copy of accepted papers. COPYRIGHT. Authors of accepted paper will be required to sign a release for publication in the conference proceedings. Authors may retain the copyright themselves if they wish by installing their own copyright notice in the paper. Previously copyrighted material may still be published depending on the permission to publish; in this case, the previous copyright and notice of permission should appear in the paper. PRESENTATION OF ACCEPTED PAPERS. Accepted papers will appear in the written proceedings, which will be distributed at the conference and might or might not also be distributed in some other fashion after the conference. The authors of certain selected papers will be invited to make a 20-minute verbal presentation at the technical talks sessions during the conference. (Time constraints might prevent the verbal presentation of some accepted papers. Some accepted papers might be presented during a poster paper session.) STUDENT PAPERS. There will be a separate track for Student papers. Submission and acceptance dates, as well as acceptable themes, are the same as for other authors. Accepted papers will appear in the written proceedings (please see above instructions regarding copyright and permission to publish requirements). ADDITIONAL INFORMATION. For further information about paper submission or about the conference itself (including requests conference registration information), please contact: Bradford Miller, LUV '94 Committee LUV '94 paper chair luv-94@ai.sri.com miller@cs.rochester.edu Meetings Unlimited, Kent Pitman, Thomas Pole, Conference Organizers Co-Chairman Co-Chairman luv-organizer@ai.sri.com kmp@harlequin.com pole@chesapeake.ads.com CompuServe 76470.3334 (617) 374-2516 (703) 902-7100 From blake@netcom.com Thu Apr 14 06:31:49 1994 Return-Path: Received: from netcom10.netcom.com (netcom11.netcom.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07668; Thu, 14 Apr 94 06:31:49 +0200 Received: from localhost by netcom10.netcom.com (8.6.4/SMI-4.1/Netcom) id VAA10476; Wed, 13 Apr 1994 21:31:48 -0700 From: blake@netcom.com (Blake McBride) Message-Id: <199404140431.VAA10476@netcom10.netcom.com> Subject: CLISP using WATCOM enhancements To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 13 Apr 1994 21:31:47 -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: 36811 I have compiled the latest CLISP (1994-01-25) with the WATCOM 9.5 compiler and in the process fixed a couple of problems and thought others may be interested. The following enumerates the problems fixed: 1. The doswatcom/makefile had control characters substituted where the backslash was used and was a little out of date. It was updated and corrected. 2. Compiler options were changed to increase the resultant executable speed. Mainly structure packing was turned off and inlining was turned on. 3. The previous port to WATCOM wouldn't run with virtual memory or in a DOS box under Windows 3.1. This was because under either of those conditions the dos extender would set the most significant bit of all malloc'ed space. The problem was fixed by modifing a few macros in lispbibl.d. The diffs to lispbibl.d follow with the complete doswatcom/makefile thereafter. Questions or comments may be sent to blake@netcom.com *** src/lispbibl.org Tue Apr 12 21:37:08 1994 --- src/lispbibl.d Wed Apr 13 20:10:16 1994 *************** *** 2489,2494 **** --- 2489,2495 ---- || (defined(I80Z86) && \ (!defined(UNIX_SYSV_UHC_2) && \ !defined(UNIX_SYSV_UHC_1) && \ + !defined(WATCOM) && \ !defined(UNIX_SYSV_PTX) && \ !defined(UNIX_NEXTSTEP))) \ || defined(SPARC) \ *************** *** 2542,2547 **** --- 2543,2556 ---- #define oint_addr_len 24 # vernnftig nutzbar sind nur die unteren 24 Bit #define oint_addr_mask 0xC0FFFFFFUL # Beachte: unten wird aint = uint24 = uint32 sein. + #elif defined(WATCOM) + # Bits 30..25 = Typcode, Bits 31,24..2 = Adresse, Bits 1..0 Not Used + #define oint_type_shift 25 + #define oint_type_len 6 + #define oint_type_mask 0x7E000000UL + #define oint_addr_shift 0 + #define oint_addr_len 25 + #define oint_addr_mask 0x81FFFFFFUL #elif defined(UNIX_SYSV_UHC_1) # Bits 31..28,26..24 = Typcode, Bits 23..0 = Adresse #define oint_type_shift 24 *************** *** 3321,3326 **** --- 3330,3338 ---- #if defined(HPPA) && defined(UNIX_HPUX) # sitzen nicht im oint_type-Teil, sondern im oint_addr-Teil. #define oint_symbolflags_shift oint_addr_shift + #endif + #if defined(WATCOM) + #define NO_symbolflags # active_bit, dynam_bit, svar_bit haben im Symbol keinen Platz #endif #if defined(UNIX_SYSV_UHC_2) # sitzen im oberen oint_addr-Teil. The following is the new doswatcom/makefile # Makefile for the CLISP binaries # DO NOT EDIT! GENERATED AUTOMATICALLY! # -------------- Start of configurable section -------------------- # Directories used by "make install": prefix = exec_prefix = $(prefix) bindir = $(exec_prefix)\bin mandir = $(exec_prefix)\man libdir = $(exec_prefix)\lib lisplibdir = $(libdir)\lisp MAKE = make # Programs used by "make": CC = wcl386 CFLAGS = -3r -oxet -j -zq -w0 -zp4 # -d2 -w4 CPP = wcl386 -p -zq LIBS = DISASM = wdisasm -au -s RM = del CP = copy LN = copy MV = ren CAT = type RANLIB = ranlib # Programs used by "make install": INSTALL = copy INSTALL_PROGRAM = $(INSTALL) INSTALL_DATA = $(INSTALL) # Programs used by "make distrib": # formatter for manual page ROFF_MAN = nroff -man # try "groff -Tascii -mandoc" or "nroff -man" ROFF_DVI = # try "groff -Tdvi -mandoc" # -------------- End of configurable section -------------------- COMMENT5 = comment5 ANSIDECL = ansidecl DEEMA = deema TXT2C = txt2c DFILES = \ spvw.d \ spvwtabf.d \ spvwtabs.d \ spvwtabo.d \ eval.d \ control.d \ pathname.d \ stream.d \ io.d \ array.d \ hashtabl.d \ list.d \ package.d \ record.d \ sequence.d \ charstrg.d \ debug.d \ error.d \ misc.d \ predtype.d \ symbol.d \ lisparit.d \ stdwin.d \ graph.d \ lispbibl.d \ fsubr.d \ subr.d \ pseudofun.d \ constsym.d \ constobj.d \ msdos.d \ constpack.d \ avl.d \ sort.d \ aridecl.d \ arilev0.d \ arilev1.d \ intelem.d \ intlog.d \ intplus.d \ intcomp.d \ intbyte.d \ intmal.d \ intdiv.d \ intgcd.d \ int2adic.d \ intsqrt.d \ intprint.d \ intread.d \ rational.d \ sfloat.d \ ffloat.d \ dfloat.d \ lfloat.d \ flo_konv.d \ flo_rest.d \ realelem.d \ realrand.d \ realtran.d \ compelem.d \ comptran.d \ arilev1c.d \ arilev1e.d \ arilev1i.d \ noreadline.d \ main.d CFILES = \ spvw.c \ spvwtabf.c \ spvwtabs.c \ spvwtabo.c \ eval.c \ control.c \ pathname.c \ stream.c \ io.c \ array.c \ hashtabl.c \ list.c \ package.c \ record.c \ sequence.c \ charstrg.c \ debug.c \ error.c \ misc.c \ predtype.c \ symbol.c \ lisparit.c \ stdwin.c \ graph.c \ lispbibl.c \ fsubr.c \ subr.c \ pseudofun.c \ constsym.c \ constobj.c \ msdos.c \ constpack.c \ avl.c \ sort.c \ aridecl.c \ arilev0.c \ arilev1.c \ intelem.c \ intlog.c \ intplus.c \ intcomp.c \ intbyte.c \ intmal.c \ intdiv.c \ intgcd.c \ int2adic.c \ intsqrt.c \ intprint.c \ intread.c \ rational.c \ sfloat.c \ ffloat.c \ dfloat.c \ lfloat.c \ flo_konv.c \ flo_rest.c \ realelem.c \ realrand.c \ realtran.c \ compelem.c \ comptran.c \ arilev1c.c \ arilev1e.c \ arilev1i.c \ noreadline.c \ main.c OBJECTS = \ spvw.obj \ spvwtabf.obj \ spvwtabs.obj \ spvwtabo.obj \ eval.obj \ control.obj \ pathname.obj \ stream.obj \ io.obj \ array.obj \ hashtabl.obj \ list.obj \ package.obj \ record.obj \ sequence.obj \ charstrg.obj \ debug.obj \ error.obj \ misc.obj \ predtype.obj \ symbol.obj \ lisparit.obj \ stdwin.obj \ graph.obj LSPFILES = \ init.lsp \ defseq.lsp \ backquot.lsp \ defmacro.lsp \ macros1.lsp \ macros2.lsp \ defs1.lsp \ places.lsp \ floatpri.lsp \ type.lsp \ defstruc.lsp \ format.lsp \ user1.lsp \ user2.lsp \ trace.lsp \ macros3.lsp \ config.lsp \ compiler.lsp \ defs2.lsp \ clos.lsp \ conditio.lsp \ defs3.lsp \ screen.lsp \ stdwin2.lsp \ rexx.lsp \ editor.lsp FASFILES = \ init.fas \ defseq.fas \ backquot.fas \ defmacro.fas \ macros1.fas \ macros2.fas \ defs1.fas \ places.fas \ floatpri.fas \ type.fas \ defstruc.fas \ format.fas \ user1.fas \ user2.fas \ trace.fas \ macros3.fas \ config.fas \ compiler.fas \ defs2.fas \ clos.fas \ conditio.fas \ defs3.fas \ screen.fas \ stdwin2.fas \ rexx.fas \ editor.fas TXTFILES = \ LISP-tutorial.txt \ CLOS-guide.txt TESTLSPFILES = \ stage\init.lsp \ stage\defseq.lsp \ stage\backquot.lsp \ stage\defmacro.lsp \ stage\macros1.lsp \ stage\macros2.lsp \ stage\defs1.lsp \ stage\places.lsp \ stage\floatpri.lsp \ stage\type.lsp \ stage\defstruc.lsp \ stage\format.lsp \ stage\user1.lsp \ stage\user2.lsp \ stage\trace.lsp \ stage\macros3.lsp \ stage\config.lsp \ stage\compiler.lsp \ stage\defs2.lsp \ stage\clos.lsp \ stage\conditio.lsp \ stage\defs3.lsp \ stage\screen.lsp \ stage\stdwin2.lsp \ stage\rexx.lsp \ stage\editor.lsp TESTFASFILES = \ stage\init.fas \ stage\defseq.fas \ stage\backquot.fas \ stage\defmacro.fas \ stage\macros1.fas \ stage\macros2.fas \ stage\defs1.fas \ stage\places.fas \ stage\floatpri.fas \ stage\type.fas \ stage\defstruc.fas \ stage\format.fas \ stage\user1.fas \ stage\user2.fas \ stage\trace.fas \ stage\macros3.fas \ stage\config.fas \ stage\compiler.fas \ stage\defs2.fas \ stage\clos.fas \ stage\conditio.fas \ stage\defs3.fas \ stage\screen.fas \ stage\stdwin2.fas \ stage\rexx.fas \ stage\editor.fas all : init allc allo lisp.exe interpre.mem halfcompiled-interpre.mem compiled.mem manual init : comment5.exe ansidecl.exe deema.exe txt2c.exe $(DFILES) errors.c comment5.exe : ..\utils\comment5.c $(CC) $(CFLAGS) ..\utils\comment5.c -fo=comment5.exe ansidecl.exe : ..\utils\ansidecl.d comment5.exe $(LN) ..\utils\ansidecl.d ansidecl.d $(COMMENT5) ansidecl.d ansidecl.c $(RM) ansidecl.d $(CC) $(CFLAGS) ansidecl.c -fo=ansidecl.exe $(RM) ansidecl.c deema.exe : ..\utils\deema.c $(CC) $(CFLAGS) ..\utils\deema.c -fo=deema.exe txt2c.exe : ..\utils\txt2c.c $(CC) $(CFLAGS) ..\utils\txt2c.c -fo=txt2c.exe generror.exe : ..\utils\generror.c $(LN) ..\utils\generrors.c generrors.c $(CC) $(CFLAGS) generrors.c -fo=generrors.exe $(RM) generrors.c errors.c : generror.exe generror > errors.c allc : init $(CFILES) spvw.c : spvw.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) spvw.d | $(ANSIDECL) | $(DEEMA) > spvw.c spvwtabf.c : spvwtabf.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) spvwtabf.d | $(ANSIDECL) | $(DEEMA) > spvwtabf.c spvwtabs.c : spvwtabs.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) spvwtabs.d | $(ANSIDECL) | $(DEEMA) > spvwtabs.c spvwtabo.c : spvwtabo.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) spvwtabo.d | $(ANSIDECL) | $(DEEMA) > spvwtabo.c eval.c : eval.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) eval.d | $(ANSIDECL) | $(DEEMA) > eval.c control.c : control.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) control.d | $(ANSIDECL) | $(DEEMA) > control.c pathname.c : pathname.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) pathname.d | $(ANSIDECL) | $(DEEMA) > pathname.c stream.c : stream.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) stream.d | $(ANSIDECL) | $(DEEMA) > stream.c io.c : io.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) io.d | $(ANSIDECL) | $(DEEMA) > io.c array.c : array.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) array.d | $(ANSIDECL) | $(DEEMA) > array.c hashtabl.c : hashtabl.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) hashtabl.d | $(ANSIDECL) | $(DEEMA) > hashtabl.c list.c : list.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) list.d | $(ANSIDECL) | $(DEEMA) > list.c package.c : package.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) package.d | $(ANSIDECL) | $(DEEMA) > package.c record.c : record.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) record.d | $(ANSIDECL) | $(DEEMA) > record.c sequence.c : sequence.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) sequence.d | $(ANSIDECL) | $(DEEMA) > sequence.c charstrg.c : charstrg.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) charstrg.d | $(ANSIDECL) | $(DEEMA) > charstrg.c debug.c : debug.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) debug.d | $(ANSIDECL) | $(DEEMA) > debug.c error.c : error.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) error.d | $(ANSIDECL) | $(DEEMA) > error.c misc.c : misc.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) misc.d | $(ANSIDECL) | $(DEEMA) > misc.c predtype.c : predtype.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) predtype.d | $(ANSIDECL) | $(DEEMA) > predtype.c symbol.c : symbol.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) symbol.d | $(ANSIDECL) | $(DEEMA) > symbol.c lisparit.c : lisparit.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) lisparit.d | $(ANSIDECL) | $(DEEMA) > lisparit.c stdwin.c : stdwin.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) stdwin.d | $(ANSIDECL) | $(DEEMA) > stdwin.c graph.c : graph.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) graph.d | $(ANSIDECL) | $(DEEMA) > graph.c lispbibl.c : lispbibl.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) lispbibl.d | $(ANSIDECL) | $(DEEMA) > lispbibl.c fsubr.c : fsubr.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) fsubr.d | $(ANSIDECL) | $(DEEMA) > fsubr.c subr.c : subr.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) subr.d | $(ANSIDECL) | $(DEEMA) > subr.c pseudofun.c : pseudofun.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) pseudofun.d | $(ANSIDECL) | $(DEEMA) > pseudofun.c constsym.c : constsym.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) constsym.d | $(ANSIDECL) | $(DEEMA) > constsym.c constobj.c : constobj.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) constobj.d | $(ANSIDECL) | $(DEEMA) > constobj.c msdos.c : msdos.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) msdos.d | $(ANSIDECL) | $(DEEMA) > msdos.c constpack.c : constpack.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) constpack.d | $(ANSIDECL) | $(DEEMA) > constpack.c avl.c : avl.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) avl.d | $(ANSIDECL) | $(DEEMA) > avl.c sort.c : sort.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) sort.d | $(ANSIDECL) | $(DEEMA) > sort.c aridecl.c : aridecl.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) aridecl.d | $(ANSIDECL) | $(DEEMA) > aridecl.c arilev0.c : arilev0.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) arilev0.d | $(ANSIDECL) | $(DEEMA) > arilev0.c arilev1.c : arilev1.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) arilev1.d | $(ANSIDECL) | $(DEEMA) > arilev1.c intelem.c : intelem.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intelem.d | $(ANSIDECL) | $(DEEMA) > intelem.c intlog.c : intlog.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intlog.d | $(ANSIDECL) | $(DEEMA) > intlog.c intplus.c : intplus.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intplus.d | $(ANSIDECL) | $(DEEMA) > intplus.c intcomp.c : intcomp.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intcomp.d | $(ANSIDECL) | $(DEEMA) > intcomp.c intbyte.c : intbyte.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intbyte.d | $(ANSIDECL) | $(DEEMA) > intbyte.c intmal.c : intmal.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intmal.d | $(ANSIDECL) | $(DEEMA) > intmal.c intdiv.c : intdiv.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intdiv.d | $(ANSIDECL) | $(DEEMA) > intdiv.c intgcd.c : intgcd.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intgcd.d | $(ANSIDECL) | $(DEEMA) > intgcd.c int2adic.c : int2adic.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) int2adic.d | $(ANSIDECL) | $(DEEMA) > int2adic.c intsqrt.c : intsqrt.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intsqrt.d | $(ANSIDECL) | $(DEEMA) > intsqrt.c intprint.c : intprint.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intprint.d | $(ANSIDECL) | $(DEEMA) > intprint.c intread.c : intread.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) intread.d | $(ANSIDECL) | $(DEEMA) > intread.c rational.c : rational.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) rational.d | $(ANSIDECL) | $(DEEMA) > rational.c sfloat.c : sfloat.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) sfloat.d | $(ANSIDECL) | $(DEEMA) > sfloat.c ffloat.c : ffloat.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) ffloat.d | $(ANSIDECL) | $(DEEMA) > ffloat.c dfloat.c : dfloat.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) dfloat.d | $(ANSIDECL) | $(DEEMA) > dfloat.c lfloat.c : lfloat.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) lfloat.d | $(ANSIDECL) | $(DEEMA) > lfloat.c flo_konv.c : flo_konv.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) flo_konv.d | $(ANSIDECL) | $(DEEMA) > flo_konv.c flo_rest.c : flo_rest.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) flo_rest.d | $(ANSIDECL) | $(DEEMA) > flo_rest.c realelem.c : realelem.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) realelem.d | $(ANSIDECL) | $(DEEMA) > realelem.c realrand.c : realrand.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) realrand.d | $(ANSIDECL) | $(DEEMA) > realrand.c realtran.c : realtran.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) realtran.d | $(ANSIDECL) | $(DEEMA) > realtran.c compelem.c : compelem.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) compelem.d | $(ANSIDECL) | $(DEEMA) > compelem.c comptran.c : comptran.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) comptran.d | $(ANSIDECL) | $(DEEMA) > comptran.c arilev1c.c : arilev1c.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) arilev1c.d | $(ANSIDECL) | $(DEEMA) > arilev1c.c arilev1e.c : arilev1e.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) arilev1e.d | $(ANSIDECL) | $(DEEMA) > arilev1e.c arilev1i.c : arilev1i.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) arilev1i.d | $(ANSIDECL) | $(DEEMA) > arilev1i.c noreadline.c : noreadline.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) noreadline.d | $(ANSIDECL) | $(DEEMA) > noreadline.c main.c : main.d comment5.exe ansidecl.exe deema.exe $(COMMENT5) main.d | $(ANSIDECL) | $(DEEMA) > main.c allo : allc spvw.obj spvwtabf.obj spvwtabs.obj spvwtabo.obj eval.obj control.obj pathname.obj stream.obj io.obj array.obj hashtabl.obj list.obj package.obj record.obj sequence.obj charstrg.obj debug.obj error.obj misc.obj predtype.obj symbol.obj lisparit.obj stdwin.obj graph.obj alls : allc spvw.s spvwtabf.s spvwtabs.s spvwtabo.s eval.s control.s pathname.s stream.s io.s array.s hashtabl.s list.s package.s record.s sequence.s charstrg.s debug.s error.s misc.s predtype.s symbol.s lisparit.s stdwin.s graph.s spvw.i : spvw.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c constpack.c avl.c sort.c $(CPP) $(CFLAGS) spvw.c > spvw.i spvw.s : spvw.obj $(DISASM) spvw.obj -l=spvw.s spvw.obj : spvw.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c constpack.c avl.c sort.c $(CC) $(CFLAGS) -c spvw.c spvwtabf.i : spvwtabf.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) spvwtabf.c > spvwtabf.i spvwtabf.s : spvwtabf.obj $(DISASM) spvwtabf.obj -l=spvwtabf.s spvwtabf.obj : spvwtabf.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c spvwtabf.c spvwtabs.i : spvwtabs.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) spvwtabs.c > spvwtabs.i spvwtabs.s : spvwtabs.obj $(DISASM) spvwtabs.obj -l=spvwtabs.s spvwtabs.obj : spvwtabs.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c spvwtabs.c spvwtabo.i : spvwtabo.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) spvwtabo.c > spvwtabo.i spvwtabo.s : spvwtabo.obj $(DISASM) spvwtabo.obj -l=spvwtabo.s spvwtabo.obj : spvwtabo.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c spvwtabo.c eval.i : eval.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) eval.c > eval.i eval.s : eval.obj $(DISASM) eval.obj -l=eval.s eval.obj : eval.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c eval.c control.i : control.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) control.c > control.i control.s : control.obj $(DISASM) control.obj -l=control.s control.obj : control.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c control.c pathname.i : pathname.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) pathname.c > pathname.i pathname.s : pathname.obj $(DISASM) pathname.obj -l=pathname.s pathname.obj : pathname.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c pathname.c stream.i : stream.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) stream.c > stream.i stream.s : stream.obj $(DISASM) stream.obj -l=stream.s stream.obj : stream.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c stream.c io.i : io.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CPP) $(CFLAGS) io.c > io.i io.s : io.obj $(DISASM) io.obj -l=io.s io.obj : io.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CC) $(CFLAGS) -c io.c array.i : array.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CPP) $(CFLAGS) array.c > array.i array.s : array.obj $(DISASM) array.obj -l=array.s array.obj : array.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CC) $(CFLAGS) -c array.c hashtabl.i : hashtabl.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c aridecl.c $(CPP) $(CFLAGS) hashtabl.c > hashtabl.i hashtabl.s : hashtabl.obj $(DISASM) hashtabl.obj -l=hashtabl.s hashtabl.obj : hashtabl.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c aridecl.c $(CC) $(CFLAGS) -c hashtabl.c list.i : list.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) list.c > list.i list.s : list.obj $(DISASM) list.obj -l=list.s list.obj : list.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c list.c package.i : package.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c constpack.c arilev0.c $(CPP) $(CFLAGS) package.c > package.i package.s : package.obj $(DISASM) package.obj -l=package.s package.obj : package.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c constpack.c arilev0.c $(CC) $(CFLAGS) -c package.c record.i : record.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) record.c > record.i record.s : record.obj $(DISASM) record.obj -l=record.s record.obj : record.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c record.c sequence.i : sequence.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) sequence.c > sequence.i sequence.s : sequence.obj $(DISASM) sequence.obj -l=sequence.s sequence.obj : sequence.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c sequence.c charstrg.i : charstrg.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) charstrg.c > charstrg.i charstrg.s : charstrg.obj $(DISASM) charstrg.obj -l=charstrg.s charstrg.obj : charstrg.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c charstrg.c debug.i : debug.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) debug.c > debug.i debug.s : debug.obj $(DISASM) debug.obj -l=debug.s debug.obj : debug.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c debug.c error.i : error.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c errors.c $(CPP) $(CFLAGS) error.c > error.i error.s : error.obj $(DISASM) error.obj -l=error.s error.obj : error.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c errors.c $(CC) $(CFLAGS) -c error.c misc.i : misc.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CPP) $(CFLAGS) misc.c > misc.i misc.s : misc.obj $(DISASM) misc.obj -l=misc.s misc.obj : misc.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CC) $(CFLAGS) -c misc.c predtype.i : predtype.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) predtype.c > predtype.i predtype.s : predtype.obj $(DISASM) predtype.obj -l=predtype.s predtype.obj : predtype.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c predtype.c symbol.i : symbol.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) symbol.c > symbol.i symbol.s : symbol.obj $(DISASM) symbol.obj -l=symbol.s symbol.obj : symbol.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c symbol.c lisparit.i : lisparit.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c aridecl.c arilev0.c arilev1.c intelem.c intlog.c intplus.c intcomp.c intbyte.c intmal.c intdiv.c intgcd.c int2adic.c intsqrt.c intprint.c intread.c rational.c sfloat.c ffloat.c dfloat.c lfloat.c flo_konv.c flo_rest.c realelem.c realrand.c realtran.c compelem.c comptran.c arilev1c.c arilev1e.c arilev1i.c $(CPP) $(CFLAGS) lisparit.c > lisparit.i lisparit.s : lisparit.obj $(DISASM) lisparit.obj -l=lisparit.s lisparit.obj : lisparit.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c aridecl.c arilev0.c arilev1.c intelem.c intlog.c intplus.c intcomp.c intbyte.c intmal.c intdiv.c intgcd.c int2adic.c intsqrt.c intprint.c intread.c rational.c sfloat.c ffloat.c dfloat.c lfloat.c flo_konv.c flo_rest.c realelem.c realrand.c realtran.c compelem.c comptran.c arilev1c.c arilev1e.c arilev1i.c $(CC) $(CFLAGS) -c lisparit.c stdwin.i : stdwin.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) -i=stdwin\H stdwin.c > stdwin.i stdwin.s : stdwin.obj $(DISASM) stdwin.obj -l=stdwin.s stdwin.obj : stdwin.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -i=stdwin\H -c stdwin.c graph.i : graph.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CPP) $(CFLAGS) graph.c > graph.i graph.s : graph.obj $(DISASM) graph.obj -l=graph.s graph.obj : graph.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c arilev0.c $(CC) $(CFLAGS) -c graph.c noreadline.i : noreadline.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) noreadline.c > noreadline.i noreadline.s : noreadline.obj $(DISASM) noreadline.obj -l=noreadline.s noreadline.obj : noreadline.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c noreadline.c main.i : main.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CPP) $(CFLAGS) main.c > main.i main.s : main.obj $(DISASM) main.obj -l=main.s main.obj : main.c lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c $(CC) $(CFLAGS) -c main.c lisp.exe : $(OBJECTS) $(RM) -qz lisp.exe $(CC) -fe=lisp.exe -fd=wcclink.lnk wlink @wcclink.lnk @wcclink.in $(RM) wcclink.lnk alllsp : $(LSPFILES) config.lsp : cfgdos.lsp $(CP) cfgdos.lsp config.lsp interpre.mem : lisp.exe $(LSPFILES) lisp.exe -m 750KW < interpre.in -$(RM) interpre.mem $(MV) lispinit.mem interpre.mem init.fas : init.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c init.lsp defseq.fas : defseq.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defseq.lsp backquot.fas : backquot.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c backquot.lsp defmacro.fas : defmacro.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defmacro.lsp macros1.fas : macros1.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c macros1.lsp macros2.fas : macros2.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c macros2.lsp defs1.fas : defs1.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defs1.lsp places.fas : places.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c places.lsp floatpri.fas : floatpri.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c floatpri.lsp type.fas : type.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c type.lsp defstruc.fas : defstruc.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defstruc.lsp format.fas : format.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c format.lsp user1.fas : user1.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c user1.lsp user2.fas : user2.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c user2.lsp trace.fas : trace.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c trace.lsp macros3.fas : macros3.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c macros3.lsp config.fas : config.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c config.lsp compiler.fas : compiler.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c compiler.lsp defs2.fas : defs2.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defs2.lsp clos.fas : clos.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c clos.lsp conditio.fas : conditio.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c conditio.lsp defs3.fas : defs3.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c defs3.lsp screen.fas : screen.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c screen.lsp stdwin2.fas : stdwin2.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c stdwin2.lsp rexx.fas : rexx.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c rexx.lsp editor.fas : editor.lsp lisp.exe interpre.mem lisp.exe -m 750KW -M interpre.mem -q -c editor.lsp halfcompiled-interpre.mem : lisp.exe $(LSPFILES) compiler.fas -$(RM) interpre.mem lisp.exe -m 750KW < interpre.in $(MV) lispinit.mem interpre.mem touch compiler.fas touch halfcompiled-interpre.mem compiled.mem : lisp.exe $(FASFILES) lisp.exe < compiled.in -$(RM) compiled.mem $(MV) lispinit.mem compiled.mem # Test: recompile $(LSPFILES) and check if the resulting .mem file has the same length. test : compiled.mem stage $(TESTLSPFILES) $(TESTFASFILES) comp *.fas stage REM The test passed if no differences were found. stage : -mkdir stage stage\init.lsp : init.lsp $(LN) init.lsp stage stage\defseq.lsp : defseq.lsp $(LN) defseq.lsp stage stage\backquot.lsp : backquot.lsp $(LN) backquot.lsp stage stage\defmacro.lsp : defmacro.lsp $(LN) defmacro.lsp stage stage\macros1.lsp : macros1.lsp $(LN) macros1.lsp stage stage\macros2.lsp : macros2.lsp $(LN) macros2.lsp stage stage\defs1.lsp : defs1.lsp $(LN) defs1.lsp stage stage\places.lsp : places.lsp $(LN) places.lsp stage stage\floatpri.lsp : floatpri.lsp $(LN) floatpri.lsp stage stage\type.lsp : type.lsp $(LN) type.lsp stage stage\defstruc.lsp : defstruc.lsp $(LN) defstruc.lsp stage stage\format.lsp : format.lsp $(LN) format.lsp stage stage\user1.lsp : user1.lsp $(LN) user1.lsp stage stage\user2.lsp : user2.lsp $(LN) user2.lsp stage stage\trace.lsp : trace.lsp $(LN) trace.lsp stage stage\macros3.lsp : macros3.lsp $(LN) macros3.lsp stage stage\config.lsp : config.lsp $(LN) config.lsp stage stage\compiler.lsp : compiler.lsp $(LN) compiler.lsp stage stage\defs2.lsp : defs2.lsp $(LN) defs2.lsp stage stage\clos.lsp : clos.lsp $(LN) clos.lsp stage stage\conditio.lsp : conditio.lsp $(LN) conditio.lsp stage stage\defs3.lsp : defs3.lsp $(LN) defs3.lsp stage stage\screen.lsp : screen.lsp $(LN) screen.lsp stage stage\stdwin2.lsp : stdwin2.lsp $(LN) stdwin2.lsp stage stage\rexx.lsp : rexx.lsp $(LN) rexx.lsp stage stage\editor.lsp : editor.lsp $(LN) editor.lsp stage stage\init.fas : stage\init.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/init.lsp stage\defseq.fas : stage\defseq.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defseq.lsp stage\backquot.fas : stage\backquot.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/backquot.lsp stage\defmacro.fas : stage\defmacro.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defmacro.lsp stage\macros1.fas : stage\macros1.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/macros1.lsp stage\macros2.fas : stage\macros2.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/macros2.lsp stage\defs1.fas : stage\defs1.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defs1.lsp stage\places.fas : stage\places.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/places.lsp stage\floatpri.fas : stage\floatpri.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/floatpri.lsp stage\type.fas : stage\type.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/type.lsp stage\defstruc.fas : stage\defstruc.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defstruc.lsp stage\format.fas : stage\format.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/format.lsp stage\user1.fas : stage\user1.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/user1.lsp stage\user2.fas : stage\user2.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/user2.lsp stage\trace.fas : stage\trace.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/trace.lsp stage\macros3.fas : stage\macros3.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/macros3.lsp stage\config.fas : stage\config.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/config.lsp stage\compiler.fas : stage\compiler.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/compiler.lsp stage\defs2.fas : stage\defs2.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defs2.lsp stage\clos.fas : stage\clos.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/clos.lsp stage\conditio.fas : stage\conditio.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/conditio.lsp stage\defs3.fas : stage\defs3.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/defs3.lsp stage\screen.fas : stage\screen.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/screen.lsp stage\stdwin2.fas : stage\stdwin2.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/stdwin2.lsp stage\rexx.fas : stage\rexx.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/rexx.lsp stage\editor.fas : stage\editor.lsp lisp.exe compiled.mem lisp.exe -M compiled.mem -q -c stage/editor.lsp compiled2.mem : lisp.exe $(TESTFASFILES) lisp.exe -x "(cd \"stage/\") (load \"init.fas\") (cd \"..\\\") (sys::%saveinitmem) (exit)" -$(RM) compiled2.mem $(MV) lispinit.mem compiled2.mem manual : ANNOUNCE COPYRIGHT GNU-GPL SUMMARY README NEWS clisp.1 impnotes.txt $(TXTFILES) readline.dvi manualx : manual clisp.man ANNOUNCE : ..\ANNOUNCE -$(LN) ..\ANNOUNCE ANNOUNCE COPYRIGHT : ..\COPYRIGHT -$(LN) ..\COPYRIGHT COPYRIGHT GNU-GPL : ..\GNU-GPL -$(LN) ..\GNU-GPL GNU-GPL SUMMARY : ..\SUMMARY -$(LN) ..\SUMMARY SUMMARY NEWS : ..\NEWS -$(LN) ..\NEWS NEWS README : _README lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c txt2c.exe $(TXT2C) < _README > txt.c $(CC) $(CFLAGS) txt.c -fo=txt.exe txt > README $(RM) txt.c $(RM) txt.exe clisp.1 : _clisp.1 lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c txt2c.exe $(TXT2C) < _clisp.1 > txt.c $(CC) $(CFLAGS) txt.c -fo=txt.exe txt | grep -v -f grep.in > clisp.1 $(RM) txt.c $(RM) txt.exe impnotes.txt : _impnotes.txt lispbibl.c fsubr.c subr.c pseudofun.c constsym.c constobj.c msdos.c txt2c.exe $(TXT2C) < _impnotes.txt > txt.c $(CC) $(CFLAGS) txt.c -fo=txt.exe txt > impnotes.txt $(RM) txt.c $(RM) txt.exe clisp.man : clisp.1 $(ROFF_MAN) clisp.1 > clisp.man clisp.dvi : clisp.1 $(ROFF_DVI) clisp.1 > clisp.dvi LISP-tutorial.txt : ..\doc\LISP-tutorial.txt -$(LN) ..\doc\LISP-tutorial.txt LISP-tutorial.txt CLOS-guide.txt : ..\doc\CLOS-guide.txt -$(LN) ..\doc\CLOS-guide.txt CLOS-guide.txt readline\doc\rluserman.dvi : cd readline\doc ; $(TEXI2DVI) rluserman.texinfo readline.dvi : readline\doc\rluserman.dvi -$(LN) readline\doc\rluserman.dvi readline.dvi install : install-bin install-bin : lisp.exe compiled.mem force -mkdir $(libdir) -mkdir $(lisplibdir) $(INSTALL_PROGRAM) lisp.exe $(lisplibdir)\lisp.exe $(INSTALL_DATA) compiled.mem $(lisplibdir)\lispinit.mem -mkdir $(bindir) echo $(lisplibdir)\lisp.exe -M $(lisplibdir)\lispinit.mem %1 %2 %3 %4 %5 %6 %7 %8 %9 > $(bindir)\clisp.bat # clean0 is harmless: removes only superfluous things: temporary files. clean0 : force -$(RM) core ansidecl.c generrors.c lisparit.tmp txt.c txt.exe # clean1 removes everything that becomes obsolete once lisp.run is recompiled # without changing the bytecode format and the tables in # constobj.d, constpack.d, constsym.d, subr.d, fsubr.d, pseudofun.d. clean1 : clean0 -$(RM) clisp.h *.i *.s *.obj *.a lisp.exe stage/* suite/* -rmdir stage -rmdir suite -$(RM) README clisp.1 impnotes.txt $(TXTFILES) readline.dvi # clean2 removes everything that becomes obsolete once lisp.run is recompiled # without changing the bytecode format. clean2 : clean1 -$(RM) interpre.mem halfcompiled-interpre.mem compiled.mem compiled2.mem # clean3 removes everything that becomes obsolete once lisp.run is recompiled. # It leaves everything generated by "make allc". clean3 : clean2 -$(RM) $(FASFILES) *.lib # clean4 removes everything that becomes obsolete # when switching to a new version of the C compiler. # It leaves everything generated by "make init". clean4 : clean3 -$(RM) $(CFILES) # clean5 even undoes "make init". clean5 : clean4 -$(RM) config.lsp -$(RM) comment5.exe ansidecl.exe ccpaux.exe deelif.exe deerror.exe dedefined.exe traddecl.exe deema.exe mergestrings.exe txt2c.exe -$(RM) generrors.exe errors.c # clean6 lets us go back to "makemake > makefile". clean6 : clean5 -$(RM) makefile # clean7 lets us go back to "target". clean7 : clean6 -$(RM) config.status machine.h unixconf.h makemake -$(RM) readline.tar.Z cd readline ; $(MAKE) clean # clean8 moreover cleans up the SRCDIR. clean8 : clean7 -$(RM) lisparit0.d # The normal "start over" command: clean : clean4 # Make "clear for distribution": distclean : clean7 # Remove everything that can be generated otherwise: realclean : clean8 force: -- Blake McBride (615) 790-8521 voice 3020 Liberty Hills Drive (615) 791-7736 fax Franklin, TN 37064 blake@netcom.com U.S.A. From pcolsen@super.org Mon Apr 25 03:58:03 1994 Return-Path: Received: from super.super.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04150; Mon, 25 Apr 94 03:58:03 +0200 Received: from descartes.super.org by super.super.org (4.1/SMI-4.1) id AA01554; Sun, 24 Apr 94 21:54:58 EDT Date: Sun, 24 Apr 94 21:54:58 EDT From: pcolsen@super.org (Peter C Olsen) Message-Id: <9404250154.AA01554@super.super.org> Received: by descartes.super.org (4.1/SMI-4.1) id AA25869; Sun, 24 Apr 94 21:54:57 EDT To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: How to write fast Numerical Analysis code in CLISP? ------- Start of forwarded message ------- I'm writing to ask for some ideas on how to write "acceptably fast" numerical analytic code in either CLISP or AKCL. I would also be interested in suggestions about other public-domain (or GPL-like) lisp (or scheme) interpreters or compilers. Here is some background. I've been tasked with performing some exploratory time-series/signal-processing analysis on some very large experimental datasets --- from about 10 million samples on up. My first sets are 8-bit signed integers, although this may change later on. In the past, I've done this by plotting segments of data, finding patterns, writing C-programs to find the patterns elsewhere, looking at more segments, finding more patterns, etc. Sometimes I can use tools like Ptolemy (a dsp packages from UCSB), but usually I wind up having to write a suite of special-purpose C programs to do most of the work --- a fact which diverts too much time from "analysis" to "programming." Now I'd like to redress that balance by turning to lisp, at least in the preliminary stages when most of my programs are written to be used once and thrown away. Unfortunately, my first few attempts in CLISP yielded programs which took only minutes to write but HOURS to run --- after I compiled them. I'm happy that I could design and code the programs so quickly, but their run-time is so long that I can't use them. Now for some specific questions: 1. Is AKCL faster than CLISP? How about CMULISP? Scheme->C? I need a PD/GPL-like lisp because I may want to run on several platforms, from PCs to mainframes. 2. I have easy access to both an SGI-IRIS and a Sun SPARC-20. Is one better than the other? 3. My data is collected as a large binary file, one point per byte. I've been reading it directly, one byte at a time with "read-byte", but only because I can't figure out how to do it better. Is there an analog to the C function "fread" to allow block-reads? Alternatively, would it be faster to translate the data to ascii-character representation (thereby expanding it manyfold) and read it that way? I would appreciate any help. I like CLISP, and I want to use it for some serious work, but I won't be able to unless I can make it run much faster than I have been able to do so far. Peter Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 Numrich@RWTH-Aachen.DE Wed Apr 27 11:54:48 1994 Return-Path: Received: from abmx.rz.rwth-aachen.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09388; Wed, 27 Apr 94 11:54:48 +0200 Received: from abmx.rz.rwth-aachen.de by abmx.rz.rwth-aachen.de (PMDF V4.2-14 #4405) id <01HBO10H47FK0038FD@abmx.rz.rwth-aachen.de>; Wed, 27 Apr 1994 10:53:37 +0100 Date: Wed, 27 Apr 1994 10:53:37 +0100 From: Numrich@RWTH-Aachen.DE Subject: pretty printer and format To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: <01HBO10H75J60038FD@abmx.rz.rwth-aachen.de> X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII Content-Transfer-Encoding: 7BIT Hello everybody, there's a difference in the behavior of the pretty printer using format in VAX Lisp and CLisp (see below). If it is implementation-dependent, how to make CLisp doing the same ? (DEFUN print-something () (LET ( (*PRINT-PRETTY* T) (something-to-print (MAKE-ARRAY '(3 20) :INITIAL-ELEMENT 0)) ) (FORMAT T "That's it: ~A" something-to-print) ) ) Using VAX LISP V3.1 this gives what i want: That's it: #2A((0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) (0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) (0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0)) In CLisp it comes with That's it: #2A((0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) (0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) (0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) ) What's wrong with this picture ? By the way, is it possible to use colnum in ~colnumT for example in a variable way. I'm solving it by constructing the format string before using FORMAT: (DEFUN string-add (&REST args) (SETQ args (REMOVE NIL args)) (IF (NULL args) "" (FORMAT NIL "~{~A~}" args) ) ) ;--- (LET* ( (tab (get-a-number-from-somewhere)) (f-string (string-add "~A~" tab "T~A")) ) (FORMAT T f-string a b) ) Is there another way ? Thanks in advance Nummi =================================================== _/_/_/_/ _/ Ralf Numrich _/ _/ numrich@rwth-aachen.de _/ _/ Geodaetisches Institut _/ _/_/ _/ RWTH Aachen _/ _/ _/ Templergraben 55 _/_/_/_/ _/ 52062 Aachen +49 241 805292 FAX +49 241 8888124 From haible Wed Apr 27 13:43:56 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09607; Wed, 27 Apr 94 13:43:56 +0200 Date: Wed, 27 Apr 94 13:43:56 +0200 From: haible (Bruno Haible) Message-Id: <9404271143.AA09607@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: pretty printer and format Ralf Numrich states: > there's a difference in the behavior of the pretty printer using format > in VAX Lisp and CLisp (see below). This is implementation dependent. CLISP prefers to output more newlines and less spaces. > By the way, is it possible to use colnum in ~colnumT for example > in a variable way. Yes. Try something like (FORMAT T "~A~VT~A" "He" 6 "llo"). See CLtL2 p. 582. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hkt@zkm.de Wed Apr 27 16:42:27 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10068; Wed, 27 Apr 94 16:42:27 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Wed, 27 Apr 1994 16:38:52 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA28358; Wed, 27 Apr 94 16:34:46 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9404271534.AA28358@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA12921; Wed, 27 Apr 94 16:34:46 GMT+0100 Date: Wed, 27 Apr 94 16:34:46 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: can't install clisp in NeXTStep 3.0 I can't seem to install clisp on NeXTStep 3.0 because of problems with libnoreadline.a and libreadline.a. Any idea what the workaround is? im using the clisp version from binaries/next/clisp-english.tar.gz % cc lisp.a libnoreadline.a -ltermcap -s -o lisp.run /bin/ld: libnoreadline.a bad magic number (not a Mach-O file) -Rick Taube hkt@zkm.de Zentrum fuer Kunst und Medientechnologie Ritterstr. 42 76137 Karlsruhe Germany From RLS@waikato.ac.nz Thu Apr 28 01:13:32 1994 Return-Path: Received: from grace.waikato.ac.nz by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10341; Thu, 28 Apr 94 01:13:32 +0200 Message-Id: <9404272313.AA10341@ma2s2.mathematik.uni-karlsruhe.de> Date: Thu, 28 Apr 94 11:09 +1200 From: RLS@waikato.ac.nz Subject: RE: How to write fast Numerical Analysis code in CLISP? To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" In reply to your wish for faster lisp, well I can't help you much but I too wish for something like that! I am using CLisp on my linux box and used to use it on dos before I discovered linux :-) and before that used it on my Amiga, and currently use it on the suns at varsity too so I sure like it's portability and availability. However we're running finite element method (FEM) stuff and on big jobs it sure is slow, even on middle-sized jobs. we also use allegro common lisp on the suns and it blitzs clisp for all the larger stuff, but it's such a pig on memoery that I'd rather use CLisp. I'd like to get more speed out of clisp but I guess this would mean that the compiler would have to write lower level code than it presently does and actually do inlining and all the usual compiler optimizations that I don't think it currently does (please forgive me if this is wrong, but I'm just going on comparing the sizes of .fas clisp files and .fasl allegro files). Actually as far as I know AKCL isn't available for linux, and maybe it is a pig too? I'm just speculating, but I sure would like something faster, keep trying....and please if you find something, could you let me know! thanx, Richard Shepherd. (rls@waikato.ac.nz) From pcolsen@super.org Thu Apr 28 02:44:03 1994 Return-Path: Received: from super.super.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10411; Thu, 28 Apr 94 02:44:03 +0200 Received: from descartes.super.org by super.super.org (4.1/SMI-4.1) id AA10102; Wed, 27 Apr 94 20:40:29 EDT Date: Wed, 27 Apr 94 20:40:29 EDT From: pcolsen@super.org (Peter C Olsen) Message-Id: <9404280040.AA10102@super.super.org> Received: by descartes.super.org (4.1/SMI-4.1) id AA17591; Wed, 27 Apr 94 20:40:28 EDT To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? References: <9404272313.AA10341@ma2s2.mathematik.uni-karlsruhe.de> Richard --- Actually, I have AKCL for Linux --- I found it all precompiled and ready to install. Most people have told me that it is about an order of magnitude faster than CLISP --- at least in compiled mode. I've also been told that it's very easy to write extensions in C. (AKCL compiles to C.) I think that I got AKCL from Sunsite. Let me know if you need help finding it (or if you would prefer me to mail it to you in millions of tiny uuencoded files :-). Peter From matthias@intellektik.informatik.th-darmstadt.de Thu Apr 28 13:12:50 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11041; Thu, 28 Apr 94 13:12:50 +0200 Received: from kiwi.intellektik.informatik.th-darmstadt.de (kiwi.intellektik.th-darmstadt.de) by rs2.hrz.th-darmstadt.de with SMTP id AA12307 (5.65c/IDA-1.4.4 for ); Thu, 28 Apr 1994 13:09:10 +0200 Received: by kiwi.intellektik.informatik.th-darmstadt.de (4.1/Server-1.3/HRZ-THD) id AA05736; Thu, 28 Apr 94 13:09:07 +0200 Date: Thu, 28 Apr 94 13:09:07 +0200 From: Matthias Lindner Message-Id: <9404281109.AA05736@kiwi.intellektik.informatik.th-darmstadt.de> To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? In-Reply-To: <9404280040.AA10102@super.super.org> References: <9404280040.AA10102@super.super.org> Peter C Olsen writes: > Richard --- > > Actually, I have AKCL for Linux --- I found it all precompiled and > ready to install. Most people have told me that it is about an order > of magnitude faster than CLISP --- at least in compiled mode. I've ^^^^^^^^^^^^^^^^^^^^^^^^^^^ I've tried akcl (1.615 on Linux, 486DX2,50MHz, 16+16MB and Xakcl 1.605 on different SPARCs) and in comparison to CLisp it is definitively *much* slower *and* uses much more memory!!! (e.g Xakcl: 5MB, 52.35sec; Clisp: 1.5MB, 10sec for the same problem on a SPARCstation 1). I am working on an AI planning-system, so I don't know, if the situation is different for programs with extensive numeric computation, but I really doubt that. --Matthias ------------------------------------------------------------------------------ Matthias Lindner FG Intellektik, FB Informatik Technische Hochschule Darmstadt Alexanderstr.10, D-64283 Darmstadt TEL: +49 6151 166651 FAX: +49 6151 165326 NET: matthias@intellektik.informatik.th-darmstadt.de ------------------------------------------------------------------------------ From pcolsen@super.org Thu Apr 28 14:44:25 1994 Return-Path: Received: from super.super.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11215; Thu, 28 Apr 94 14:44:25 +0200 Received: from descartes.super.org by super.super.org (4.1/SMI-4.1) id AA15018; Thu, 28 Apr 94 08:40:36 EDT Date: Thu, 28 Apr 94 08:40:36 EDT From: pcolsen@super.org (Peter C Olsen) Message-Id: <9404281240.AA15018@super.super.org> Received: by descartes.super.org (4.1/SMI-4.1) id AA19928; Thu, 28 Apr 94 08:40:36 EDT To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? References: <9404281109.AA05736@kiwi.intellektik.informatik.th-darmstadt.de> Matthias --- Your email was interesting because most people have told me that AKCL is much faster, once it has been compiled. Was your code being interpreted or compiled? (AKCL "compiles" to C which is then "recompiled" into an executable; CLISP compiles to an interpreted byte-code.) Peter Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 marcus@ee.pdx.edu Thu Apr 28 15:13:48 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11283; Thu, 28 Apr 94 15:13:48 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA10010; Thu, 28 Apr 94 06:11:46 PDT Date: Thu, 28 Apr 94 06:11:46 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9404281311.AA10010@ursula.ee.pdx.edu> To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? In-Reply-To: <9404281240.AA15018@super.super.org> References: <9404281240.AA15018@super.super.org> >>>>> "Peter" == Peter C Olsen writes: Peter> Matthias --- Your email was interesting because most people Peter> have told me that AKCL is much faster, once it has been Peter> compiled. Was your code being interpreted or compiled? (AKCL Peter> "compiles" to C which is then "recompiled" into an executable; Peter> CLISP compiles to an interpreted byte-code.) I think there is truth to both claims. The overhead for CLISP is that it isn't generating native processor code. Therefore, numerical and other types of highly iterative code suffer due to function-call overhead. It stands to reason that higher level code, which used more LISP features, would benefit from CLISP's otherwise efficient and portable implementation. Marcus Daniels From matthias@intellektik.informatik.th-darmstadt.de Thu Apr 28 17:17:56 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11588; Thu, 28 Apr 94 17:17:56 +0200 Received: from kiwi.intellektik.informatik.th-darmstadt.de (kiwi.intellektik.th-darmstadt.de) by rs2.hrz.th-darmstadt.de with SMTP id AA16252 (5.65c/IDA-1.4.4 for ); Thu, 28 Apr 1994 17:14:15 +0200 Received: by kiwi.intellektik.informatik.th-darmstadt.de (4.1/Server-1.3/HRZ-THD) id AA06392; Thu, 28 Apr 94 17:14:12 +0200 Date: Thu, 28 Apr 94 17:14:12 +0200 From: Matthias Lindner Message-Id: <9404281514.AA06392@kiwi.intellektik.informatik.th-darmstadt.de> To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? In-Reply-To: <9404281240.AA15018@super.super.org> References: <9404281240.AA15018@super.super.org> Peter C Olsen writes: > Matthias --- > > Your email was interesting because most people have told me that AKCL > is much faster, once it has been compiled. Was your code being > interpreted or compiled? Hmmm, I like Clisp very much - but anyway I'm not as unfair, as to compare interpreted to compiled code! ;) Of course I've compiled everything! To complete my "mini-benchmark": +------------+--------+-------------+-------------+ |Lisp | Memory | Interpreted | Compiled | +------------+--------+-------------+-------------+ |clisp | 1.5MB | 51 sec | 10 sec | |Xakcl | 5.0MB | 116 sec | 52 sec | |Allegro 4.0 | 16.0MB | 142 sec | 12 sec | |Lucid 4.0 | 39.0MB | 65 sec | 7 sec | +------------+--------+-------------+-------------+ All tests were run on a moderatly busy SPARCstation 1 (SunOS 4.1.3, 16MB RAM) If your programs run significantly faster under Allegro, than under Clisp - maybe I'm doing exactly what Clisp likes - and nobody else ... ;) --Matthias From pcolsen@super.org Thu Apr 28 18:16:17 1994 Return-Path: Received: from super.super.org by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11792; Thu, 28 Apr 94 18:16:17 +0200 Received: from descartes.super.org by super.super.org (4.1/SMI-4.1) id AA17636; Thu, 28 Apr 94 12:12:36 EDT Date: Thu, 28 Apr 94 12:12:36 EDT From: pcolsen@super.org (Peter C Olsen) Message-Id: <9404281612.AA17636@super.super.org> Received: by descartes.super.org (4.1/SMI-4.1) id AA21366; Thu, 28 Apr 94 12:12:32 EDT To: clisp-list Subject: RE: How to write fast Numerical Analysis code in CLISP? References: <9404281514.AA06392@kiwi.intellektik.informatik.th-darmstadt.de> Matthias --- This is very interesting. You are the only person who claimed that CLISP was faster than AKCL in executing compiled code. Several people said that it might be better with interpreted code, but everyone else told me that I might get as much as one-to-two orders of magnitude increase in speed by switching from CLISP to AKCL. Right now this is purely a professional problem, but it may become much more personal soon --- I hope to start work on a dissertation in the fall and I had planned to write the software in Lisp. Peter Peter Olsen, n2ell, pcolsen@super.super.org ...!uunet!super!pcolsen P.O. Box 410, Simpsonville, MD 21150-0410; 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 vargasje@charlie.ece.scarolina.edu Thu Apr 28 18:50:11 1994 Return-Path: Received: from alice.ece.scarolina.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11862; Thu, 28 Apr 94 18:50:11 +0200 Received: by alice.ece.scarolina.edu (5.65/DEC-Ultrix/4.3) id AA21691; Thu, 28 Apr 1994 12:46:27 -0400 Date: Thu, 28 Apr 1994 12:46:27 -0400 From: vargasje@charlie.ece.scarolina.edu (Dr J. E. Vargas) Message-Id: <9404281646.AA21691@alice.ece.scarolina.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: How to write fast Numerical Analysis code in CLISP? In order to understand better the clisp/akcl speed controversy, it might be helpful to know the nature of the code Matthias is running. Juan Eduardo Vargas, Ph.D. Electrical and Computer Engineering TEL: (803) 777-5099 University of South Carolina FAX: (803) 777-8045 Columbia, SC 29208 E-mail: vargasje@ece.scarolina.edu From pgs@thillana.lcs.mit.edu Thu Apr 28 21:19:45 1994 Return-Path: Received: from thillana.lcs.mit.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12037; Thu, 28 Apr 94 21:19:45 +0200 Received: by thillana.lcs.mit.edu (5.65/DEC-Ultrix/4.3) id AA29866; Thu, 28 Apr 1994 15:15:59 -0400 Date: Thu, 28 Apr 1994 15:15:59 -0400 From: pgs@thillana.lcs.mit.edu (Patrick Sobalvarro) Message-Id: <9404281915.AA29866@thillana.lcs.mit.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9404281612.AA17636@super.super.org> (pcolsen@super.org) Subject: RE: How to write fast Numerical Analysis code in CLISP? Date: Thu, 28 Apr 94 18:18:50 +0200 From: pcolsen@super.org (Peter C Olsen) Matthias --- This is very interesting. You are the only person who claimed that CLISP was faster than AKCL in executing compiled code. Several people said that it might be better with interpreted code, but everyone else told me that I might get as much as one-to-two orders of magnitude increase in speed by switching from CLISP to AKCL. Right now this is purely a professional problem, but it may become much more personal soon --- I hope to start work on a dissertation in the fall and I had planned to write the software in Lisp. I just thought I'd throw in my two bits here, as someone who did my master's thesis work in LISP. For a LISP application, you should write your code under whatever is easiest to use and debug. Don't worry about a factor of 10 in speed -- who cares when you're just developing code? So, in this case CLISP is a great platform -- it runs on your laptop, your workstation, whatever you want. It loads up quickly, compiles quickly, etc. When the time comes to use the code and generate the results, well, you wrote it in Common LISP, right? So then you re-compile it in whatever the fastest thing around is, and run it on whatever the fastest thing around is. But if you're writing a significantly large program, running the code is a trivially small part of what you're going to do. Developing it is most of what you'll do. From ah0i+@andrew.cmu.edu Thu Apr 28 22:46:39 1994 Return-Path: Received: from po2.andrew.cmu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12097; Thu, 28 Apr 94 22:46:39 +0200 Received: (from postman@localhost) by po2.andrew.cmu.edu (8.6.7/8.6.6) id QAA19869 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Thu, 28 Apr 1994 16:42:46 -0400 Received: via switchmail; Thu, 28 Apr 1994 16:42:45 -0400 (EDT) Received: from unix4.andrew.cmu.edu via qmail ID ; Thu, 28 Apr 1994 16:40:50 -0400 (EDT) Received: from unix4.andrew.cmu.edu via qmail ID ; Thu, 28 Apr 1994 16:40:42 -0400 (EDT) Received: from BatMail.robin.v2.14.CUILIB.3.45.SNAP.NOT.LINKED.unix4.andrew.cmu.edu.pmax.ul4 via MS.5.6.unix4.andrew.cmu.edu.pmax_ul4; Thu, 28 Apr 1994 16:40:29 -0400 (EDT) Message-Id: Date: Thu, 28 Apr 1994 16:40:29 -0400 (EDT) From: "Andrew A. Houghton" To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp on compuserve This is directed at Bruno and Michael.. (can't find their e-mail addresses..) There's been some interest in an ibm pc LISP interpreter on Compuserve. Would it be alright for me to upload the english version to the programming forum there? - andrew From gadbois@cs.utexas.edu Thu Apr 28 22:50:17 1994 Return-Path: Received: from cs.utexas.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12143; Thu, 28 Apr 94 22:50:17 +0200 From: gadbois@cs.utexas.edu (David Gadbois) Received: from peaches.cs.utexas.edu by cs.utexas.edu (5.64/1.28/mx-relay) with SMTP id AA12638; Thu, 28 Apr 94 15:46:16 -0500 Received: by peaches.cs.utexas.edu (5.64/Client-v1.3) id AA14909; Thu, 28 Apr 94 15:46:12 -0500 Date: Thu, 28 Apr 94 15:46:12 -0500 Message-Id: <9404282046.AA14909@peaches.cs.utexas.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Matthias Lindner's message of Thu, 28 Apr 94 17:19:42 +0200 <9404281514.AA06392@kiwi.intellektik.informatik.th-darmstadt.de> Subject: How to write fast Numerical Analysis code in CLISP? Date: Thu, 28 Apr 1994 10:19 CDT From: Matthias Lindner To complete my "mini-benchmark": +------------+--------+-------------+-------------+ |Lisp | Memory | Interpreted | Compiled | +------------+--------+-------------+-------------+ |clisp | 1.5MB | 51 sec | 10 sec | |Xakcl | 5.0MB | 116 sec | 52 sec | |Allegro 4.0 | 16.0MB | 142 sec | 12 sec | |Lucid 4.0 | 39.0MB | 65 sec | 7 sec | +------------+--------+-------------+-------------+ Clisp and AKCL have radically different performance profiles than Allegro and Lucid. Clisp is a byte compiled-implementation with a number of critical functions written in C. AKCL "compiles" to C code, which in turn is compiled to native code. Thus, one can expect compiled code in Clisp to usually (but not always!) do worse than AKCL. Note that since AKCL has to format the compiled Lisp code into C source files and send them through the C preprocesor, parser, backend, assembler, and linker, compilation in AKCL is ungodly slow. If your benchmarks do any kind of on-the-fly compilation, AKCL will lose big time. AKCL in turn is limited by how good the C compiler is, and furthermore gives up some performance relative to native compilers like Lucid and Allegro due to portability concerns and trying to cram the round Lisp peg into the square C hole. Even within compilers there is considerable variations. Lucid actually has two compilers in it, the production and development compilers. SAFETY settings can also alter performance in a big way. In general, there are a zillion ways to compile Lisp and just as many ways for the compiler writer to spend time optimizing things. No one compiler is going to do the best thing in all cases. So, there is a continuum of choices here. From Clisp, which is free, has a small footprint, and runs on just about any machine albeit more slowly, up to Lucid, which is expensive, big, and runs on a limited number of workstation-class machines but is generally quick and featureful. Single benchmarks are not going to tell much here, since there is so much variation between the implementations, and there are quite a few factors to consider (cost, portability, development environment, support, quality, language extensions, etc.) besides just raw performance. --David Gadbois From hoehle@inf-wiss.ivp.uni-konstanz.de Fri Apr 29 08:35:56 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12481; Fri, 29 Apr 94 08:35:56 +0200 Received: from manzell.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA00693; Fri, 29 Apr 94 08:32:03 +0200 Date: Fri, 29 Apr 94 08:32:03 +0200 Message-Id: <9404290632.AA00693@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: clisp on compuserve In-Reply-To: References: Andrew A. Houghton writes: > There's been some interest in an ibm pc LISP interpreter on > Compuserve. Would it be alright for me to upload the english version > to the programming forum there? Don't current Intel versions of CLISP run on >= 386 PCs only? That's not what you have in an IBM PC. A much smaller LISP should be preferred there, like what you got in 1986. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From hkt@zkm.de Mon May 2 16:37:52 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15876; Mon, 2 May 94 16:37:52 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Mon, 2 May 1994 16:33:15 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA02844; Mon, 2 May 94 16:29:09 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9405021529.AA02844@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA01221; Mon, 2 May 94 16:29:08 GMT+0100 Date: Mon, 2 May 94 16:29:08 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: defmethod lambda list bug theres a bug in clisp's defmethod that doesn't allow both optional and keyword arguments to be supplied in a calling form. is there a workaround aready available?? ive also tried adding a &rest before the &key but it doesnt help. im using the clisp from clisp/binaries/next, (lisp-implementation-version) "January 1994" -hkt > (in-package :clos) # > (defmethod foo (a &optional b &key c)) #)> > (foo 1 2 :c 3) *** - EVAL/APPLY: keyword arguments for # should occur pairwise 1. Break> backtrace-1 - NIL - # frame binding variables (~ = dynamically): | ~ SYSTEM::*PRIN-STREAM* <--> # - # - # - 3 - :C - 2 - # - # - 1 - # - # - (2 :C 3) - 1 - # EVAL frame for form (FOO 1 2 :C 3) - # #> - # 1. Break> From haible Mon May 2 18:23:25 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16073; Mon, 2 May 94 18:23:25 +0200 Date: Mon, 2 May 94 18:23:25 +0200 From: haible (Bruno Haible) Message-Id: <9405021623.AA16073@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: defmethod lambda list bug Rick Taube writes: > theres a bug in clisp's defmethod that doesn't allow both optional > and keyword arguments to be supplied in a calling form. Yes. Please patch clos.lsp: *** clos.lsp.orig Mon Jan 3 03:40:20 1994 --- clos.lsp Mon May 2 18:07:07 1994 *************** *** 2493,2500 **** (apply-fun (if restp 'APPLY 'FUNCALL)) (apply-args `(,@req-vars ,@(if restp `(,rest-var) '()))) (lambdalist `(,@req-vars ,@(if restp `(&REST ,rest-var) '()))) (key-vars '()) ! (lambdalist-with-key lambdalist) (arg-order (gf-argorder gf)) (methods (gf-methods gf))) ; Determine the effective method: --- 2493,2501 ---- (apply-fun (if restp 'APPLY 'FUNCALL)) (apply-args `(,@req-vars ,@(if restp `(,rest-var) '()))) (lambdalist `(,@req-vars ,@(if restp `(&REST ,rest-var) '()))) + (opt-vars '()) (key-vars '()) ! (lambdalist-keypart '()) (arg-order (gf-argorder gf)) (methods (gf-methods gf))) ; Determine the effective method: *************** *** 2532,2541 **** (append (fourth signature) (mapcap #'fifth signatures)) :from-end t )) ) (setq key-vars (n-gensyms (length keywords))) ! (setq lambdalist-with-key ! `(,@lambdalist ! &KEY ,@(mapcar #'(lambda (kw var) `((,kw ,var))) keywords key-vars ) --- 2533,2542 ---- (append (fourth signature) (mapcap #'fifth signatures)) :from-end t )) ) + (setq opt-vars (n-gensyms (second signature))) (setq key-vars (n-gensyms (length keywords))) ! (setq lambdalist-keypart ! `(&KEY ,@(mapcar #'(lambda (kw var) `((,kw ,var))) keywords key-vars ) *************** *** 2617,2627 **** (let* ((ef-form (ef-1 primary-methods before-methods after-methods around-methods)) (ef-fun (if (and (eq (car ef-form) apply-fun) (equal (cddr ef-form) apply-args) ! (equal lambdalist lambdalist-with-key) ) (cadr ef-form) ! `#'(LAMBDA ,lambdalist-with-key ! ,@(if key-vars `((DECLARE (IGNORE ,@key-vars)))) ,ef-form ) )) ) --- 2618,2638 ---- (let* ((ef-form (ef-1 primary-methods before-methods after-methods around-methods)) (ef-fun (if (and (eq (car ef-form) apply-fun) (equal (cddr ef-form) apply-args) ! (null lambdalist-keypart) ) (cadr ef-form) ! `#'(LAMBDA ! ,@(if (null opt-vars) ! `(,(append lambdalist lambdalist-keypart) ! ,@(if key-vars `((DECLARE (IGNORE ,@key-vars)))) ! ) ! `(,lambdalist ! (APPLY #'(LAMBDA (&OPTIONAL ,@opt-vars ,@lambdalist-keypart) ! (DECLARE (IGNORE ,@opt-vars ,@key-vars)) ! ) ! ,rest-var ! )) ! ) ,ef-form ) )) ) To regenerate lispinit.mem without rebuilding clisp from scratch: "clisp -c clos", "clisp -i clos -x '(saveinitmem)'" won't work. You have to set up a file closfix.lsp which contains the line (in-package "CLOS") and the definition of compute-effective-method from the fixed clos.lsp and use this instead: "clisp -c closfix", "clisp -i closfix -x '(saveinitmem)'" Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hkt@zkm.de Tue May 3 13:32:56 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17245; Tue, 3 May 94 13:32:56 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Tue, 3 May 1994 13:32:31 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA03523; Tue, 3 May 94 13:28:31 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9405031228.AA03523@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA01851; Tue, 3 May 94 13:28:30 GMT+0100 Date: Tue, 3 May 94 13:28:30 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: with-slots macroexpansion bug theres a nasty bug in with-slots such that a slot named "function" gets expanded to a function object! ie: #'(SLOT-VALUE #:G969 'FUNCTION) instead of something like: (function (slot-value #G969 'function)) heres the bug: > (pprint (macroexpand '(with-slots (foo function bar) i (print function)))) (LET ((#:G969 I)) (SYMBOL-MACROLET ((FOO (SLOT-VALUE #:G969 'FOO)) #'(SLOT-VALUE #:G969 'FUNCTION) (BAR (SLOT-VALUE #:G969 'BAR)) ) (PRINT FUNCTION) )) im running clisp on a next machine. -hkt From haible Tue May 3 13:54:42 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17362; Tue, 3 May 94 13:54:42 +0200 Date: Tue, 3 May 94 13:54:42 +0200 From: haible (Bruno Haible) Message-Id: <9405031154.AA17362@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: with-slots macroexpansion bug > theres a nasty bug in with-slots such that a slot named "function" > gets expanded to a function object! > #'(SLOT-VALUE #:G969 'FUNCTION) > instead of something like: > (function (slot-value #G969 'function)) This is not a bug. You have been fooled by the fact that CLISP's printer prints lists of the form (FUNCTION xxx) as #'xxx - regardless whether the symbol FUNCTION is meant as a special form as a variable name. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hkt@zkm.de Thu May 5 10:29:18 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22312; Thu, 5 May 94 10:29:18 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Thu, 5 May 1994 10:28:17 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA05809; Thu, 5 May 94 10:24:16 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9405050924.AA05809@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA02293; Thu, 5 May 94 10:24:15 GMT+0100 Date: Thu, 5 May 94 10:24:15 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: user-homedir-pathname in dos Is there some reason that the function USER-HOMEDIR-PATHNAME is missing from the DOS port of CLISP? Also, why is it an error to give lower case strings to make-pathname? > (make-pathname :name "test" :type "lsp") *** - MAKE-PATHNAME: illegal :NAME argument "test" 1. Break> I thought dos filenames are case insensitive; clisp functions like DIR and PATHNAME all accept lower case file names. -hkt From haible Thu May 5 17:09:44 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22871; Thu, 5 May 94 17:09:44 +0200 Date: Thu, 5 May 94 17:09:44 +0200 From: haible (Bruno Haible) Message-Id: <9405051509.AA22871@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: user-homedir-pathname in dos Rick Taube asks: > Is there some reason that the function USER-HOMEDIR-PATHNAME is missing > from the DOS port of CLISP? That's how it is specified: (USER-HOMEDIR-PATHNAME) determines "the pathname that corresponds to the user's home directory". ... "The definition of home directory is implementation-dependent, but defined in Common Lisp to mean the directory where the user keeps personal files such as initialization files and mail." Well, how could this make sense on DOS? > Also, why is it an error to give lower case strings to make-pathname? > > (make-pathname :name "test" :type "lsp") > *** - MAKE-PATHNAME: illegal :NAME argument "test" Because otherwise you couldn't rely on (pathname-name (make-pathname :name something)) being EQUAL to something. Use PATHNAME or PARSE-NAMESTRING to convert strings to pathnames, and make use of MERGE-PATHNAMES to combine pathnames. > functions like DIR and PATHNAME all accept lower case file names. But I consider MAKE-PATHNAME to be more low-level than PATHNAME. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hkt@zkm.de Fri May 6 07:56:10 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23271; Fri, 6 May 94 07:56:10 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Fri, 6 May 1994 07:54:59 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA06632; Fri, 6 May 94 07:50:54 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9405060650.AA06632@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA02605; Fri, 6 May 94 07:50:52 GMT+0100 Date: Fri, 6 May 94 07:50:52 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list Subject: Re: user-homedir-pathname in dos > "The definition of home directory is implementation-dependent, > but defined in Common Lisp to mean the directory where the user > keeps personal files such as initialization files and mail." >Well, how could this make sense on DOS? i dont think this says that the function should be omitted, just that what "home direcotry" means will differ across ports. i think since dos was intended to be a single user OS at a minimum the function could return "\" , since (1) you own the machine when you boot it and (2) that is where dos normally leaves you and also where some init] files are stored. MCL and ACLPC have the same problem but provide the function primarily because it makes writing portable code easier. I think MCL and ACLPC actually get more fancy, by allowing you to explicitly define "home" in a config file, or using the directory where the image resides. >Because otherwise you couldn't rely on > (pathname-name (make-pathname :name something)) >being EQUAL to something. thanks, now i understand...sure wich cl provided pathname-equal since equal testing returns false in cases when it needn't! -hkt From schrod@iti.informatik.th-darmstadt.de Fri May 6 08:29:15 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23352; Fri, 6 May 94 08:29:15 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA09278 (5.65c/IDA-1.4.4 for ); Fri, 6 May 1994 08:28:25 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.4/Server-1.5/HRZ-THD/8.6.4-ITI) id IAA07675; Fri, 6 May 1994 08:28:24 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA16649; Fri, 6 May 1994 08:28:23 +0200 From: Joachim Schrod Message-Id: <9405060628.AA16649@spice.iti.informatik.th-darmstadt.de> Subject: Re: user-homedir-pathname in dos To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 6 May 1994 08:28:22 +0100 (MESZ) In-Reply-To: <9405060650.AA06632@guido.zkm.de> from "Rick Taube" at May 6, 94 07:58:27 am X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 1127 Bruno wrote: > > > "The definition of home directory is implementation-dependent, > > but defined in Common Lisp to mean the directory where the user > > keeps personal files such as initialization files and mail." > >Well, how could this make sense on DOS? > > i dont think this says that the function should be omitted, just that > what "home direcotry" means will differ across ports. i think since > dos was intended to be a single user OS at a minimum the function > could return "\" , The getpw{ent,uid,nam}() emulations in many DOS libraries (i.e., the routines that set the pw_dir component of the passwd struct) do first check for the existence of an environment variable HOME and return its value. "\" is the fallback, often. Available user(s) are "root" and sometimes "anonymous" or "nobody". That might be used as a possible implementation strategy for #'user-homedir-pathname. Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From hkt@zkm.de Mon May 9 07:12:21 1994 Return-Path: Received: from iraun1.ira.uka.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26678; Mon, 9 May 94 07:12:21 +0200 Received: from guido.zkm.de by iraun1.ira.uka.de with SMTP (PP); Mon, 9 May 1994 07:10:57 +0200 Received: from (ockeghem) by guido.zkm.de (NeXT-1.0 (From Sendmail 5.52)/NeXT-2.0) id AA08864; Mon, 9 May 94 07:07:03 GMT+0100 From: hkt@zkm.de (Rick Taube) Message-Id: <9405090607.AA08864@guido.zkm.de> Received: by (NeXT-1.0 (From Sendmail 5.52)/NX3.0X) id AA04339; Mon, 9 May 94 07:07:02 GMT+0100 Date: Mon, 9 May 94 07:07:02 GMT+0100 Original-Received: by NeXT.Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line Original-Received: by NeXT Mailer (1.87.1) Pp-Warning: Illegal Received field on preceding line To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: bug in prompting loops there is a stream bug in both the DOS and the NeXTStep versions of CLISP that causes output in a PROMPT/READ loop to get multiply printed after some number of correct occurences. On the NeXT the bug starts after 6 times through the loop, (after 12 on my DOS machine). Once the bug starts, with a bogus line getting printed) the prompt appears to gets doubled, then tripled, etc. The bug is very easy to tickle, just eval this loop and type 1 as the answer. It may take a few time, but you should notice that the prompt starts going haywire fairly soon: > (loop (format t "type value:") (read)) type value:1 type value:1 type value:1 type value:1 type value:1 type value:1 type value: 1 type value: type value:1 type value: type value:type value:1 type value: type value:type value:type value:1 type value: type value:type value:type value:type value:1 type value: type value:type value:type value:type value:type value:1 type value: type value:type value:type value:type value:type value:type value:1 type value: type value:type value:type value:type value:type value:type value:type value: From d791013@ce.ntu.edu.tw Mon May 9 10:28:53 1994 Return-Path: Received: from comet.ce.ntu.edu.twce.ntu.edu.tw (comet.ce.ntu.edu.tw) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26960; Mon, 9 May 94 10:28:53 +0200 Message-Id: <9405090828.AA26960@ma2s2.mathematik.uni-karlsruhe.de> Received: by comet.ce.ntu.edu.tw (1.37.109.4/15.6) id AA04261; Mon, 9 May 94 17:24:39 -0600 From: Chun-Yu Lee Subject: A question for DEFUN To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP list forum) Date: Mon, 9 May 94 17:24:38 MDT Mailer: Elm [revision: 70.85] Hello everybody, I wrote a simple equation solver in LISP (see below). If a function that uses the macro "equation" is defined before the file "eqsolver.lsp" is loaded, everything seems all right. For example, > (fmakunbound 'equation) EQUATION > (makunbound 'a) A > (makunbound 'b) B > (defun foo (a b) (equation a = b)) FOO > (load "eqsolver.lsp") ;; Loading file EQSOLVER.LSP ... ;; Loading of file EQSOLVER.LSP is finished. T > (setq a nil b 5) 5 > (foo a b) 5 ; A > (foo nil b) 5 ; A > (equation a = b) 5 ; A However, when the function is defined after, then the result becomes as follow: > (load "eqsolver.lsp") ;; Loading file EQSOLVER.LSP ... ;; Loading of file EQSOLVER.LSP is finished. T > (makunbound 'a) A > (makunbound 'b) B > (defun foo (a b) (equation a = b)) *** - EVAL: variable B has no value <--- Why does "defun" need to evaluate 1. Break> the arguments of a function. > (setq a nil b nil) NIL > (defun foo (a b) (equation a = b)) FOO <--- O.K. But, > (setq b 5) 5 > (foo a b) NIL ; <--- the output value is wrong. A > a NIL > b 5 > (equation a = b) 5 ; <--- It's correct. A What's wrong with it? Thanks in advance. Chun Yu Lee e-mail: d791013@ce.ntu.edu.tw =================File: EQSOLVER.LSP ============================= ;;; ;;; A Simple Equation Solver (SES) ;;; ;;; created: 18 April 1994 ;;; updated: 29 April 1994 ;;; author: Chun Yu Lee ; The following functions and macros serve to ; solve an equation that has less then one unknown and with three parts of ; expressions, the LHS, relationship, and RHS. No more than one unknown ; (variable) can be appeared in the LHS or RHS of the equation. ; A symbol name which is unbound or nil in the equation is an unknown. ; The operators or predicates used in expressions must be complyed with ; those specified in the exchanging rules depicted in global variable ; *X-operators*. However, any valid LISP forms other than specified in ; *X-operators* can be used in the expression which is on the opposite ; side to the one the unknown is stayed. ; ; The macro "symbol-equation" returns three values: the solved expression ; in symbolic form, the unknown variable, and the operater. But there is ; only one value will be returned, when the unknown cannot be found, to be ; true (T) or false (NIL) according to the evaluation of the equation. ; ; The macro "equation" returns two values: the evaluated result of solved ; equation and the unknown found. While the macro "nequation" is a ; destructive version of "equation" and returns only the evaluated result. ; The side effect of "nequation" is that the unbound (or nilled) variable ; will be bound to the result. ; ; SES can solve equations like followings: ; ; a * b = c + 4 -- (1), ; or b*x^2 + c = d -- (2). ; ; Eqn. (1) can be called as: ; ; ; > (setq a 3 b 4) ; 4 ; > (symbol-equation (* a b) = (+ c 4)) ; (- (* A B) 4) ; ; C ; ; = ; > (equation (* a b) = (+ c 4)) ; 8 ; ; C ; > (boundp 'c) ; NIL ; > (nequation (* a b) = (+ c 4)) ; 8 ; > c ; 8 ; ; In the similar way, eqn. (2) can be called as: ; ; > (setq x nil b 3 c 4 d 5) ; 5 ; > (symbol-equation (+ (* b (expt x 2)) c) = d) ; (EXPT (/ (- D C) B) (/ 1 2)) ; ; X ; ; = ; > ; ;;; Begining of the equation solver. (defvar *X-operators* '((+ . -) (* . /) (expt . expt) (exp . log) (sin . asin) (cos . acos) (tan . atan) (sinh . asinh) (cosh . acosh) (tanh . atanh) ) ) (defmacro equation (&body eqn) (multiple-value-bind (value var) (eval (cons 'symbol-equation eqn)) `(values ,(eval value) ',var) ) ) (defmacro nequation (&body eqn) ;destructive version (multiple-value-bind (value var) (eval (cons 'symbol-equation eqn)) (if var `(setq ,var ,(eval value)) value) ) ) (defmacro symbol-equation (lhs op rhs) (let* ((args (explode-list (list lhs rhs))) (var (nth (or (position-if-not #'(lambda (x) (or (numberp x) (boundp x) (fboundp x))) args) (position nil (mapcar #'(lambda (x) (if (or (numberp x) (fboundp x)) x (eval x))) args) ) (return-from symbol-equation `(,op ,lhs ,rhs)) ) args))) `(values ',(solve-linear-eqn lhs rhs var) ',var ',op) ) ) (defun solve-linear-eqn (lhs rhs var) (if (or (and (atom rhs) (equal rhs var)) (and (consp rhs) (member var (explode-list rhs)))) (solve-linear-eqn-r rhs lhs var) (solve-linear-eqn-r lhs rhs var) ) ) (defun solve-linear-eqn-r (lhs rhs var) (if (atom lhs) (if (equal lhs var) rhs nil) (let ((op (pop lhs)) (result nil) lhs1) (push (or (cdr (assoc op *X-operators*)) (car (rassoc op *X-operators*))) result) (push rhs result) (if (equal op 'expt) (setf (cadr lhs) `(/ 1 ,(cadr lhs)))) (dolist (ivar lhs) (if (or (and (atom ivar) (equal ivar var)) (and (consp ivar) (member var (explode-list ivar)))) (setq lhs1 ivar) (push ivar result)) ) (solve-linear-eqn-r lhs1 (reverse result) var) ) ) ) (defun explode-list (lst) (if (null lst) nil (if (atom lst) (list lst) (append (explode-list (car lst)) (explode-list (cdr lst))) ) ) ) ;;; End of equation solver. From hoehle@inf-wiss.ivp.uni-konstanz.de Mon May 9 11:27:22 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27142; Mon, 9 May 94 11:27:22 +0200 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA22434; Mon, 9 May 94 11:25:59 +0200 Date: Mon, 9 May 94 11:25:59 +0200 Message-Id: <9405090925.AA22434@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: bug in prompting loops In-Reply-To: <9405090607.AA08864@guido.zkm.de> References: <9405090607.AA08864@guido.zkm.de> Rick Taube wrote: >there is a stream bug in both the DOS and the NeXTStep versions of >CLISP that causes output in a PROMPT/READ loop to get multiply >printed after some number of correct occurences. [...] Weird, this doesn't happen in the January versions of CLISP for Sun4 and Amiga. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From hoehle@inf-wiss.ivp.uni-konstanz.de Mon May 9 12:11:54 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27282; Mon, 9 May 94 12:11:54 +0200 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA22491; Mon, 9 May 94 12:10:23 +0200 Date: Mon, 9 May 94 12:10:23 +0200 Message-Id: <9405091010.AA22491@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Cc: Chun-Yu Lee Subject: A question for DEFUN In-Reply-To: <9405090828.AA26960@ma2s2.mathematik.uni-karlsruhe.de> References: <9405090828.AA26960@ma2s2.mathematik.uni-karlsruhe.de> Chun-Yu Lee writes: > I wrote a simple equation solver in LISP (see below). If a function > that uses the macro "equation" is defined before the file "eqsolver.lsp" > is loaded, everything seems all right. For example, Common-Lisp really needs all macros to be defined before they are used. Not doing so in your first example makes Common-Lisp interpret the call to EQUATION as a function call. That's not what seem to want. [...] > However, when the function is defined after, then the result becomes as > follow: > > (defun foo (a b) (equation a = b)) > > *** - EVAL: variable B has no value <--- Why does "defun" need to evaluate > 1. Break> the arguments of a function. It's not the defun, it's your macro that's calling EVAL several times. The EQUATION macro can be expanded by Common-Lisp at the time the defun is supplied, not necessarily when you call the new function. [...] > ; A symbol name which is unbound or nil in the equation is an unknown. > ; The macro "symbol-equation" returns three values: the solved expression > ; in symbolic form, the unknown variable, and the operater. But there is > ; only one value will be returned, when the unknown cannot be found, to be > ; true (T) or false (NIL) according to the evaluation of the equation. I believe that there is some misunderstanding here about the way macros work. Macros can be used to transform an expression into another expression, but this is usually only done once, for example when you include your macro call in a defun. You _can_ write a macro that analyses your equation and transforms it into another expression. You _cannot_ write a macro that will solve your equation in function of the unknown variable, because at macroexpansion time, you don't know which variable is the unknown variable. You'll only have this information at run-time (e.g. when you call FOO). Reread the LISP FAQ: If you think that you need EVAL in a macro, then you are almost certainly doing something wrong. Why do you want to use macros anyway? To save you quotes? They are only needed when testing your functions at top-level. ; > (symbol-equation (* a b) = (+ c 4)) ; (- (* A B) 4) ; ; C ; ; = ; > (equation (* a b) = (+ c 4)) ; 8 ; ; C Attention! danger! In Common-Lisp, you'll have to understand and be very careful about lexical and special variables in order to use things like SETQ, SYMBOL-VALUE and BOUNDP to get the values of your expressions or to manipulate values. I'd suggest using your own binding list. This is easier to keep control of and doesn't interact with others use of the variables. Example: (symbol-equation '((* a b) = (+ c 4)) '((a .3) (b . 4))) or (symbol-equation '((* a b) = (+ c 4)) 'c) (equation '((* a b) = (+ c 4)) '((a . 3) (b . 4))) or (equation '((* a b) = (+ c 4)) 'c '((a . 3) (b . 4))) Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From haible Mon May 9 22:01:25 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05227; Mon, 9 May 94 22:01:25 +0200 Date: Mon, 9 May 94 22:01:25 +0200 From: haible (Bruno Haible) Message-Id: <9405092001.AA05227@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: bug in prompting loops Rick Taube wrote: > there is a stream bug in both the DOS and the NeXTStep versions of > CLISP that causes output in a PROMPT/READ loop to get multiply > printed after some number of correct occurences. Indeed. This bug has been there for a very long time. Please use this fix if you are in a position to recompile clisp from source. *** stream.d.orig Sat Jan 8 14:45:35 1994 --- stream.d Mon May 9 21:54:16 1994 *************** *** 3437,3444 **** }} # Wenn stdin und stdout beide dasselbe Terminal sind, können # wir davon ausgehen, daß der Cursor in Spalte 0 steht. ! if (eq(TheStream(stream)->strm_terminal_isatty,S(equal))) ! { TheStream(stream)->strm_wr_ch_lpos = Fixnum_0; } # Nun fangen wir an, die Zeichen des Buffers zu liefern: goto restart_it; }} --- 3437,3446 ---- }} # Wenn stdin und stdout beide dasselbe Terminal sind, können # wir davon ausgehen, daß der Cursor in Spalte 0 steht. ! if (eq(TheStream(*stream_)->strm_terminal_isatty,S(equal))) ! { TheStream(*stream_)->strm_wr_ch_lpos = Fixnum_0; ! TheArray(TheStream(*stream_)->strm_terminal_outbuff)->dims[1] = 0; # Fill-Pointer := 0 ! } # Nun fangen wir an, die Zeichen des Buffers zu liefern: goto restart_it; }} Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From SEMENOV@C71.CANTERBURY.AC.UK Tue May 10 16:07:19 1994 Return-Path: Received: from sun2.nsfnet-relay.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06709; Tue, 10 May 94 16:07:19 +0200 Message-Id: <9405101407.AA06709@ma2s2.mathematik.uni-karlsruhe.de> Via: uk.ac.canterbury.c71; Tue, 10 May 1994 13:05:15 +0100 Date: Tue, 10 May 94 13:08 GMT From: SEMENOV@C71.CANTERBURY.AC.UK To: CLISP-LIST Subject: A quaestion for DEFUN Dear Chun-Yu Lee. A solution might be as follows. Define a function: (defun equation1(eqn); put here the body of your macro EQUATION (defmacro equation(&body eqm) (equation1 eqm)) Yours sincerely, Dr Michael Semenov, Christ Church College, Canterbury, Kent. From SEMENOV@C71.CANTERBURY.AC.UK Tue May 10 16:08:20 1994 Return-Path: Received: from sun2.nsfnet-relay.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AB06709; Tue, 10 May 94 16:08:20 +0200 Message-Id: <9405101408.AB06709@ma2s2.mathematik.uni-karlsruhe.de> Via: uk.ac.canterbury.c71; Tue, 10 May 1994 13:05:51 +0100 Date: Tue, 10 May 94 13:09 GMT From: SEMENOV@C71.CANTERBURY.AC.UK To: CLISP-LIST Subject: A question for DEFUN Dear Chun-Yu Lee. A solution might be as follows. Define a function: (defun equation1(eqn); put here the body of your macro EQUATION (defmacro equation(&body eqm) (equation1 eqm)) Yours sincerely, Dr Michael Semenov, Christ Church College, Canterbury, Kent. From SEMENOV@C71.CANTERBURY.AC.UK Wed May 11 18:12:24 1994 Return-Path: Received: from sun2.nsfnet-relay.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09163; Wed, 11 May 94 18:12:24 +0200 Message-Id: <9405111612.AA09163@ma2s2.mathematik.uni-karlsruhe.de> Via: uk.ac.canterbury.c71; Wed, 11 May 1994 16:31:53 +0100 Date: Wed, 11 May 94 16:35 GMT From: SEMENOV@C71.CANTERBURY.AC.UK To: CLISP-LIST Subject: PRIME-LISP Hello, everybody. Is anybody interested in a LISP dialect for Windows that has the following features: -- integrated enviroment, that contains a multi-window editor, an interperter that can be invoked by clicking the menu item RUN, the interpreter immediately processes all the expressions of the current editor window; -- over 100 functions that are compatible with COMMON LISP ones; -- access to external user-defined DLL libraries, with a convenient interface for Borland Pascal; -- image-processing (24-bit images up to 800x600) and array-processing features, arrays and images can be processed through DLLs as well; -- the interpreter itself has a text window that preserves the last 300 lines of the dialogue, which can be edited by the user and processed by the interpreter when ENTER is pressed; -- the interpreter uses 4 graphics windows to display images and graphics; -- object-oriented features are provided, which are as powerful as Common Lisp ones but syntax is somewhat different? If you are interested send me a message and a price. This dialect is available now. Full documentation will be available at the end of July 1994. Regards. Dr Michael Semenov. E-mail: semenov@uk.ac.canterbury.c71 From blake@netcom.com Thu May 12 02:38:40 1994 Return-Path: Received: from netcom.netcom.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09533; Thu, 12 May 94 02:38:40 +0200 Received: by netcom.netcom.com (8.6.8.1/Netcom) id RAA28367; Wed, 11 May 1994 17:37:02 -0700 From: blake@netcom.com (Blake McBride) Message-Id: <199405120037.RAA28367@netcom.netcom.com> Subject: Re: PRIME-LISP To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 11 May 1994 17:37:02 -0700 (PDT) In-Reply-To: <9405111612.AA09163@ma2s2.mathematik.uni-karlsruhe.de> from "SEMENOV@C71.CANTERBURY.AC.UK" at May 11, 94 06:13:40 pm X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 576 Saw your message about the lisp stuff. Please send me more info. You also asked for a price. I presume you mean how much I'd be willing to pay. Unfortunatly, given the fact that xlisp, akcl, clisp, scheme->c & mit scheme are all free I'd be hard pressed to pay anything. I have a software product I am trying to sell, but since it's not main stream C++/Windows it's not selling well. It doesn't seem to matter what features it has... -- Blake McBride (615) 790-8521 voice 3020 Liberty Hills Drive (615) 791-7736 fax Franklin, TN 37064 blake@netcom.com U.S.A. From molloy@mundil.cs.mu.OZ.AU Thu May 19 13:32:55 1994 Return-Path: Received: from mulga.cs.mu.OZ.AU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA18522; Thu, 19 May 94 13:32:55 +0200 Received: from mundil.cs.mu.OZ.AU by mulga.cs.mu.OZ.AU with SMTP (5.83--+1.3.1+0.50); id AA11196 Thu, 19 May 1994 21:29:50 +1000 (from molloy@mundil.cs.mu.OZ.AU) Received: by mundil.cs.mu.OZ.AU (8.6.8.1) id VAA03300; Thu, 19 May 1994 21:29:49 +1000 From: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) Message-Id: <199405191129.3300@mundil.cs.mu.OZ.AU> Subject: Stack overflow! To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP mail list) Date: Thu, 19 May 94 21:29:49 EST Cc: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) X-Mailer: ELM [version 2.3 PL11] I am compiling the protos system and have generated a stack space error (see the bottom of this posting.) Is there a way to rectify this, eg increase the stack space. Thanks for any help. Maureen Molloy (molloy@mundi.cs.mu.oz.au) output of session follows... i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I I I I I I I 8 8 8 8 8 8 I I I I I I I 8 8 8 ooooo 8oooo I \ `+' / I 8 8 8 8 8 \ `-+-' / 8 o 8 8 o 8 8 `-__|__-' ooooo 8oooooo ooo8ooo ooooo 8 | ------+------ Copyright (c) Bruno Haible, Michael Stoll 1992, 1993, 1994 > ;; Loading file load-protos.lsp ... Type the single character corresponding to what you want to do: --------------------------------------------------------------- C Compile the CL-Protos source files. S load the Source files for interpretative execution. B load the Binary files for execution. Q Quit (do nothing). ---> C Probing /mount/muse/staff/cogsci/molloy/protos/global.lsp on host NIL 17 files will be compiled from host NIL, directory /mount/muse/staff/cogsci/molloy/protos/ This may take a few minutes. Compiling /mount/muse/staff/cogsci/molloy/protos/global.lsp Compiling file /mount/muse/staff/cogsci/molloy/protos/global.lsp ... Compilation of file /mount/muse/staff/cogsci/molloy/protos/global.lsp is finished. 0 errors, 0 warnings Compiling /mount/muse/staff/cogsci/molloy/protos/defs.lsp Compiling file /mount/muse/staff/cogsci/molloy/protos/defs.lsp ... ** - Continuable Error (SETF CLOS:FIND-CLASS): Redefining the COMMON LISP class CONDITION If you continue (by typing 'continue'): The old definition will be lost 1. Break> continue Compilation of file /mount/muse/staff/cogsci/molloy/protos/defs.lsp is finished. 0 errors, 0 warnings *** - Lisp stack overflow. RESET > Bye. From haible Thu May 19 21:14:04 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA19289; Thu, 19 May 94 21:14:04 +0200 Date: Thu, 19 May 94 21:14:04 +0200 From: haible (Bruno Haible) Message-Id: <9405191914.AA19289@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Stack overflow! > ** - Continuable Error > (SETF CLOS:FIND-CLASS): Redefining the COMMON LISP class CONDITION > If you continue (by typing 'continue'): The old definition will be lost > 1. Break> continue > ... > > *** - Lisp stack overflow. RESET Don't tell us you have not been warned. You have typed 'continue'! Bruno From kaye@linc.cis.upenn.edu Sun May 22 10:14:27 1994 Return-Path: Received: from linc.cis.upenn.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21261; Sun, 22 May 94 10:14:27 +0200 Received: (kaye@localhost) by linc.cis.upenn.edu (8.6.8/UPenn 1.4) id EAA28570; Sun, 22 May 1994 04:10:56 -0400 Date: Sun, 22 May 1994 04:10:56 -0400 From: Jonathan Kaye Posted-Date: Sun, 22 May 1994 04:10:56 -0400 Message-Id: <199405220810.EAA28570@linc.cis.upenn.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: 2 Questions: Stack overflow and accessing Windows? Hello! I recently got a copy of CLISP in order to port an application from Lucid running on a Sparcstation to the DOS environment. To work out any problems before getting into DOS, I wanted to use the sun4 implementation. I ran into one problem: Stack overflow - I don't get any errors except the redefinition of loop: As I've seen before in the mailing list archive, CLISP is not CLtL2 compliant for the loop code. Rather than changing my loop invocations, I picked up a copy of the original loop.cl (from MIT), and loaded that with no apparent problem. Now I just need to 'continue' when CLISP asks me if I want to redefine LOOP. I wonder if this could be a problem... However, when I go into some operations (which involve, I guess, many function calls deep), I get the stack overflow. Is it possible to build the image with a larger stack? The same code runs fine in Lucid, but the Lucid image space is about 15M (I don't know how large the stack is). Any ideas? The other thing I was wondering about is how people using CLISP in DOS make interfaces, such as windows, menus, buttons, etc. I see that CLISP supports a system call, but I don't know how I could use it to make a window-based interface. I'd be interested to hear how others using CLISP are doing it. Thanks for any suggestions! In spite of these minor problems, kudos is due the authors of CLISP for providing such a nice implementation. -jonathan From donc@ISI.EDU Mon May 23 18:25:22 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21844; Mon, 23 May 94 18:25:22 +0200 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Mon, 23 May 1994 09:21:17 -0700 Date: Mon, 23 May 94 09:19:53 -0700 Posted-Date: Mon, 23 May 94 09:19:53 -0700 Message-Id: <9405231619.AA21919@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Mon, 23 May 94 09:19:53 -0700 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: kaye@linc.cis.upenn.edu, clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: accessing "windows" in DOS The other thing I was wondering about is how people using CLISP in DOS make interfaces, such as windows, menus, buttons, etc. I see that CLISP supports a system call, but I don't know how I could use it to make a window-based interface. I'd be interested to hear how others using CLISP are doing it. I assume by DOS you do NOT mean MSwindows. As far as I know there is no real windows interface - I'd be interested in finding out different. Most DOS programs evidently just use character interfaces, i.e., treat the screen as an array of characters. I've been using ansi.sys to do the cursor motion and color changes. I've built a little menu program from that, if you're interested (though I haven't actually used it). Also, there's a nice tiny package called arrmouse that translates mouse movement into arrow keys, and left click into return. For that reason I've used those keys in my menu package. I've also pretty much managed to build a character-array based "window" system that allows such things as read/print to a window. It's based on a clisp that's not yet released, though, and it's really too slow for serious use. Much more detail (and code) available if you want it. From molloy@mundil.cs.mu.OZ.AU Tue May 24 04:01:25 1994 Return-Path: Received: from mulga.cs.mu.OZ.AU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22189; Tue, 24 May 94 04:01:25 +0200 Received: from mundil.cs.mu.OZ.AU by mulga.cs.mu.OZ.AU with SMTP (5.83--+1.3.1+0.50); id AA25882 Tue, 24 May 1994 11:57:23 +1000 (from molloy@mundil.cs.mu.OZ.AU) Received: by mundil.cs.mu.OZ.AU (8.6.8.1) id LAA03077; Tue, 24 May 1994 11:57:20 +1000 From: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) Message-Id: <199405240157.3077@mundil.cs.mu.OZ.AU> Subject: Re: Stack overflow! To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 24 May 94 11:57:20 EST Cc: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) In-Reply-To: <9405191914.AA19289@ma2s2.mathematik.uni-karlsruhe.de>; from "Bruno Haible" at May 19, 94 9:18 pm X-Mailer: ELM [version 2.3 PL11] > > > ** - Continuable Error > > (SETF CLOS:FIND-CLASS): Redefining the COMMON LISP class CONDITION > > If you continue (by typing 'continue'): The old definition will be lost > > 1. Break> continue > > ... > > > > *** - Lisp stack overflow. RESET > > Don't tell us you have not been warned. You have typed 'continue'! > Are the two are related? The first seems to be a compile time warning that the code may not do what CLISP expects at run time. The second is the complier running out of space while compiling the code. If they are unrelated, is it simply a matter of enlarging the stack? Maureen. From hoehle@inf-wiss.ivp.uni-konstanz.de Tue May 24 19:59:19 1994 Return-Path: Received: from inf-wiss.ivp.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22779; Tue, 24 May 94 19:59:19 +0200 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA18990; Tue, 24 May 94 19:52:47 +0200 Date: Tue, 24 May 94 19:52:47 +0200 Message-Id: <9405241752.AA18990@inf-wiss.ivp.uni-konstanz.de> From: hoehle@inf-wiss.ivp.uni-konstanz.de (Joerg-Cyril Hoehle) To: clisp-list@[129.13.115.2] Subject: (Amiga) CLISP-low is getting bigger and bigger ... Hi, CLISP is growing and growing. On the Amiga, many people with 2MB RAM (standard configuration on an A1200) have difficulties running it, or when they run it, they can't start an editor on top of it. The next version will even make the situation worse because it allows one to switch between french, german and english languages at start, making both C and LISP parts bigger. I wonder if I should make the amiga-clisp-low version of CLISP o english-only o without CLCS \ in the core o without CLOS / CLCS and CLOS would be there loadable as .fas files and thus not in the default .mem file. I consider this for the low version only because I don't want to distribute (and build) lots of different CLISP versions. How do you feel about this? Comments? Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From tomasa@nada.kth.se Wed May 25 03:35:50 1994 Return-Path: Received: from dront.nada.kth.se by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23158; Wed, 25 May 94 03:35:50 +0200 Received: by dront.nada.kth.se (5.61-bind 1.4+ida/nada-mx-1.0) id AA10071; Wed, 25 May 94 03:31:51 +0200 Date: Wed, 25 May 94 03:31:51 +0200 From: tomasa@nada.kth.se Message-Id: <9405250131.AA10071@dront.nada.kth.se> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Joerg-Cyril Hoehle's message of Tue, 24 May 94 20:01:18 +0200 <9405241752.AA18990@inf-wiss.ivp.uni-konstanz.de> Subject: (Amiga) CLISP-low is getting bigger and bigger ... > I wonder if I should make the amiga-clisp-low version of CLISP > ... > How do you feel about this? Comments? Sounds good. However, in my opinion, don't make it an english-only version unless it saves *a lot* of memory. -- Tomas Arvidson /// d91tar@csd.uu.se, /// tomasa@nada.kth.se, tomasa@sprawl.adsp.sub.org \\\/// Expressed opinions are mine unless stated otherwise \XX/ From molloy@mundil.cs.mu.OZ.AU Fri May 27 07:03:07 1994 Return-Path: Received: from mulga.cs.mu.OZ.AU by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA25305; Fri, 27 May 94 07:03:07 +0200 Received: from mundil.cs.mu.OZ.AU by mulga.cs.mu.OZ.AU with SMTP (5.83--+1.3.1+0.50); id AA14882 Fri, 27 May 1994 14:58:42 +1000 (from molloy@mundil.cs.mu.OZ.AU) Received: by mundil.cs.mu.OZ.AU (8.6.8.1) id OAA28846; Fri, 27 May 1994 14:58:41 +1000 From: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) Message-Id: <199405270458.28846@mundil.cs.mu.OZ.AU> Subject: Re: Stack overflow! (fwd) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP mail list) Date: Fri, 27 May 94 14:58:40 EST Cc: molloy@mundil.cs.mu.OZ.AU (Maureen Philomena MOLLOY) X-Mailer: ELM [version 2.3 PL11] > > > Are the two are related? > > I am 90% sure, because I once ported another package to CLISP (I don't > recall which one), it redefined the type CONDITION as well and produced > a stack overflow as well. > > > The first seems to be a compile time warning that the code may > > not do what CLISP expects at run time. > > The compiler must execute, not only compile, DEFTYPE and DEFSTRUCT forms. > The bad effects therefore already occur at compile time. > > > is it simply a matter of enlarging the stack? > > Certainly not. You must have really really deep recurrence to need a larger > stack. > > Bruno Haible > By the look of it we will have to look at what the difference is between the CLISP CONDITION and the redefined CONDITION. Thanks for the help. Maureen. From poirot@mickey.jsc.nasa.gov Wed Jun 1 16:24:07 1994 Return-Path: Received: from mickey.jsc.nasa.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03633; Wed, 1 Jun 94 16:24:07 +0200 Received: from nyssa.jsc.nasa.gov by mickey.jsc.nasa.gov (5.65c/ISL-ser-1.1) id AA03471; Wed, 1 Jun 1994 09:18:02 -0500 Received: by nyssa.jsc.nasa.gov (5.65c/ISL-cli-1.0) id AA02768; Wed, 1 Jun 1994 09:18:27 -0500 Date: Wed, 1 Jun 1994 09:18:27 -0500 From: poirot@mickey.jsc.nasa.gov (Daniel Poirot) Message-Id: <199406011418.AA02768@nyssa.jsc.nasa.gov> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: STDWIN Does anyone have an example of using STDWIN in CLISP with X Windows. Thanks. - dan From lrw@SDSC.EDU Thu Jun 2 19:21:38 1994 Return-Path: Received: from mailserver.sdsc.edu (rosebud.sdsc.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04148; Thu, 2 Jun 94 19:21:38 +0200 Received: from zippy.sdsc.edu by mailserver.sdsc.edu (4.1/4.8) id AA04493; Thu, 2 Jun 94 10:16:16 PDT Received: by zippy.sdsc.edu (5.65/1.10-client) id AA00703; Thu, 2 Jun 1994 10:16:06 -0700 Date: Thu, 2 Jun 1994 10:16:06 -0700 From: lrw@SDSC.EDU Message-Id: <9406021716.AA00703@zippy.sdsc.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Clisp problem -- detecting a function Does anybody know how I can create a conditional statement based on whether a function foo been defined or not? What I want to say: (if (not (function-exists 'foo)) (load "file-containing-foo") ) The problem is: - (functionp 'foo) returns T whether or not the function has been defined, and - (compiled-function-p #'foo) generates an error if foo hasn't been defined. So, - How do I detect if function foo exists? - Or if I can't do that, how do I use clisp to trap the error (ignore-errors and handler-case don't seem to be there)? thanks, Len Wanger -- lrw@sdsc.edu Project Sequoia 2000 San DiEgo Supercomputer Center From buddy@ggt.gsi.com Thu Jun 2 19:52:27 1994 Return-Path: Received: from uu5.psi.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04208; Thu, 2 Jun 94 19:52:27 +0200 Received: from ggt.gsi.com by uu5.psi.com (5.65b/4.0.071791-PSI/PSINet) via SMTP; id AA07722 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Thu, 2 Jun 94 13:46:35 -0400 Received: from kresge.ggt.gsi.com by ggt.gsi.com (16.6/3.2.083191-Gerber Garment Technology) id AA03413; Thu, 2 Jun 94 13:34:38 -0400 Message-Id: <9406021734.AA03413@ggt.gsi.com> Received: by research (1.37.109.4/16.2) id AA18237; Thu, 2 Jun 94 13:41:05 -0400 Date: Thu, 2 Jun 94 13:41:05 -0400 From: Buddy Kresge To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: detecting a function Len, I think FBOUNDP should do the trick for you: (unless (fboundp 'foo) (load "file-containing-foo")) Buddy Kresge Gerber Garment Technology Internet : kresge@ggt.gsi.com Phone : (203) 291-2116 Fax : (203) 282-1500 From haible Fri Jun 3 18:20:19 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05303; Fri, 3 Jun 94 18:20:19 +0200 Date: Fri, 3 Jun 94 18:20:19 +0200 From: haible (Bruno Haible) Message-Id: <9406031620.AA05303@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Clisp problem -- detecting a function > Does anybody know how I can create a conditional statement based on > whether a function foo been defined or not? > (unless (fboundp 'foo) > (load "file-containing-foo")) This is fine for interpreted code, but when compiling files the compiler does not "know" that it should look at "file-containing-foo" as well. Better use PROVIDE and REQUIRE, like this: (eval-when (compile load eval) (when (fboundp 'foo) (pushnew ':HAVE-FOO *features*) ) ) #-HAVE-FOO (require 'module-foo "file-containing-foo") Bruno Haible From puolamak@cc.helsinki.fi Mon Jun 6 14:48:25 1994 Return-Path: Received: from klaava.helsinki.fi by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06717; Mon, 6 Jun 94 14:48:25 +0200 Received: (puolamak@localhost) by klaava.helsinki.fi (8.6.8/8.6.5) id OAA07312 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Mon, 6 Jun 1994 14:51:56 +0300 From: Kai Rainer Puolamaki Message-Id: <199406061151.OAA07312@klaava.helsinki.fi> Subject: Don't want floating point underflows To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 6 Jun 1994 14:51:56 +0300 (EET DST) X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit Content-Length: 254 Hello, CLISP considers floating point underflows to be errors. However, I would like (exp -100) return 0, not "*** - floating point underflow". Is there an easy fix for this? Thanks for your help. Yours, Kai Puolamaki From haible Mon Jun 6 15:19:31 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06799; Mon, 6 Jun 94 15:19:31 +0200 Date: Mon, 6 Jun 94 15:19:31 +0200 From: haible (Bruno Haible) Message-Id: <9406061319.AA06799@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Don't want floating point underflows Kai Puolamaki wrote: > CLISP considers floating point underflows to be errors. However, I > would like (exp -100) return 0, not "*** - floating point underflow". > Is there an easy fix for this? Try this patch (untested) and rebuild clisp from source. (exp -100) should then return 0.0. begin 644 underflow.diff.gz M'XL( .3@\BT ^U=6W/;1I9^GOR*8ZG*(210 < [9"6CF&*B&5G6BO)D4S-3 M7)!LDHA @ 6 MF5'^TNW:E_F-^S3/.SIQAUH\ K*DF)4V22A[M.GS_G.I?LT MB8.# W#LP7<]W;1?WE@F_&5N M1!:JD51:U*7N.#Y$4_0[W6$NOU*K ;E!J[T9 WY>_ >C^ MQ_4-6#9HX-J:Z0R(.22FJQDPFIL#5[=,001W0L FSMQPP;V;$= =&.OOB0G] M._:W]YJM:WV#(+F#]EGG]-W%3;ES\?84_W][_>;TYN (__+-(=Q@VZDVL"WX MY?SFY[?O_%;GES^5K]Z>7]Z4WUVVSZ[QWB\JM@8H?=#=B35WRR/#TES=')=G MEFZZY3GR:..]#_!Y9-G3^P,!FY./9#!'$3&.Z&U'!-H?B&U;M@/6R&,^;TC0 MS8G>UUTR/$)J'7]$8"."-2.V1J7A($W# $O3\RY\&[P30/QSWQK>"4B)_CLN%WNA M'$NZ69YI@UMM3& /V;C:HR ID8\SRW;AVV7($M(DNK]V;\[>>$2&9.3!>"D^ M2R_I-,&;ZR&3VL79#91*2$Y5#\XO?S[_\3S?# [@1O#Z46NXNG[[TV4H.7:7 MOM!_A0LPAKH!HMYU[J9'0P]T-Y,Y\U4('Z6B5IMJ54F"+NJ0PEQ55FNU?,S) MBM(49:420UUPJQK@CFJR^^N;$K6CF;AW\^O5V=6>:.C.3(!]T P'.G/SEEHJ MC/YMP]7U69NVB?5TYGV_<_?=C_'^L3:H8-JFAVC1J"[%/71KM&WY[#^O3JEV M]D3G#JU]&HQZ95,7X=ZA$X@&/0P)^KZE%P"EQX#2"X$B[BW'0GK(O_E>EPY) MQSF]/K^)S6&FBWM7YTG9+.EBSJ=].MG+=V]^I%.,=[VYFS&)NS MTXLE70)$(1=#,C "0/U"AM F U 8H"H-M<*"7R4$5-@^C:>&6E/R\52M2&*U M$@M]WHU6Y,.B2SCV;]Q[H6H?NBXQ,."-B..*8/7#B%"^8C;^SG2);6CS$;"7 MOHM1T64=0Z7V, )8'\BPY!GK/J)*-PGO[P#_\*T<=6 8LU+W;MJWC-Y[S9B3 M4GRC'LO]VJ@\% 9N/ MR,0@=B3GDG ,]R$YB)'[/D-NHH\G.?2L]WQR";Y!Z(G*()OJO1+$B M("@C5UB9',#O2,YA])C,!7@)'Q"8I?>6_:E'$6H)R\C% M/_T><%_TC[F(H_G$XFCC.2A\%<%+N)F4O\!%.0#J2J)KM-W=H?PG\5YZAXN4)#DL2&5 ^R!?^B\#18 M\C)"@.;@$ED)G=?W)V"6I]CV+3JOL4W,3P1^B,LP![;[4,8^_BW^^*%JDOZI MK"08>,48.%2P.7.;(0\O.#RDW!!CXEUP[YM8^_>:#389UP)W_DEC!([C,_/; MU(,VR(Z9:I(0YPG$T'*H""Q^-*2FV)";J63XN:HA+Y*DW/BJ"DOUHKXN2\FY MU6?=F]/7?RTI2,/?*?(#0[SU_8/K/U@;C!:M#1JJU$RN#48Y:X.F*B]8ABDM ML2I':X.-,I!]N-5,$WYZC8T=X_\<8O+2DLZV:4DGPENG@)5 )V8^?'HKK@00 MK@/-)3U/ ;#BE8J-)<87C21!C*-QI"+STJE]^!N&/J(/)L3DD6/Q*0Q,+.;% M)DA#42<6G^+FRN4N02X1YCJI,.=S]P;OZ4X\P=AQKJZ/$&K0.>W>]-@&#;,) MBNQ6E((_161S)KY9 KZ(CD=KM81\&9WUTLI%_"1MK).3L"^BLTX"GT]GTQFE MZ:SG@O+IK)?P[WY>V_G"HIQ@4=ZO*+=7E+];ZNAX(;TNB^E M=IEPD@P)/=>B;A*U8(O!'DB$&]$;( "T_]&9]TW+GFJ&_SG:CT].2 S92WA: MFH=Y,/Q-,^<.]'#<8_;_T50;3) U;\<65T2,KX2>HO4>,US6"QL9^D!W8S#P M%XV'"42D(8( .<%5%X4:.9'@!XX73TUP57"DDEKX_?> 5"@[>/D27J0G@#8@ M^TP)63(KQ \N-\G/^;EZQ!L&3QM,:S"!6P-7JL2.I_%%!1=N;$D!, PP^W#X M79FMD)$5^L(ELT5HB7M@!JTD]*D*D^CF:R,M;=1RJ53Z[X2:A:V JM1J*:C" MIM!(LAM'/-JLQWH&GZ6*4D[P%L$U2?HS!)(*\(4.2*0E+@NZNCF>&YJMN_]R MJ4+WVMC4H>7'X=Q&U$E[J0DRB.U#X/[6F6"<#)W@BTT4F\5J>G(!:R*DY[* M3&&6D[-9$#$5[!GDD2G(FA&J0&PLK;L]'#8^FXM;Y(A6W#K_B-DQ4W&@=C9Y\A#H]^:A4 M5:F:K+@%S>,5-UE2I9I:67#FOU83ZXT'J;BUMZU+M".\M0NHN+5CYL.GMV;% M;;A]Q:U>36XVURM;5=PH.6_/N9W<2%5N17]9 ME*,LRD,6Y1IW497;V!EREP+51.5N=\YQ&9=?DP1ZK5F19E4EBC7:O%:5WP1_04-+WYL98>&=^20Z41?;'XL5>"D#X\TAOA3VL69TH"S MY.="H+[K)4RZ;-Q>?I@D0ZS0)>&IV9RJRH,=U^06_)[PJ=EV]M2L7*M31223 MP6>LB$=S;K;]1<[-MOGG9HV\<[-R597JJE1+GIL-FJ?.S2J-A;]BV6C(8J,I MI2P^=MUB,J^;;MO1/Y&#VV->F\_^E&6@%;L+F",6L-?-A%QXKNI.*'^/]RQN M;_K]>\R:+T(TG9S(&'%+D3^!V7:)^'2][9:6 MHF'#E($KSOO,$/?>CUQG==X9=/<4&10X4/ND*0Q?4)K9;8E)KY/B%R\,2$^10< MS%=,G0S13Q%3?23 '**VTI!7SU& M\BH$:#R/T6R@QVC6DAZ#$I;] 60X9*]*-$J@*IFF0.QO<7WMPRW]EQ]810PEW58#AO).".]#VPLT@70BD[(DV_#^7\D[2^939; M8DN2DI;YI02465.OFG]#/M:S+7-L-('M") ?943D$J@G%^]?2)L\^+>DFMB2 MT\MF;]Q]=+&.2\ \E*&MCW77H8Y7AA]U7!IH@PD8NGGK@#.8Z*3/<<+L=VUE M@XQP?6!9L][0^F"67B++,]?^N_Q/D2X:9"%CO E//R0#FTSQO4YL.D1**VQO M,>L;!,3MR0E$P"G+*X:\Q,= #__RQCARY XX3D]/EO,RR?50<[6_2__TOA/54B2Q%3]^]&R5DK6R MM4P:UK%JR#5L6"]N90@\-@QQ#;U1$5N-5MK0%[BBSRDO7_:]?.BCTCNY@>M. M^2BFZ7+DL/*_"I(08SK$1 2.N?SOP^7VM.AVKT3N7K!4HU\'J?%6@?_>"HMQQ %EL*?Z&^ Q8?"DNI'WS/ MD0 WLBHUEJTM4EKV%Z$?5&DMI8DLIG_+9'B[M=K9E,^'EC\[?7%+TOU%HUC.59#)P#T&U[^GAU].9P/B>%J MM2 M\-_N>R=N@J5)])BW'S(DZ47//?D[=?%-EQ05^#3WCN]PB:R1?2'AWS2OON>S ME2'8MXEV2W-'ASZ%$=[^-=5B2$;:W'!5H ^JFVETT4!9/4>"8V)SY?;B&M,K M<^[,2IZ0>%N)GR'8&U#SJJBL,Q7%V+;^ET,B-X\,9:#F2B6DS<2<(!ZO62;V M;U][7X3#U6=\"_>CEY[&711]HDUXX,"K+);\KB)5OGC=HWX.NPI4\":9XY+L MPC+'_G.W_#2KB?#,L\LG!L^QY5J16H[_\+#, #!W.W[E78CUMB$6[$,DROMT M'X;?"G*6:_YJ+8SO?2E6I]^'J'-347-^69KJ KS.]U_%^ MM+;7P(=>.X%S]HN=6D7D;8Y#"FO^E1A]00NSR]BY9(L\:6/'!610HS! ,1(#^?QF6[UKH? end Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From cgraham@hookup.net Tue Jun 7 05:04:16 1994 Return-Path: Received: from nic.hookup.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07196; Tue, 7 Jun 94 05:04:16 +0200 Received: from cgraham.hookup.net (cgraham.hookup.net [199.0.21.204]) by nic.hookup.net (8.6.9/1.174) with SMTP id WAA06952; Mon, 6 Jun 1994 22:57:54 -0400 Message-Id: <199406070257.WAA06952@nic.hookup.net> X-Sender: cgraham@hookup.net Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Mon, 06 Jun 1994 22:54:28 -0400 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de From: cgraham@hookup.net (Christopher H. Graham) Subject: Editing under OS/2... some answers please. X-Mailer: What is the effect of the (ed) function supposed to be in CLISP under OS/2 2.1 ? (ed) appears to run my editor (EPM.EXE), monitor the temporary .lsp file 'lisptemp.lsp' for the EOF condition, and then load the revised code. If, for example, I edit a function 'fun' with (ed #'fun), the definition of (fun) is never updated. Another, different, problem: changing 'config.lsp' (as I recall this is the name of the CLISP basic configuratin file) to specify the OS/2 editor ED.EXE, simply results in NIL being returned when (ed) is invoked. What's going on here? Another, different, problem: occasionally, when using EPM.EXE as my editor, the call to (ed) will fail because EPM.EXE cannot allocate a Presentation Space handle. Any ideas vis a vis CLISP ? Thank-you for any assistance... Chris Graham, VisualAge Software Consulting From d791013@ce.ntu.edu.tw Thu Jun 9 06:15:35 1994 Return-Path: Received: from jupiter.ce.ntu.edu.twce.ntu.edu.tw (jupiter.ce.ntu.edu.tw) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10444; Thu, 9 Jun 94 06:15:35 +0200 Message-Id: <9406090415.AA10444@ma2s2.mathematik.uni-karlsruhe.de> Received: by jupiter.ce.ntu.edu.tw (16.6/15.6) id AA02247; Wed, 8 Jun 94 20:07:26 -0600 From: Chun-Yu Lee Subject: file-position function To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP list forum) Date: Wed, 8 Jun 94 20:07:25 MDT Mailer: Elm [revision: 66.25] Dear clispers, When I use the file-position function, there seems to be something different from the description in CLtR. In CLtR, the usage for file-position is: file-position file-stream [position] and if the "position" argument is specified, the position is set to its value and "t" is returned. A value of nil is returned if the file position cannot be set to the value specified by "position". However, the following results show the difference, where the file "foo" contains only ten characters, i.e. "1234567890": > (setq in (open "foo")) # > (read in) 1234567890 > (file-position in) 10 > (read in) *** - READ: input stream ... has reached its end > (file-position in 0) T > (file-position in 10) T > (file-position in 11) *** - connot position # beyond EOF 1. Break> Is there something wrong with the usage? I'd like that it returns the nil when the file position cannot be set. Sincerely yours, Chun-Yu Lee. E-mail: d791013@ce.ntu.edu.tw From haible Thu Jun 9 16:07:44 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11349; Thu, 9 Jun 94 16:07:44 +0200 Date: Thu, 9 Jun 94 16:07:44 +0200 From: haible (Bruno Haible) Message-Id: <9406091407.AA11349@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: file-position function Chun-Yu Lee says: > > (file-position in 11) > *** - cannot position # beyond EOF > Is there something wrong with the usage? I'd like that it returns the nil > when the file position cannot be set. CLtL2 (p. 656) and dpANS (23.3.0.18) specify that "If the integer is too large or otherwise inappropriate, an error is signaled." A value of NIL would be returned if the new position were valid but could not become the file's position for some other reason. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From aaronn@LINFIELD.EDU Wed Jun 15 21:23:30 1994 Return-Path: Received: from LINFIELD.EDU (calvin.linfield.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17723; Wed, 15 Jun 94 21:23:30 +0200 Received: by LINFIELD.EDU (5.65/1.35) id AA02537; Wed, 15 Jun 94 12:15:48 -0700 Date: Wed, 15 Jun 1994 12:15:47 -0700 (PDT) From: Aaron Neerenberg Subject: trouble compiling clisp To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I am trying to compile clisp on a tektronix xd88/30 workstation m88k, running utek3.2e (equiv system V release 4 but have been getting the following errs and have not been able to figure out why $make interpreted.mem ./lisp.run -m 750KW -x "(load \"init.lsp\") (sys::%saveinitmem) (exit)" i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I I I I I I I 8 8 8 8 8 8 I I I I I I I 8 8 8 ooooo 8oooo I \ `+' / I 8 8 8 8 8 \ `-+-' / 8 o 8 8 o 8 8 `-__|__-' ooooo 8oooooo ooo8ooo ooooo 8 | ------+------ Copyright (c) Bruno Haible, Michael Stoll 1992, 1993, 1994 ;; Loading file defseq.lsp ... ;; Loading of file defseq.lsp is finished. ;; Loading file backquot.lsp ... ;; Loading of file backquot.lsp is finished. ;; Loading file defmacro.lsp ... ;; Loading of file defmacro.lsp is finished. *** - EVAL: variable VARCLAUSELIST has no value *** - EVAL: undefined function %SAVEINITMEM Bye. mv lispinit.mem interpreted.mem *** Error code 1 $mv: lispinit.mem: no such file $ thank you, Aaron Neerenberg, Computing Science, Linfield College, aaronn@calvin.linfield.edu aaronn@sisters.cs.uoregon.edu From haible Wed Jun 15 22:24:49 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17959; Wed, 15 Jun 94 22:24:49 +0200 Date: Wed, 15 Jun 94 22:24:49 +0200 From: haible (Bruno Haible) Message-Id: <9406152024.AA17959@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: trouble compiling clisp > ;; Loading of file defmacro.lsp is finished. > *** - EVAL: variable VARCLAUSELIST has no value The following patch (requires clisp-1994-01-25) fixes it. It will be in the next release. *** src/lispbibl.d.orig Thu Jan 27 13:13:41 1994 --- src/lispbibl.d Wed Feb 2 17:30:23 1994 *************** *** 6960,6965 **** --- 6960,6966 ---- #endif #if defined(M88000) #define mv_count_register "%r15" # eines der allgemeinen Register %r14..%r25 + #define NEED_temp_mv_count #endif #if defined(DECALPHA) #define mv_count_register "$10" # eines der allgemeinen Register $9..$14 *************** *** 6981,6986 **** --- 6982,6988 ---- #endif #if defined(M88000) #define value1_register "%r16" # eines der allgemeinen Register %r14..%r25 + #define NEED_temp_value1 #endif #if defined(DECALPHA) #define value1_register "$11" # eines der allgemeinen Register $9..$14 Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From philpot@ptolemy.arc.nasa.gov Fri Jun 17 01:48:50 1994 Return-Path: Received: from ptolemy.arc.nasa.gov (ptolemy-fddi1.arc.nasa.gov) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA19116; Fri, 17 Jun 94 01:48:50 +0200 Received: from kepler.arc.nasa.gov by ptolemy.arc.nasa.gov (4.1/) id for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Thu, 16 Jun 94 16:39:27 PDT Date: Thu, 16 Jun 94 16:39:27 PDT From: Andrew Philpot Message-Id: <9406162339.AA24928@ptolemy.arc.nasa.gov> Received: by kepler.arc.nasa.gov (4.1/SMI-4.1) id AA16229; Thu, 16 Jun 94 16:39:25 PDT To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Changing the CLISP prompt Hi. Is is possible (without rebuilding from source - I don't have any C compiler) to change the lisp prompt in CLISP? I would like to make it print the name of the package. Instead of > I would like to make it look more like USER> In Allegro CL, with which I have more familiarity, I might have done something more like (this is not exactly correct): (setq *prompt* #'(lambda () (format nil "~A>" (package-name *package*)))) Has anyone done something like this? I tried to look through the (lisp) source but didn't find anything likely. Thanks. Andrew From donc@ISI.EDU Fri Jun 17 02:04:27 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA19183; Fri, 17 Jun 94 02:04:27 +0200 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Thu, 16 Jun 1994 16:56:25 -0700 Date: Thu, 16 Jun 94 16:55:48 -0700 Posted-Date: Thu, 16 Jun 94 16:55:48 -0700 Message-Id: <9406162355.AA06882@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Thu, 16 Jun 94 16:55:48 -0700 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: philpot@ptolemy-ethernet.arc.nasa.gov Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp top level My experience is that it's a lot easier to write your own top level than it is to change the one clisp provides. The only thing I'd call a "trick" is that you want to put the read-eval-print inside an unwind-protect that goes back to the top of the loop (so that aborts from errors won't leave it) - UNLESS the last thing eval'ed was supposed to exit lisp - otherwise it's hard to get out! The top level I have also does things like keep a history, allowing you to review or redo events or refer to the values returned, and also an error catcher that asks whether you want to abort (before it messes up the screen). It's also a lot easier to use other streams with your own top level - I had lots of trouble trying to change *standard-input* and *standard-output* with the standard top level. From haible Fri Jun 17 14:52:29 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA19914; Fri, 17 Jun 94 14:52:29 +0200 Date: Fri, 17 Jun 94 14:52:29 +0200 From: haible (Bruno Haible) Message-Id: <9406171252.AA19914@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Changing the CLISP prompt Andrew Philpot writes: > Is is possible (without rebuilding from source - I don't have any C > compiler) to change the lisp prompt in CLISP? > I would like to make it print the name of the package. Yes, this is possible. Search for the string "> " in user1.lsp, replace it by what you want, compile user1.lsp and load user1.fas. You can rebuild lispinit.mem using the SAVEINITMEM function, need no C compiler for this. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From kovach@franus.edu Tue Jun 21 16:33:03 1994 Return-Path: Received: from ns.oar.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28934; Tue, 21 Jun 94 16:33:03 +0200 Received: from a.franus.edu for kovach@franus.edu by ns.oar.net (PIPE/8.6.8.1/931123.1402) id KAA06844; Tue, 21 Jun 1994 10:23:54 -0400 X-Mailer: InterCon TCP/Connect II 1.1 Message-Id: <9406211043.AA31847@a.franus.edu> Date: Tue, 21 Jun 1994 10:43:31 -0500 From: "Edward G. Kovach" To: haible@ma2s2.mathematik.uni-karlsruhe.de Cc: kovach@franus.edu Subject: code 26 error Dear Bruno, My mail software does not allow me to send to "broadcast lists" so I can't send this to clisp-list as I originally planned. I've just down loaded and installed clisp. I'm having problems loading some programs. When I tried loading LATKDATA.LSP in get the message: READ from #: illegal character #\code 26 1. What reference would have the clisp error codes listed? 2. I assume that the prgram contains an illegal character or string. Am I right? 3. I ran the program on a Sun work station using ALLEGRO COMMON LISP. Assuming I'm right in #2, how should I go about looking for the illegal characters? Is there anything in particular I should look for? Thank you for your time. I will try again to post this to clisp-list, but I need to get the program working as soon as possible so I'm writing to you first in case I can't get around the software problem here. Ed Kovach - kovach@franus.edu From marcus@ee.pdx.edu Tue Jun 21 17:08:26 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29079; Tue, 21 Jun 94 17:08:26 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA05210; Tue, 21 Jun 94 08:01:23 PDT Date: Tue, 21 Jun 94 08:01:23 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9406211501.AA05210@ursula.ee.pdx.edu> To: clisp-list Cc: kovach@franus.edu Subject: code 26 error In-Reply-To: <9406211043.AA31847@a.franus.edu> References: <9406211043.AA31847@a.franus.edu> >>>>> "Edward" == Edward G Kovach writes: Edward> When I tried loadin LATKDATA.LSP in get the message: Edward> READ from #: Edward> illegal character #\code 26 Looks like a (DOS) end-of-file character (control-Z). From haible Wed Jun 22 17:10:49 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04849; Wed, 22 Jun 94 17:10:49 +0200 Date: Wed, 22 Jun 94 17:10:49 +0200 From: haible (Bruno Haible) Message-Id: <9406221510.AA04849@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: New version of old CLISP I am making available my current personal source of CLISP. It is in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source-haible/clispsrc.tar.z. Active development of CLISP is done by Marcus Daniels . Please send suggestions for improvement to him (to me as well, if you like). I expect he will make a new release of CLISP soon. His version of CLISP will certainly be more portable, easier to port and have more distinguished features (like a foreign function interface). But if you are already familiar with installing CLISP and only want a source with all currently known bugs fixed, you may try the one in source-haible/. Change log since 8 January 1994: 22 June 1994 ============ User visible changes -------------------- * French support is now complete. Thanks to Joerg Hoehle. * The user interface language (english, german or french) can now be chosen at startup time through a command line option. The constant *LANGUAGE* has been removed, and its value has been removed from *FEATURES*. New macros ENGLISH, DEUTSCH, FRANCAIS and LANGUAGE-CASE. * There is a command line option that makes CLISP behave more like what ILISP (a popular Emacs LISP interface) expects. Thanks to Marcus Daniels. * The function CLOS:CALL-NEXT-METHOD can now be called with arguments, but the check that the set of applicable methods must be the same as for the original arguments will be bypassed. * New functions READ-CHAR-SEQUENCE, WRITE-CHAR-SEQUENCE, READ-BYTE-SEQUENCE, WRITE-BYTE-SEQUENCE which perform fast block I/O. * Errors of type FLOATING-POINT-UNDERFLOW are inhibited in floating point computations (and zero is returned instead) during execution of the new macro WITHOUT-FLOATING-POINT-UNDERFLOW. * X3J13 vote <95> is implemented: If the readtable argument passed to GET-MACRO-CHARACTER and GET-DISPATCH-MACRO-CHARACTER is NIL, the standard readtable is used. * PROBE-FILE doesn't report an error any more if an intermediate directory in the path doesn't exist. NIL is returned instead. * The DEFCONSTANT warning about redefinition of a constant is inhibited if the constant's new and old values are the same (in the sense of EQL). Thanks to Marcus Daniels. * The function INTERACTIVE-STREAM-P knows that if the terminal stream is referring to a regular file (via input redirection) it is not interactive. * There is a user programmable kind of streams, called generic streams. New functions MAKE-GENERIC-STREAM, GENERIC-STREAM-CONTROLLER, GENERIC-STREAM-P, GENERIC-STREAM-READ-CHAR, GENERIC-STREAM-READ-BYTE, GENERIC-STREAM-LISTEN, GENERIC-STREAM-WRITE-CHAR, GENERIC-STREAM-WRITE-BYTE, GENERIC-STREAM-WRITE-STRING, GENERIC-STREAM-CLEAR-INPUT, GENERIC-STREAM-CLEAR-OUTPUT, GENERIC-STREAM-FINISH-OUTPUT, GENERIC-STREAM-FORCE-OUTPUT, GENERIC-STREAM-CLOSE. See impnotes.txt for details. Thanks to Marcus Daniels and Don Cohen. * The macro WITH-OUTPUT-TO-PRINTER may now also work on OS/2. * Fixed a CLOS bug: Generic functions with both optional and keyword arguments didn't work. * Fixed a serious bug in the compiler which caused incorrect code to be generated for functions like (LAMBDA (X) (SETQ X 1)). * Fixed a serious bug in the compiler which caused the compiler to crash when compiling functions which contain two or more calls to ASSERT. * Fixed a bug: The macroexpander of MULTIPLE-VALUE-SETQ built up a syntactically illegal form. * Fixed a bug in the reader: When reading pathnames from the syntax #S(PATHNAME ...), #n# references in pathname components were not resolved prior to calling MAKE-PATHNAME. * Fixed a bug in the reader: (read-from-string "1/") signalled an error of type DIVISION-BY-ZERO. * Fixed a bug in the terminal stream: If several consecutive READ-LINE operations on the terminal stream were performed without any text containing newlines being output between them, the prompt finally got duplicated and then became longer and longer. * Fixed a bug in the readline library (bad handling of prompts longer than one line). Thanks to Marcus Daniels. Installation ------------ * All non-Unix versions: Setting the local time zone should now be much easier. 122 time zone names are supported. Portability ----------- * Unix version only: Getting the time zone should be more robust. * Added support for NeXT (68k or i386 CPU) running NeXTstep 3.2. Thanks to Marcus Daniels. * Added support for Sequent PTX. Thanks to Marcus Daniels. * Added support for m88000 running DG/UX. Thanks to Pat McClanahan. * Added support for UnixWare. Thanks to Alexander Adam. * Added support for BSDI/386. Thanks to Atsuo Ohki. * More support for WATCOM C on DOS. Thanks to Blake McBride. * More support for IRIX 5. Thanks to Bjorn Remseth. * More support for Sun4m. Thanks to Neil Faulks. * Better support (speedup) for HP 9000/800 running HP-UX. * On HP 9000/700 running HP-UX: Don't depend directly on the assembler. * Maybe some support for SCO. Thanks to Cathy Bareiss. Other modifications ------------------- * Speedup SUBLIS and NSUBLIS. * Let all known versions of gcc2 emit dbra instructions for loops. Thanks to Joerg Hoehle. * Renamed condition.lsp to conditio.lsp. * Miscellaneous documentation updates. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From goodwin@world.std.com Thu Jun 23 04:18:44 1994 Return-Path: Received: from ftp.std.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05499; Thu, 23 Jun 94 04:18:44 +0200 Received: from world.std.com by ftp.std.com (8.6.8.1/Spike-8-1.0) id WAA06423; Wed, 22 Jun 1994 22:09:39 -0400 Received: by world.std.com (5.65c/Spike-2.0) id AA17049; Wed, 22 Jun 1994 22:09:33 -0400 Date: Wed, 22 Jun 1994 22:09:33 -0400 From: goodwin@world.std.com (Jim W Goodwin) Message-Id: <199406230209.AA17049@world.std.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: NOEMS and DOS I am relatively new to PC computing and have a Pentium running Windows for Workgroups 3.11 and DOS 6.2. I am able to run CLISP by using SYSEDIT to remove the symbol NOEMS from my CONFIG.SYS but I have some newbie questions. Do I have to edit this and reboot every time I switch between CLISP and the rest of my world? I can see that removing NOEMS causes some DOS programs (Chessmaster 3000, actually) to work differently, run slower, and crash. Will it similarly affect Windows programs? In short, what is the most convenient setup? Thanks, Jim Goodwin From marcus@ee.pdx.edu Thu Jun 23 04:36:21 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05561; Thu, 23 Jun 94 04:36:21 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA08731; Wed, 22 Jun 94 19:29:03 PDT Date: Wed, 22 Jun 94 19:29:03 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9406230229.AA08731@ursula.ee.pdx.edu> To: clisp-list Subject: NOEMS and DOS In-Reply-To: <199406230209.AA17049@world.std.com> References: <199406230209.AA17049@world.std.com> >>>>> "Jim" == Jim W Goodwin writes: Jim> Windows for Workgroups 3.11 and DOS 6.2. Jim> I am able to run CLISP by using SYSEDIT to remove the symbol Jim> NOEMS from my CONFIG.SYS but I have some newbie questions. Since you are using Windows, I'd suggest trying the RSX extender (this is briefly discussed in the Windows installation instructions in the `README'). RSX will run the EMX binaries you have, but without needing EMS emulation -- saving you precious lower memory space which would otherwise be used for page-frames. From tara@genome1.hgen.pitt.edu Thu Jun 23 16:50:15 1994 Return-Path: Received: from genome1.hgen.pitt.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06054; Thu, 23 Jun 94 16:50:15 +0200 Message-Id: <9406231450.AA06054@ma2s2.mathematik.uni-karlsruhe.de> Received: by genome1.hgen.pitt.edu (16.8/16.2) id AA00813; Thu, 23 Jun 94 10:44:08 -0400 From: Tara Cox Matise Subject: system::default-time-zone To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 23 Jun 94 10:44:07 EDT Mailer: Elm [revision: 70.30] I am running CLISP on a Sun, Dec and HP. The system::default-time-zone returns different values depending on which machine I am on. It is incorrect on 2 of the 3 machines. Thus, when I output the starting time of a run, using (decode-universal-time), the time is wrong on these 2 machines. Does anyone know how I can fix this? Thanks, Tara -- Tara Cox Matise,Ph.D. Department of Human Genetics University of Pittsburgh tara@genome1.hgen.pitt.edu From kovach@franus.edu Thu Jun 23 19:52:10 1994 Return-Path: Received: from ns.oar.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06251; Thu, 23 Jun 94 19:52:10 +0200 Received: from a.franus.edu for kovach@franus.edu by ns.oar.net (PIPE/8.6.8.1/931123.1402) id NAA17653; Thu, 23 Jun 1994 13:42:46 -0400 X-Mailer: InterCon TCP/Connect II 1.1 Message-Id: <9406231345.AA06617@a.franus.edu> Date: Thu, 23 Jun 1994 13:45:06 -0500 From: "Edward G. Kovach" To: kovach@kahane.cogsci.uiuc.edu Subject: no trace in dribble Hi, I'll doing some debugging and am trying to save the output of my trace function into a dribble file. The output of the trace function won't go into the dribble file. Is there any way I can make it? If not is there any way I can save "tracing" of the program runs so I can study them? I'm running clisp on an IBM PS/VP under windows. Thanks in advance Ed Kovach kovach@franus.edu From aaronn@LINFIELD.EDU Mon Jun 27 18:26:54 1994 Return-Path: Received: from LINFIELD.EDU (calvin.linfield.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08701; Mon, 27 Jun 94 18:26:54 +0200 Received: by LINFIELD.EDU (5.65/1.35) id AA05086; Mon, 27 Jun 94 09:17:17 -0700 Date: Mon, 27 Jun 1994 09:17:17 -0700 (PDT) From: Aaron Neerenberg Subject: stdwin (under x11) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Could be that I just didn't read as closely as i should have, but how does one call xlib and stdwin functions from within clisp? From haible Mon Jun 27 18:58:08 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08801; Mon, 27 Jun 94 18:58:08 +0200 Date: Mon, 27 Jun 94 18:58:08 +0200 From: haible (Bruno Haible) Message-Id: <9406271658.AA08801@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: stdwin (under x11) Aaron Neerenberg asks: > Could be that I just didn't read as closely as i should have, but > how does one call xlib and stdwin functions from within clisp? The STDWIN functions are present in the STDWIN package (but not exported, I think) if you built clisp using the --with-stdwin option. You cannot access Xlib function since the purpose of STDWIN is to hide the underlying X11. If you want to use the X11 protocol directly, either use CLX or write a foreign function interface to the Xlib (not easy)... Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From jbeaudoi@lismips.sobeco.com Tue Jun 28 19:34:18 1994 Return-Path: Received: from netserv.sobeco.com ([142.77.250.5]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09734; Tue, 28 Jun 94 19:34:18 +0200 Received: from lismips.sobeco.com by netserv.sobeco.com(5.65+/IDA-1.3.5) with SMTP id AA07501; Tue, 28 Jun 94 13:24:05 -0400 Received: by lismips.sobeco.com(5.65+/IDA-1.3.5) id AA26464; Tue, 28 Jun 94 13:24:01 -0400 Date: Tue, 28 Jun 94 13:24:01 -0400 From: "jc.beaudoin" Message-Id: <9406281724.AA26464@lismips.sobeco.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Bruno Haible's message of Wed, 22 Jun 94 17:12:58 +0200 <9406221510.AA04849@ma2s2.mathematik.uni-karlsruhe.de> Subject: New version of old CLISP I am trying to use the June 22 version of CLISP on my UnixWare (1.1) machine and I have the impression I ran into a bug. The compilation/installation went smoothly. I used the recommended CFLAGS as given in unix/PLATFORMS. "make test" and "make testsuite" reported everything ok. But when I try to compile CLX I get the following message: *** - Lisp stack overflow. RESET "make clx" completes without further problem and produces the expected files. But running the CLX demos never get to any result visible on the screen and end with the same message: *** - Lisp stack overflow. RESET Does anybody know what's wrong? Should I go back to a previous version of CLISP? Thanks for your help. Jean-Claude Beaudoin Sobeco Ernst & Young, division MultiLIS email: jbeaudoi@sobeco.com 505 boul. Rene-Levesque ouest tel: (514) 878-9090 ext.352 Montreal, Canada, H2Z 1Y7 fax: (514) 875-2673 From haible Tue Jun 28 20:14:59 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09841; Tue, 28 Jun 94 20:14:59 +0200 Date: Tue, 28 Jun 94 20:14:59 +0200 From: haible (Bruno Haible) Message-Id: <9406281814.AA09841@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: New version of old CLISP and CLX Jean-Claude Beaudoin reports: > But when I try to compile CLX I get the following message: > *** - Lisp stack overflow. RESET > "make clx" completes without further problem and produces the expected files. You may be using a version of CLX that hasn't been properly ported to CLISP. With clisp-1994-06-22 on a Sun4 and CLX from ma2s2.mathematik.uni-karlsruhe.de: /pub/lisp/clisp/packages/clx.sept92f.clisp.tar.z "make" succeeds without any problems. > I am trying to use the June 22 version of CLISP on my UnixWare (1.1) machine > The compilation/installation went smoothly. I used the recommended CFLAGS > as given in unix/PLATFORMS. "make test" and "make testsuite" reported > everything ok. You may save other people the same work: finally do a "make distrib" and upload the UnixWare binaries to ma2s2.mathematik.uni-karlsruhe.de. I can tell you details. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From jbeaudoi@lismips.sobeco.com Tue Jun 28 22:01:54 1994 Return-Path: Received: from netserv.sobeco.com ([142.77.250.5]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09957; Tue, 28 Jun 94 22:01:54 +0200 Received: from lismips.sobeco.com by netserv.sobeco.com(5.65+/IDA-1.3.5) with SMTP id AA23099; Tue, 28 Jun 94 15:51:48 -0400 Received: by lismips.sobeco.com(5.65+/IDA-1.3.5) id AA13155; Tue, 28 Jun 94 15:51:47 -0400 Date: Tue, 28 Jun 94 15:51:47 -0400 From: "jc.beaudoin" Message-Id: <9406281951.AA13155@lismips.sobeco.com> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: Bruno Haible's message of Tue, 28 Jun 94 20:17:25 +0200 <9406281814.AA09841@ma2s2.mathematik.uni-karlsruhe.de> Subject: New version of old CLISP and CLX > You may be using a version of CLX that hasn't been properly ported to > CLISP. With clisp-1994-06-22 on a Sun4 and CLX from > ma2s2.mathematik.uni-karlsruhe.de: > /pub/lisp/clisp/packages/clx.sept92f.clisp.tar.z > "make" succeeds without any problems. I'm quite sure it is precisely that version I use, but I'm not currently infront of my machine so I cannot garantee. Thanks for all the details you sent me I'll check all that asap. Could tell me the more precise meaning of the message "*** - Lisp stack overflow. RESET"? > Can you please do a "make distrib" (examine the top of the makefile again before > this, because you need GNU tar!) and upload the resulting tar.z file > to ma2s2.mathematik.uni-karlsruhe.de:/secret/incoming/ ? I will then move > it to the clisp/binaries/ hierarchy. Thanks in the name of the other > UnixWare users. I'll do that tonight. Jean-Claude From ritter@psychology.nottingham.ac.uk Wed Jun 29 14:45:54 1994 Return-Path: Received: from nz11.rz.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10521; Wed, 29 Jun 94 14:45:54 +0200 X400-Received: by mta nz11.rz.uni-karlsruhe.de in /PRMD=uni-karlsruhe/ADMD=d400/C=de/; Relayed; Wed, 29 Jun 1994 14:35:37 +0200 X400-Received: by /PRMD=dfnrelay/ADMD=d400/C=de/; Relayed; Wed, 29 Jun 1994 14:36:42 +0200 X400-Received: by /PRMD=uk.ac/ADMD= /C=gb/; Relayed; Wed, 29 Jun 1994 14:34:18 +0200 X400-Received: by /PRMD=UK.AC/ADMD= /C=GB/; Relayed; Wed, 29 Jun 1994 14:33:43 +0200 Date: Wed, 29 Jun 1994 14:33:43 +0200 X400-Originator: ritter@psychology.nottingham.ac.uk X400-Recipients: non-disclosure:; X400-Mts-Identifier: [/PRMD=uk.ac/ADMD= /C=gb/;sun2.mhs-r.927:29.05.94.12.34.18] X400-Content-Type: P2-1984 (2) Content-Identifier: late advertis.. Alternate-Recipient: Allowed From: "Frank E. Ritter" Sender: ritter@psychology.nottingham.ac.uk Message-Id: <"20939 Wed Jun 29 13:34:28 1994"@mhs-relay.ac.uk> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: ritter@psychology.nottingham.ac.uk Subject: late advertisement: Summer job Source-Info: From (or Sender) name not authenticated. We just got this at the time our students are taking off. Europeans are much easier to hire, but others will be considered. Cheers, Frank JOB TITLE. Research assistant (RA), summer. PURPOSE OF JOB. A new project funded by the DRA will look at understanding how decisions can be learned and made rapidly in an interactive, changing environment. This understanding will be summarised by creating a user model that interacts with an Air-Traffic Control (ATC) simulation. The successful candidate will assist or work alone to create the model, the ATC simulation, and their interface. Later stages of the project will look at how the interface can be modified to support the task, including the possibility of including the user model that can serve as an aid to the user themselves. RESPONSIBILITIES. To the limit of their ability the RA will be the primary architect of and program the cognitive model, the ATC simulation, and the interface that allows the model to 'see' the simulation and interact with it. The initial task this summer will be to create the simulation and interface to the cognitive model. The successful candidate will be a team player, helping out in other ways, such as running subjects. The most desirable candidate will fluent in one or more of the following languages and systems: Emacs; Lisp; Production systems, including OPS5 and Soar or ACT-R; C, C++, cT, and S.; Unix, DOS, Windows, and the Macintosh operating systems. RELATIONSHIPS. The RA (research assistant or associate) will work closely with Dr. Frank Ritter and be supervised by him (if appropriate) in creating the software. SALARY AND CONDITIONS OF SERVICE. This summer position will start on approximately 1 July (or as soon as possible) and end on approximately 10 October, 1994. Payments will be made on the appropriate research council pay scales. For further information, or to apply (by forwarding a CV and names of two references), please contact Dr. Frank Ritter, Dept. of Psychology, U. of Nottingham, Nottingham, NG7 2RD. (602) 515 292. From haible Thu Jun 30 16:28:09 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12091; Thu, 30 Jun 94 16:28:09 +0200 Date: Thu, 30 Jun 94 16:28:09 +0200 From: haible (Bruno Haible) Message-Id: <9406301428.AA12091@ma2s2.mathematik.uni-karlsruhe.de> To: UPP201@ibm.rhrz.uni-bonn.de, adoering@ira.uka.de, baus@sbusol.rz.uni-sb.de, clisp-list@ma2s2.mathematik.uni-karlsruhe.de, donc@ISI.EDU, gtd543a@cc.gatech.edu, jbishop@nwu.edu, mr370673@rs970.mor.itesm.mx Subject: CLtL2 LOOP for CLISP An implementation of a CLtL2 compatible LOOP macro for CLISP is in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/packages/loop.clisp.tar.z . Actually, it is dpANS compatible; the dpANS specification has less flaws than CLtL2 chapter 26. Warning: The scoping rules for the iteration variables are hairy. If a FOR/AS initialisation form refers to an iteration variable of a subsequent FOR/AS clause, the effects are implementation dependent! Known bug: Iterating over packages doesn't work. (Runtime support missing, but will probably be present in the next release.) Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From d93perwi@und.ida.liu.se Fri Jul 1 23:37:29 1994 Return-Path: Received: from ida.liu.se (curofix.ida.liu.se) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16080; Fri, 1 Jul 94 23:37:29 +0200 Received: from und.ida.liu.se (astmatix.ida.liu.se) by ida.liu.se (5.65b/ida.minimaster-V1.0b6d5) id AA19967; Fri, 1 Jul 94 23:26:53 +0200 Received: by und.ida.liu.se (5.65b/ida.minimaster-V1.0b6d2) id AA03990; Fri, 1 Jul 94 23:26:51 +0200 Date: Fri, 1 Jul 94 23:26:51 +0200 From: Pelle Paritet Message-Id: <9407012126.AA03990@und.ida.liu.se> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: code 26 error r4  From haible Mon Jul 4 15:11:16 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17111; Mon, 4 Jul 94 15:11:16 +0200 Date: Mon, 4 Jul 94 15:11:16 +0200 From: haible (Bruno Haible) Message-Id: <9407041311.AA17111@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: New version of old CLISP Cc: AI.Repository@cs.cmu.edu, friedman@gnu.ai.mit.edu A new version of my current personal source of CLISP is at the usual place, in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source-haible/clispsrc.tar.z. Change log since 22 June 1994: 4 July 1994 =========== User visible changes -------------------- * X3J13 votes <115> and <114> are implemented: an elaborate LOOP macro. New macro LOOP-FINISH. Warning: The scoping rules for the iteration variables are hairy. If a FOR/AS initialisation form refers to an iteration variable of a subsequent FOR/AS clause, the effects are implementation dependent! * X3J13 vote <120> is implemented: New function MAP-INTO. * X3J13 vote <79> is implemented: New constants LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT, LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT, LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT, LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT, LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT, LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT, LEAST-POSITIVE-NORMALIZED-LONG-FLOAT, LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT. * The macro WITH-OUTPUT-TO-PRINTER now also works on DOS. * Fixed a bug in DO-SYMBOLS: A symbol which is exported from a used package was considered accessible in the using package even if it was shadowed by another present symbol of the same name. * Fixed a bug in the debugger which caused the BACKTRACE commands to print garbage if the current user interface language was not english. Other modifications ------------------- * Miscellaneous documentation updates. New binaries have been rebuilt: from clisp-1994-06-22 for - UnixWare (provided by Jean-Claude Beaudoin ), - HP9000/800 running HP-UX, - Sun4 running SunOS 4. from clisp-1994-07-04 for - Linux. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Wed Jul 6 20:21:51 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA25614; Wed, 6 Jul 94 20:21:51 +0200 Date: Wed, 6 Jul 94 20:21:51 +0200 From: haible (Bruno Haible) Message-Id: <9407061821.AA25614@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Speeding up Garnet-2.2 People are saying that Garnet in CLISP is "unbearably slow". Can anyone please tell me whether applying the following set of patches and setting Garnet-Garnet-Debug to NIL in garnet/src/garnet-loader.lisp provides a noticeable speedup? begin 644 garnet-diffs.z M'XL( %SH&BX ^T< X $*=*7.'&R,]4XB@7AW*\ 1\>'C*9SI[F61C) MIZF(^4IX\R3U9E$HU]TD#1=[_Q0!^V66L?Z ^;VI?S+U!ZP_F0P>>9YW#?#> MJS1D?\LCQOK,'TQ'_6E_A'##1X?5%WYFO@OHZ1-C!_B/O4N3RS VN=;]B+- MXX3]E8?GD6#?+>G_'U;#!0F22S08^"\1YOH#W52*9 M&5\(F>6I8(LPR@ L$RF[2-FOP$+QBO@Z#'BZ99'$S59_"+]S5-U6BF;\H2=3W?J-M#'8O*3EZ4\$"DW>OB<%B-PUW MO0\\4S'HLUYOVCN>]@;M,3@:NL>](@C_"V]_N<<+P%\N>;P0+$H6&%IL\M3W MGTX&51?QV/, 7>?5V>E'%6 B70AO#;ZB' $41.8'?&S\M#] #,_C(!4;]G,X MNPCELL"12Y%.IZ^5&MX+'F0<2&A OQ'P991(@ Q 61'?(K%_B#2<;[T?U8CW MDL?>"^']LA:Q")X]8O:+$]6#(ZUXL/1,2*E<]G N.+J5/$0/SC?JG@='86 !?SCJ7RQAXGFHJ*D.4Z#MFHA39 MW";K!"(2F6@'["#HHR/V[-DS]A&RV?3U\_=O3S]Z+]Z\_0")!/.82A()I)+- M4D#&2\UT4)W2,RH=3 1I*MG$["*, Y;,(9%X8>9M(>E)$YE9E8/9$VM)X,20-G7 C@($)Z^.FG]QJD MJV>]7"9@7*:<*ERM([&"[,PI/P,$QU*S6D,*1WNM^&P9Q@*& L$X2+'DE\!# ME&PT-HN+KD&-3#ARL27:.B(L5G5&5XC":E:0V1(C=A M-ENZ &6X^0[J9B+- 4"C3$S](?N<%!4 7#R^25/M3-ZKU6I]'[D&??>Z0Q" M >+4L\J^+JM/]PWP67A>P*C8P K;8<]4EE &!7^<0UBI2@ZR>I_\0A08],,! M2#0LTNY#2@1I]?/*8UJ$BQ1^/(BI-)'M'<)HVC^I=@@[<+4&80!0?GN#T!^. M('\.C7.H'T=<\LC;H-\Z)N"Q!6$XWB&-H,[7/ 4M87-UB*G)BT2\R):';*P4 M=QM4C)7F.Y3@_<*+^.H\X!!X'W6:WG\SQ[3A,O4-$U=K"$Q):8-#DQ3!D0-!J[/* MCZPN8[EQ#7 M6%1DQN-,ED0QXQ(AFW1'DU54#52-:&$>2*-'5M*\62M'MN4;K'[$U,_7MGKC MS."8D@-&0M 'M(.#,EQUZG('M27'MHKJ:GI! MR9\@D,$XB3UQ!=Q"O53!,4PB:D*RXO(#>L>\! MZ:MU!FG70@XM(Z(&R<55A@6^0*?#'V:A?OK88J#TU#]R""QP:^@>0S04Z4JZ MK*=6QPDTA'JLB:D"#CDX+'MOFZLFZCR&Q3!VK-H5+ 9*@\UAZ;%8&DBT6FIF[=S:(51.6.O<48AO/98[*C[=U"++?D.BENJ MI7""&H+;.8>V_P[QJE\TQ^HL$CRUF#>+0%AIATE-?W9@U]76J(E6JJ5@-N]U MVG6UU&5M5@B40&]'H8 22V,=93N&JDX+\-LRH&=5E63)A]A*.6LFK.FVTZI& M6 %3YJJS6=JI$CRF!D,>FUT4O$&JAXY"5&P?U(\(CDZ??[Z]/W-L=60!O4:%#\#\[3\XFRV!5?#Y$L) M0-]C4JQX-_$PA.)*],$G'=;<@/. MDZ_.15HR!! &D?D2A^^@>@.F^!H4?,V2'-:C%T*L8?T,M?<"D2Z3#:Q@H=QE M8?% LZXR;1C@D<>!P186N_A5&0E/QE?K)M;FX971U[#@*XR#< ;HI>46@$@5 M62!#0,I)0GS*(%+E)'K+GT(BA1:A-%\270(UW$[*EKDT^P089><"M%K(T]97 MHZ(4EZ/F+E$L/&N2X]DP)GC5+O@+[)W"6/F9B -HH;;E9D2WS6>LR9\ 9:(7Q5.L82](REM U3PI@F->E!25JDB!9+VK/0E-9G.Q/? M)9>VVJ1:ULLDV;P:(2)5D"+G-4.8E%0%LA-5,UR1,ZJ E532#*E"N@I6AGDS MC J6FB[L &JW916H8JH;(J%)]46(5 R-RZG!V'>'_G'Q'/RAJ^B7KJ!?LWI^ M@Y7S&ZV:WW[%O+9:?LN5\O]5$G5P785\F.IXU\IXMZKX*17QTZKA72OA7:O@ MW2O@)U:_IC7ERS(^+@\IG8Q'[LGDQ)1'C-^['Q9@9\G&B\2EB-16'Y_A M@9#V)[D[#^@]"D4ZY[3B%\+C:A% ]>P3"Y?.\6[$9\6V29_AD<<]A M![_^#6+EUW_AVRNF.-V#%W[S$PZ^Q;?G^/:B]O5K'/P9W][!-XV&FHS<<6]4 M&FK<.W;'_7%U6QBL]8HTPJ4,%Y!RHXA%(@-^)4NA"(#6\$%XHW")*GE.6.I9 MG3ISY&4JYC6[A!TP31*PL/IHW78X=8HI9NN(SP2Q@LHW[.B$6%'C!C==<7@+ MU2E*XD6WB5-*/S:!8'M%ZAGCCZ+->:E>.,_=:H;-=!#_?H])HC M\7?X;[LZ3R(/W5QA0+%;Q/''[GA0;!QA3+\__?CW]V\_3$VT%.78Q1KV]LU9 M5TW>D J2*S3>=G>7 > B6'8WL?/?9=8-' M4>J>\@?1%A6> \_F_3%QIQ[+(-\9'754C-1I'9%Z[@71[30_#(/=XIK_*Y VFP\DZMHWY MX.L]&B<-[ [7K-VLB9.!.RY/_^PIT[DE6VJP2,]:"1;?S"UH=6Q Q0A3YU"M M2<:YW()SMY"-K W9= 9812-%%"3*.-JJ<]$$)+H^IYV&PD#:LE>A4 M4JC@TR?'ZC,I<50FXD@QKQ8(-<;O% D*UOJ>1BS)T&ZE=#-:FA;252V_H^$J MGS6-ZX^V[F_4_!](I3?Y8SWYW:*>3:">3>QZ-AE/W,ED9)\$5]5);>/HI[)* M1X[#O9T#"K">2K=T.)^I9X9ZX\!;4X[<4TI@?\;SL_K8KTI%[@^HL1H,C&-# MH"*]&'0-73S/\41Y3$>5P:9"2&'U3IWWIPZ?DANF$ZY3@62;$'GN%H]:39M> MSX@6Y;)GL58EU75&L\Z/0>?'1:.K-**D+Y6G=(7Z4;_]YCAY'*$ V!TI_9>' M1LE##")2JO6J%L%^K]]S^[U!<53G"],WYZMW2AK#:%VC)Q>5X.")HP\G.\;= M8'V(1Y*5VU$([SJBG6;08V<1GF=V%"AKQ63B2AM;MX;1#53PY@+-P,,_M%,' M,TA\1T=%D4/:<125@5:?D!*).!W:+1*%LD@16$0"II^&=#!('3O">S]%Y&U" M\.8@Z2IFJM9\3&9&\"LQRR'=)KC3:>SG0G74<(QBLIS_"Y9(40)!LC:GG0S M;5Q#V;?P#2/,SY"NF>'";=GB4>VF0/VBBG5#Y2.0I!LJ$];SI\/1M#=IN*'2>#5E..U?YJU-:WE%&5SHH?4.OS+3'D0,H3&'+@MSW1R>@B&/[ZIEF#-J< M9$:)L3U6=5>[ZS2T*X";$8WB':8"!A3&PUTOWM-UOM@=KUYQFH;*'SRA[JX: MWT:HDKP);1 .37TRM-SPLTAXQ/;J)GU@D1&N'LQ["@E<?W=-DTP[MR!T_$ M[P30I">KJ)3/6:^__SC>J2YUR'J9.9GV3MK+S+!W8I\ W%.*-_LA.YM<]AZ7 M=0VJ9_L"J=34Y7+%K_L^H $!_4_!@E#?F8:HI>]<=IYG>*-[P_%&?,+D"CR% MN@F=I0E9X^J]6+#1OGSCSN8U&YMZ7[-H2A/<1&6$:!:D3'3,EA$1H!W/&<=Q M2ZAJ#=!?EPP7*&IK7&M&L>VM][K4!DMUEZMH5VVXGB:G/\;"WU[ M]CF>]FM_)VD7L/[W6<93_YKDT_>';K^\FZ_D@=6"WCPPU=7L)9QO\1@+D+/K M+I9=[$^<(V;*"7PT2P@',AQ=*%"5W0N@D,=XC98Y%^ET:ML"\=(#+^,3,."% MDM/I#FE% (V;;# ?/:1&A*,&8HY^WE,,UBQYJ'E/NEC4-YD_6+Z,$NC2ES= <7DD%N% Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26765; Thu, 7 Jul 94 16:01:14 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA15060 (5.65c/IDA-1.4.4 for ); Thu, 7 Jul 1994 15:58:43 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id PAA06152; Thu, 7 Jul 1994 15:58:42 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA19527; Thu, 7 Jul 1994 15:58:42 +0200 From: Joachim Schrod Message-Id: <9407071358.AA19527@spice.iti.informatik.th-darmstadt.de> Subject: command line arguments To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP discussion list) Date: Thu, 7 Jul 1994 15:58:42 +0100 (MESZ) X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 453 Hi, Are the command line arguments available in CLISP? Actually I would like to have some symbol (say, in package SYSTEM) that is bound to a list of strings; the arguments that are not already processed by CLISP itself. Cheers, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From haible Thu Jul 7 16:27:38 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26881; Thu, 7 Jul 94 16:27:38 +0200 Date: Thu, 7 Jul 94 16:27:38 +0200 From: haible (Bruno Haible) Message-Id: <9407071427.AA26881@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: command line arguments Joachim Schrod asks: > Are the command line arguments available in CLISP? No, because command line arguments are not reasonably portable across all platforms supported by CLISP. (DOS and Atari TOS limit the command line length to 128 and 80 characters, respectively, making it unusable for "real" applications.) Furthermore, passing quotes and double quotes within command line arguments is always a pain and depends on the command line interpreter. If you are on Unix, you can use the -x option to pass information. For example, to pass the strings "foo" and "bar", you can use the following command line: clisp -x '(progn (setq *args* (quote ("foo" "bar"))) (setq *standard-input* (setq *query-io* (make-synonym-stream (quote *terminal-io*)))) (values))' You might modify the `clisp' shell script appropriately. > Actually I would like to have some symbol (say, in package SYSTEM) > that is bound to a list of strings; the arguments that are not already > processed by CLISP itself. This would be dangerous since we don't know which command line options will be added to CLISP in the future. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From schrod@iti.informatik.th-darmstadt.de Thu Jul 7 19:07:06 1994 Return-Path: Received: from nz11.rz.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27517; Thu, 7 Jul 94 19:07:06 +0200 Received: from netserv.rz.uni-karlsruhe.de by nz11.rz.uni-karlsruhe.de with SMTP (PP); Thu, 7 Jul 1994 19:05:35 +0200 Received: from rs2.hrz.th-darmstadt.de by netserv.rz.uni-karlsruhe.de with SMTP (16.6/16.2) id AA28377; Thu, 7 Jul 94 19:05:31 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA34310 (5.65c/IDA-1.4.4 for ); Thu, 7 Jul 1994 19:02:10 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id SAA06369; Thu, 7 Jul 1994 18:57:28 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA19426; Thu, 7 Jul 1994 18:57:28 +0200 From: Joachim Schrod Message-Id: <9407071657.AA19426@spice.iti.informatik.th-darmstadt.de> Subject: Re: command line arguments' To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 7 Jul 1994 18:57:26 +0100 (MESZ) In-Reply-To: <9407071427.AA26881@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jul 7, 94 04:29:50 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 3727 Bruno wrote: > > Joachim Schrod asks: > > > Are the command line arguments available in CLISP? > > No, because command line arguments are not reasonably portable across > all platforms supported by CLISP. (DOS and Atari TOS limit the command > line length to 128 and 80 characters, respectively, making it unusable > for "real" applications.) Furthermore, passing quotes and double quotes > within command line arguments is always a pain and depends on the command > line interpreter. Hmm, let me try to convince you... (Get me right: I don't ask you to do it -- I'll schedule Gabor for that. ;-) But I would like to see these changes folded back into the main development thread.) CLISP is implemented in C. C has a defined way to pass command line arguments, namely via the first two arguments of main(), canonically called argc and argv. (Actually, my question was simply ``is argv available as the binding of a CL symbol'' -- obviously, it's not.) I cannot follow your arguments against providing these values. (1) That the command line length in certain OSes is restricted is something that holds for _all_ programs there. This is an restriction that users of these deficient environments got used to. (They didn't have any other chance.) And I wouldn't call most applications I use "unreal applications" -- but they don't need command line lengths > 80. Actually, _I_ would call applications with such long command lines `unusable'. (A synonym to `real'? :-) :-) (2) How to pass quotes and double quotes, is IMO not a problem of CLISP. It's -- as you write -- a problem of the command line interpreter and the C run time library. Those who use a certain CLI must know how to specify quotes in it; just like they have to do it in all other programs. I hope my background wish gots clearer: I want to use Lisp applications just like any other applications. I want to tell people `Here is a CLISP image, just use it.' Without having to resort to shell scripts (written for each OS anew!) where I pass some arguments via setq etc. Besides here comes exactly the point where your length argument bites: I don't want to write long -x option arguments in a DOS .BAT file when I just want to pass a document name! C'mon, let's go out of the Lisp universe and meet other systems... (Dick Gabriel has written a nice memo about this problem. ;-) As an example, my current pet: An SGML style sheet language, realized as an extension of CLOS; that may be used to transform or query SGML documents. The cmd line argument is the document(s). Since I'm at it: I would also like some hook that is evaluated after a memory image is loaded. (Like \everyjob, for the TeX freaks... Actually, I want it exactly for this -- I'm working on an executable formal specification of TeX.) But one can imagine more uses for it, e.g., reestablishing a link to some display server, etc. (I want to have this evaluation _before_ the first form is read, therefore I cannot use *evalhook*.) > > Actually I would like to have some symbol (say, in package SYSTEM) > > that is bound to a list of strings; the arguments that are not already > > processed by CLISP itself. > > This would be dangerous since we don't know which command line options > will be added to CLISP in the future. How about two symbols: system::*raw-argv* and system::*argv* ? Or a stop token for CLISP options? `--' comes immediately to mind... Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From schrod@iti.informatik.th-darmstadt.de Thu Jul 7 20:42:13 1994 Return-Path: Received: from rs1.hrz.th-darmstadt.de (archie.th-darmstadt.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA27699; Thu, 7 Jul 94 20:42:13 +0200 Received: from hp5.iti.informatik.th-darmstadt.de (hp5.iti.informatik.th-darmstadt.de [130.83.5.20]) by rs1.hrz.th-darmstadt.de (8.6.4/8.6.4) with ESMTP id UAA28643 for ; Thu, 7 Jul 1994 20:39:27 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id UAA06407; Thu, 7 Jul 1994 20:38:10 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA18864; Thu, 7 Jul 1994 20:38:11 +0200 From: Joachim Schrod Message-Id: <9407071838.AA18864@spice.iti.informatik.th-darmstadt.de> Subject: Re: command line arguments' To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP discussion list) Date: Thu, 7 Jul 1994 20:38:11 +0100 (MESZ) X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 785 You wrote: > > Date: Thu, 7 Jul 1994 12:08 CDT > From: Joachim Schrod > > CLISP is implemented in C. C has a defined way to pass command line > arguments, namely via the first two arguments of main(), canonically > called argc and argv. > > argc and argv are UNIX conventions. No. main() of a C program in an `hosted environment' (i.e., not on a toaster chip...) returns int and takes zero or two arguments. RTFM. ANSI X3.159-1989 (aka ISO/IEC 9899:1990), Section 2.1.2.2.1, pp. 7-8. Cheers, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From kovach@franus.edu Fri Jul 8 22:06:24 1994 Return-Path: Received: from ns.oar.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28796; Fri, 8 Jul 94 22:06:24 +0200 Received: from a.franus.edu for kovach@franus.edu by ns.oar.net (PIPE/8.6.8.1/931123.1402) id QAA04051; Fri, 8 Jul 1994 16:04:33 -0400 X-Mailer: InterCon TCP/Connect II 1.1 Message-Id: <9407081608.AA20588@a.franus.edu> Date: Fri, 8 Jul 1994 16:08:20 -0500 From: "Edward G. Kovach" To: haible@ma2s2.mathematik.uni-karlsruhe.de Cc: kovach@franus.edu Subject: Re: command line arguments Hi, Is there a way to evaluate the running of a LISP program? That is get a listing of.. A. How many times a particular function is called? B. How much time it takes to run each function? Any similar information would be appreciated. (I already am using the trace function. ) Thank you in advanced. Ed Kovach kovach@franus.edu From donc@ISI.EDU Fri Jul 8 22:44:07 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28884; Fri, 8 Jul 94 22:44:07 +0200 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Fri, 8 Jul 1994 13:41:49 -0700 Date: Fri, 8 Jul 94 13:41:54 -0700 Posted-Date: Fri, 8 Jul 94 13:41:54 -0700 Message-Id: <9407082041.AA17566@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Fri, 8 Jul 94 13:41:54 -0700 From: donc@ISI.EDU (Don Cohen) Sender: donc@ISI.EDU To: kovach@franus.edu, clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: recording function calls From: "Edward G. Kovach" Is there a way to ... get a listing of.. A. How many times a particular function is called? B. How much time it takes to run each function? I've seen several such facilities. The one I like, though, is my own, included below. At the cost of some extra space, it records not only the number of calls and total time, but each individual call, its inputs and outputs, its start/finish time. This is much more useful for debugging and tuning, since you get to see WHICH calls took a lot of time, which ones got the wrong inputs or computed the wrong results, etc. ;;; -*- Mode: LISP; Package: USER; Syntax: Common-lisp -*- (lisp::in-package "USER") ; ---- Record the calls to given functions ---- #| 2/17/89 - try to avoid advice, not so much because it's not commonlisp as because it's not compiled! In fact, I want to be able to turn on and off recording at high frequency and encapsulations seem to get in the way of this. For now I'll assume that one does not encapsulate and record the same functions. In order to monitor a function one first prepares it for monitoring, then one can turn monitoring on and off at high frequency. One can also reset or read the monitoring data for a function. Finally one can forget about monitoring a function. *monitored-fns* is a list of functions currently prepared for monitoring. (prepare-record-calls '(f1 f2 f3)) prepares the functions named. additional keyword arguments: entryforms, exitforms, test The entryforms are evaluated at function entry, the exitforms at function exit. The results are recorded along with inputs, outputs, entry time and exit time. Test is a form (default is T) that determines whether this particular call will be recorded. It runs in an environment where ARGS is bound to the argument list of the function. (record-on '(f1 f2 f3)) turns on recording for these functions. (record-off '(f1 f2 f3)) turns it off. (initialize-records '(f1 f2 f3)) discards all monitoring data for the functions (but does not turn recording off or on and does not forget preparation). (recorded-calls 'f1) returns a list of the call records for f1. This is a list of records of the form (inputs outputs start-time1 start-time2 end-time1 end-time2 ) Times are represented as 2 numbers since some clocks wrap around. The second is a wrap around count that is incremented whenever the finish time comes out lower than the start time. (summarize-calls '(f1 f2 f3)) prints a summary of the calls. The argument defaults to *monitored-fns*. Additional optional argument: name-alist Name-alist is something like ((f1 . "updating database") (f2 . "waiting")) and is used to translate function names into something more meaningful. (forget-record-calls '(f1 f2 f3)) discards all monitoring data and preparation (longest-n-calls 'f2 3) lists the 3 longest recorded calls of f2 additional keyword arguments: start end filterfn filterfn - a function of 1 arg (inputs outputs start finish) should return T if the call is "interesting" start/end are special cases - filter out anything that starts before start or ends after end (time-line '(f1 f2 f3) produces a time line of activity additional keyword arguments: (width 80) filterfn start end name-alist Both symbolics and TI have a fast short clock and a slow long one. We use the fast one on symbolics, slow one on TI. time before wrap around / #usec to read clock -------------------------------------------- symbolics 3600 TI explorer II fast >.5 hour / 67 * 16 sec. / 260 slow >100 yrs / 218 >1 hour / 260 * Actually we notice wrap around and record it - whenever a clock access returns a smaller value than the previous one we increment a counter. Therefore all events are ordered correctly, but if you fail to read the clock for an hour or so, it's as if that time never passed. This is bad if you time things on such a coarse scale, but good if you time one thing for a minute today and something else for a minute tomorrow - the time line between such events never separates them by much more than an hour. In practice I don't think this will matter much. Since calls are recorded by pushing onto a list at exit, they are ordered by decreasing exit time. This is handy for finding the outermost calls in the case where the calls all come from the same process (and must thus be properly nested). (outermost (recorded-calls 'foo)) returns the subset of the calls to foo that are outermost. |# (defvar *monitored-fns* nil) (defvar *clock-cycle* 0) (defvar *last-time* 0) (defun prepare-record-calls (fns &key entryforms exitforms (test t)) (loop for fn in fns do (prepare-record-call fn entryforms exitforms test))) ; record-calls-fn prop is cons substitute and original fns (defun prepare-record-call (fn entryforms exitforms test &aux prop) (cond ((not (fboundp fn)) (error "no such function as ~A" fn)) #+zetalisp ((and (si:function-encapsulated-p fn) (warn "~A is an encapsulation") nil)) #+ignore ; might be called with different entryforms/exitforms ((and (setf prop (get fn 'record-calls-fn)) (eq (cdr prop) (symbol-function fn))) #+ignore (warn "~A already recorded" fn)) ((eq (symbol-function fn) (car prop)) #+ignore (warn "~A already prepared" fn)) (t ; not cached ... (setf (get fn 'record-calls-fn) (cons (make-record-fn fn entryforms exitforms test) (symbol-function fn))) (pushnew fn *monitored-fns*)))) (defun make-record-fn (fn entryforms exitforms test) (compile nil `(lambda (&rest args &aux start start1 values finish finish1 entryvals) (if ,test (unwind-protect (progn (setq entryvals (list ,@entryforms) start (microsec-time) start1 *clock-cycle* values (multiple-value-list (apply ',(symbol-function fn) args)) finish (microsec-time) finish1 *clock-cycle*) (values-list values)) (record-1-call ',fn (copy-list args) (if finish values :abnormal-exit) start start1 (or finish (microsec-time)) (or finish1 *clock-cycle*) entryvals (list ,@exitforms))) (apply ',(symbol-function fn) args))))) ; perhaps we should try to correct for the time spent in the new function? (defun forget-record-calls (fns) (record-off fns) (loop for fn in fns do (setq *monitored-fns* (delete fn *monitored-fns*)) (setf (get fn 'record-calls-fn) nil) (setf (get fn 'recorded-calls) nil))) (defun record-on (fns) (loop for fn in fns do (let ((prop (get fn 'record-calls-fn))) (cond ((not prop) (cerror "skip turning on recording" "~A not prepared for recording" fn)) ((eq (cdr prop) (symbol-function fn)) (setf (symbol-function fn) (car prop))) ((eq (car prop) (symbol-function fn))) (t (cerror "skip turning on recording" "~A has changed since last prepared for recording" fn)))))) (defun record-off (fns) (loop for fn in fns do (let ((prop (get fn 'record-calls-fn))) (cond ((not prop) (cerror "continue" "~A not prepared for recording" fn)) ((eq (car prop) (symbol-function fn)) (setf (symbol-function fn) (cdr prop))) ((eq (cdr prop) (symbol-function fn))) (t (cerror "continue" "~A has changed since recording last turned on" fn)))))) (defun microsec-time (&aux time) (setq time #-(or symbolics ti) (get-internal-run-time) #+symbolics (time:fixnum-microsecond-time) #+TI (time:microsecond-time)) (when (< time *last-time*) (incf *clock-cycle*)) (setf *last-time* time)) (defun record-1-call (fn inputs results t1 t11 t2 t21 entryvals exitvals) (push (list inputs results t1 t11 t2 t21 entryvals exitvals) (get fn 'recorded-calls))) (defun initialize-records (fns) (loop for fn in fns do (setf (get fn 'recorded-calls) nil))) (defun recorded-calls (fn) (get fn 'recorded-calls)) (defun summarize-calls (&optional (fns *monitored-fns*) name-alist) (loop for fn in fns do (summarize-record fn (get fn 'recorded-calls) name-alist))) (defun summarize-record (fn calls name-alist) (when calls (loop for x in calls sum 1 into ncalls sum (elapsed (third x) (fourth x) (fifth x) (sixth x)) into time finally (print-summarize-record fn ncalls time name-alist)))) (defun print-summarize-record (fn ncalls time name-alist) (multiple-value-bind (total tunits) (standardized-time-units time) (multiple-value-bind (avg aunits) (standardized-time-units (float (/ time ncalls))) (format *standard-output* "~%~A: ~A calls, ~A ~A (avg. ~A~:[ ~a~; ~])" (or (cdr (assoc fn name-alist)) fn) ncalls total tunits avg (eq aunits tunits) aunits)))) (defun standardized-time-units (usec) (cond ((> usec 999999) (values (float (/ usec 1000000)) "sec.")) ((> usec 999) (values (float (/ usec 1000)) "msec.")) (t (values usec "usec.")))) (defun elapsed (t1 t11 t2 t21) (+ (- t2 t1) (* (- t21 t11) (* 1024 1024 2048 #+TI 2)))) (defun longest-n-calls (fn n &key start end filterfn &aux next time current (candidates (recorded-calls fn)) (i 0)) ; filterfn decides whether a record is "interesting" ; special cases: start/end filters out anything that starts before start ; or ends after end (flet ((filter (e) (and (or (null start) (plusp (elapsed start 0 (third e) (fourth e)))) (or (null end) (plusp (elapsed (fifth e) (sixth e) end 0))) (or (null filterfn) (funcall filterfn e))))) (loop while (and (< i n) (setq next (pop candidates))) when (filter next) do (incf i) (push (cons (elapsed (third next) (fourth next) (fifth next) (sixth next)) next) current)) (setq current (sort current #'<= :key #'car)) (loop while (setq next (pop candidates)) when (filter next) when (< (caar current) (setq time (elapsed (third next) (fourth next) (fifth next) (sixth next)))) do (setq current (merge 'list (cdr current) (list (cons time next)) #'<= :key #'car))) (nreverse current))) (defvar *time-line-key* "Start time = ~A, End time = ~A, Width = ~A, ~ ~& each column represents ~A ~A~ ~& Key: ( = 1 entry, ) = 1 exit, * = more than one entry/exit~ ~& if no entry/exit, a digit indicates number of active calls,~ ~& blank indicates no change, + indicates >9 ~% ") (defun time-line (fns &key (width 80) filterfn start end len name-alist &aux events) (flet ((filter (e) (and (or (null start) (plusp (elapsed start 0 (third e) (fourth e)))) (or (null end) (plusp (elapsed (fifth e) (sixth e) end 0))) (or (null filterfn) (funcall filterfn e))))) (setq events (loop for f in fns collect (cons f (loop for e in (recorded-calls f) when (filter e) collect e)))) (unless (and start end) (loop for e in events do (loop for r in (cdr e) do (when (or (null start) (minusp (elapsed start 0 (third r) (fourth r)))) (setq start (totalt (third r) (fourth r)))) (when (or (null end) (minusp (elapsed (fifth r) (sixth r) end 0))) (setq end (totalt (fifth r) (sixth r))))))) (when (and start end) (setq len (- end start))) (unless (and len (> len 0)) (return-from time-line "empty interval")) (multiple-value-bind (number unit) (when (and start end width) (standardized-time-units (/ (- end start 0.0) width))) (apply #'concatenate 'string (format nil *time-line-key* start end width number unit) (loop for f in events collect (concatenate 'string (let ((string (make-string width :initial-element #\space)) index (countstart (make-array (list width) :initial-element 0 :element-type 'integer)) (countend (make-array (list width) :initial-element 0 :element-type 'integer))) (loop for e in (cdr f) do (setq index (min (1- width) (floor (* width (/ (- (totalt (third e) (fourth e)) start) len))))) (incf (aref countstart index)) (setf (aref string index) (if (char= #\space (aref string index)) #\( #\*)) (setq index (min (1- width) (floor (* width (/ (- (totalt (fifth e) (sixth e)) start) len))))) (decf (aref countend index)) (setf (aref string index) (if (char= #\space (aref string index)) #\) #\*))) (loop for i below width with sum = 0 do (setf sum (+ sum (aref countstart i) (aref countend i))) (when (and (/= i 0) (/= (aref countstart (1- i)) 0) (/= (aref countend (1- i)) 0) (char= #\space (aref string i)) (> sum 0)) (setf (aref string i) (if (> sum 9) #\+ (aref "0123456789" sum))))) string) (format nil " ~A~& " (symbol-name (or (cdr (assoc (car f) name-alist)) (car f)))))))))) (defun outermost (calls &aux outer) (loop for c in calls unless (and outer (<= (totalt (third outer) (fourth outer)) (totalt (third c) (fourth c)) (totalt (fifth c) (sixth c)) (totalt (fifth outer) (sixth outer)))) collect (setf outer c))) ; get the time represented by the two numbers x (low order) and y (high order) (defun totalt (x y) (elapsed 0 0 x y)) From d791013@ce.ntu.edu.tw Sat Jul 9 04:32:29 1994 Return-Path: Received: from aquarius.ce.ntu.edu.tw by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29187; Sat, 9 Jul 94 04:32:29 +0200 Message-Id: <9407090232.AA29187@ma2s2.mathematik.uni-karlsruhe.de> Received: by aquarius.ce.ntu.edu.tw (1.37.109.4/15.6) id AA14346; Fri, 8 Jul 94 11:21:15 +0800 From: Chun-Yu Lee Subject: Re: Metering System To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 8 Jul 94 11:21:14 EAT In-Reply-To: <9407081608.AA20588@a.franus.edu>; from "Edward G. Kovach" at Jul 8, 94 10:09 pm Mailer: Elm [revision: 70.85] > > Hi, > > Is there a way to evaluate the running of a LISP program? > That is get a listing of.. > > A. How many times a particular function is called? > B. How much time it takes to run each function? > > Any similar information would be appreciated. (I already am using > the trace function. ) > Try the Metering System which is a portable Common Lisp code profiling tool. It is available in the directory "contrib" of CLISP distribution site. I got it from ftp::ftp.edu.tw:/computing-languages/lisp/clisp/contrib /metering.lsp.z. Regards, Chun-Yu Lee d791013@ce.ntu.edu.tw From haible Mon Jul 11 12:48:16 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00819; Mon, 11 Jul 94 12:48:16 +0200 Date: Mon, 11 Jul 94 12:48:16 +0200 From: haible (Bruno Haible) Message-Id: <9407111048.AA00819@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Metering System > Is there a way to evaluate the running of a LISP program? > That is get a listing of.. > > A. How many times a particular function is called? > B. How much time it takes to run each function? Chun-Yu Lee answered this: > Try the Metering System which is a portable Common Lisp code profiling > tool. It is available in the directory "contrib" of CLISP distribution > site. Its primary FTP location is ftp.cs.cmu.edu:user/ai/lang/lisp/code/tools/metering/metering.cl . Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From aaronn@LINFIELD.EDU Mon Jul 11 21:28:18 1994 Return-Path: Received: from LINFIELD.EDU (calvin.linfield.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02078; Mon, 11 Jul 94 21:28:18 +0200 Received: by LINFIELD.EDU (5.65/1.35) id AA10287; Mon, 11 Jul 94 12:26:20 -0700 Date: Mon, 11 Jul 1994 12:26:18 -0700 (PDT) From: Aaron Neerenberg Subject: few questions... To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII with clisp, is there any: 1) other X windows packages other than stdwin? 2) capacity/interfacing for: a) pipes (fifo's) b) shared memory c) tcp/ip sockets 3) ways to interface compiled lisp code with c without having to rewrite the compiler/interpreter? thanks, aaron neerenberg, linfield college From caserrat@undergrad.math.uwaterloo.ca Tue Jul 12 16:59:45 1994 Return-Path: Received: from undergrad.math.uwaterloo.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04249; Tue, 12 Jul 94 16:59:45 +0200 Received: from cayley.uwaterloo.ca by undergrad.math.uwaterloo.ca id <56863-2>; Tue, 12 Jul 1994 10:57:04 -0400 Subject: #\code26 ? From: Cory Serratore To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 12 Jul 1994 10:56:53 -0400 X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 365 Message-Id: <94Jul12.105704edt.56863-2@undergrad.math.uwaterloo.ca> Hi, I'm trying to use my OS/2 system editor (it's quick & easy) to edit my files, but it seems to be inserting a bad character. If I read a file into lisp, it works fine, but when I edit it and try to reload it I get an illegal character #\Code26. What is this? could this possible be an EOF (ctrl-z)? What should I be looking for? any help appreciated cory From oneel@athena.gsfc.nasa.gov Tue Jul 12 17:42:10 1994 Return-Path: Received: from athena.gsfc.nasa.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04513; Tue, 12 Jul 94 17:42:10 +0200 Received: by athena.gsfc.nasa.gov (Smail3.1.28.1 #4) id m0qNjvX-0001LKC; Tue, 12 Jul 94 11:39 EDT Message-Id: From: oneel@athena.gsfc.nasa.gov (Bruce O'Neel) Subject: Re: #\code26 ? To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 12 Jul 1994 11:39:22 -0400 (EDT) In-Reply-To: <94Jul12.105704edt.56863-2@undergrad.math.uwaterloo.ca> from "Cory Serratore" at Jul 12, 94 05:02:38 pm X-Mailer: ELM [version 2.4 PL20] Content-Type: text Content-Length: 902 Hi, > > Hi, I'm trying to use my OS/2 system editor (it's quick & easy) to edit > my files, but it seems to be inserting a bad character. > > If I read a file into lisp, it works fine, but when I edit it and try to > reload it I get an illegal character #\Code26. What is this? > > could this possible be an EOF (ctrl-z)? Yes, it is a control Z and yes, both e and epm on os/2 insert it. I'll guess that epm could be talked out of doing this, but I'm not sure. Solutions? I used a DOS lisp package which had a nice editor and didn't do the ^Z. You could use emacs for os/2. You could also write a small program (maybe even in REXX) to strip the last byte off of the file. bruce -- oneel@athena.gsfc.nasa.gov -- Bruce O'Neel HSTX (301) 286-1511 -- Out the 10Base-T port, through the router, over the leased line, off the bridge, past the firewall...nothing but net. -- perobich@ingr.com From obie@hirama.hiram.edu Wed Jul 13 06:05:52 1994 Return-Path: Received: from HIRAMA (hirama.hiram.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04975; Wed, 13 Jul 94 06:05:52 +0200 Date: Wed, 13 Jul 1994 00:03:16 -0400 Message-Id: <94071300031585@hirama.hiram.edu> From: obie@hirama.hiram.edu To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: a question X-Vms-To: CLISP X-Vms-Cc: OBIE Subj: just wanting to install clisp for the first time It wasn't clear to me whether the latest version should be ftped from the /pub/lisp/clisp/source or /pub/lisp/clisp/source-haible directories. (I was thinking the latter might be a working directory???) obie@hiram.edu From marcus@ee.pdx.edu Wed Jul 13 15:07:43 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05509; Wed, 13 Jul 94 15:07:43 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA03074; Wed, 13 Jul 94 05:11:01 PDT Date: Wed, 13 Jul 94 05:11:01 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9407131211.AA03074@ursula.ee.pdx.edu> To: clisp-list Subject: a question In-Reply-To: <94071300031585@hirama.hiram.edu> References: <94071300031585@hirama.hiram.edu> > It wasn't clear to me whether the latest version should be > ftped from the /pub/lisp/clisp/source or > /pub/lisp/clisp/source-haible directories. (I was thinking the > latter might be a working directory???) The latest and greatest version of CLISP is in the source-haible directory. Bruno has been so kind as to put up his sources for users because I haven't yet, sigh, been effective enough to finish another release. If you have bug reports, contributions, or ideas for development, please contact me or mail to the list. If you'd like a snapshot of recent alpha sources, please contact me, Best, Marcus Daniels `the new guy' From caserrat@undergrad.math.uwaterloo.ca Wed Jul 13 17:30:29 1994 Return-Path: Received: from undergrad.math.uwaterloo.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05798; Wed, 13 Jul 94 17:30:29 +0200 Received: from cayley.uwaterloo.ca by undergrad.math.uwaterloo.ca id <56968-2>; Wed, 13 Jul 1994 11:27:48 -0400 Subject: Error with LET: From: Cory Serratore To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 13 Jul 1994 11:27:38 -0400 X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 1421 Message-Id: <94Jul13.112748edt.56968-2@undergrad.math.uwaterloo.ca> I'm sorry that I don't have the exact error message, as I'm currently posting from my unix account on campus, but I couldn't get CLISP to accept the following code that akcl seems OK with. (defun get-mgu (p1 p2 o) "This function takes as input a pair of terms p1 p2 and a substitution set o and returns a Most General Unifier (MGU) of the pair IF they are unifiable. Otherwise, it returns nil." (let ((po1 nil) ; Apply substitution o (po2 nil) ; Apply substitution o (Diff nil) (vterm nil)) ; unifier for Diff (setq po1 (apply-sub o p1)) (setq po2 (apply-sub o p2)) (setq Diff (get-disagreement-set po1 po2)) (setq vterm (set-vterm Diff)) (if (equal po1 po2) o ; Return MGU (if (null vterm) ; So is not unifiable nil ; repeat with composition of vt and o (get-mgu po1 po2 (composition (list vterm) o)))) ) ) The error message had something to do with a bad variable assignment in my LET statement. This code includes a number of functions that I have defined elsewhere, so those aren't important, but is there a problem with my LET structure? Am I using a system variable or something, or is this just a case where CLISP is not 100% compatible with Common Lisp (or is akcl not compatible?). If this isn't enough to go on, I will post the exact error message later. Any help appreciated. cory From obie@hirama.hiram.edu Wed Jul 13 22:54:11 1994 Return-Path: Received: from HIRAMA (hirama.hiram.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06048; Wed, 13 Jul 94 22:54:11 +0200 Date: Wed, 13 Jul 1994 16:52:50 -0400 Message-Id: <94071316525038@hirama.hiram.edu> From: obie@hirama.hiram.edu To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: problem creating makefile X-Vms-To: CLISP Retrieved clisp-1994-07-04 version. Trying to install following Unix instructions on DECstation 3100 running Ultrix 4.2. Script below shows an error occurred on creating the makefile: > Script started on Wed Jul 13 15:36:23 1994 csh> ./makemake > makefile ./makemake: syntax error at line 763: `(' unexpected csh> exit csh> script done on Wed Jul 13 15:37:06 1994 Line 763 is the echotab () line in makemake: # Output the makefile: # echotab line # outputs a line, preceding it with a tab. cat is needed to output tabs. if [ "$HSYSOS" != coherent ] ; then echotab () { cat < files... echotab () { echo "\t""$1" } fi I don't see the problem. Any help? Excuse my ignorance. obie@hiram.edu ================== RFC 822 Headers ================== Return-Path: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Received: by hiramb.hiram.edu (UCX V2.0-18) Wed, 13 Jul 1994 16:31:24 -0400 Received: from ma2s2.mathematik.uni-karlsruhe.de by nz11.rz.uni-karlsruhe.de with SMTP (PP); Wed, 13 Jul 1994 22:29:49 +0200 Received: from (localhost) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06015; Wed, 13 Jul 94 22:32:15 +0200 Date: Wed, 13 Jul 94 22:32:15 +0200 Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de Message-Id: <94071316212198@hiramb.hiram.edu> Originator: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de Reply-To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Sender: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Version: 5.5 -- Copyright (c) 1991/92, Anastasios Kotsikonas From: clisp-list@ma2s2.mathematik.uni-karlsruhe.de To: obie@hiramb.hiram.edu Cc: haible@ma2s2.mathematik.uni-karlsruhe.de Subject: problem creating makefile From schrod@iti.informatik.th-darmstadt.de Thu Jul 14 19:05:11 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA07077; Thu, 14 Jul 94 19:05:11 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA22201 (5.65c/IDA-1.4.4 for ); Thu, 14 Jul 1994 19:02:27 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id SAA11896; Thu, 14 Jul 1994 18:23:34 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA18386; Thu, 14 Jul 1994 18:23:35 +0200 From: Joachim Schrod Message-Id: <9407141623.AA18386@spice.iti.informatik.th-darmstadt.de> Subject: Re: problem creating makefile To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 14 Jul 1994 18:23:34 +0100 (MESZ) In-Reply-To: <94071316525038@hirama.hiram.edu> from "obie@hirama.hiram.edu" at Jul 13, 94 10:56:22 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 955 obie@hirama.hiram.edu wrote: > > Retrieved clisp-1994-07-04 version. > Trying to install following Unix instructions on DECstation 3100 running > Ultrix 4.2. > Script below shows an error occurred on creating the makefile: [...] > Line 763 is the echotab () line in makemake: That is a function definition. The Bourne shell on Ultrix 4.2 does not support shell functions. (1) Check if ksh or bash is available on your system. You do this with the command 'type' or with 'whereis'. Use this shell; i.e., type 'ksh target ultrix-4.2' and 'ksh makemake'. (2) If you don't have such a shell, get the bash sources from a ftp server near you and compile them. (Reduce the problem to a known one... :-) Cheers, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From schrod@iti.informatik.th-darmstadt.de Fri Jul 15 20:41:25 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08021; Fri, 15 Jul 94 20:41:25 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA28500 (5.65c/IDA-1.4.4 for ); Fri, 15 Jul 1994 20:38:30 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id UAA12643; Fri, 15 Jul 1994 20:38:28 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA19664; Fri, 15 Jul 1994 20:38:29 +0200 From: Joachim Schrod Message-Id: <9407151838.AA19664@spice.iti.informatik.th-darmstadt.de> Subject: Redefinition of print-object To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (CLISP discussion list) Date: Fri, 15 Jul 1994 20:38:28 +0100 (MESZ) X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 1157 Hi, May anybody please load the following lisp code into their CLISP: ================ snip snap ================ ;;; print-object.lsp 15 Jul 94 ;;;---------------------------------------------------------------------- (use-package 'clos) (defclass C () ((slot :initarg :slot :reader slot)) ) (defmethod print-object ((obj C) stream) (let ((*print-case* :downcase)) (format stream "#" (type-of req) (slot req)))) (print (lisp-implementation-version)) ================ snip snap ================ At my installation, both the 1994-01-08 and the 1994-07-04 versions produce the following warning: WARNING: The generic function # is being modified, but has already been called. I use the original interpreter.mem and did _not_ call #'print-object before. I would like to know if this might be a problem with my installation. Thanks in advance for any responses, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From cgraham@hookup.net Sat Jul 16 04:18:18 1994 Return-Path: Received: from nic.hookup.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08441; Sat, 16 Jul 94 04:18:18 +0200 Received: from cgraham.hookup.net (cgraham.hookup.net [199.0.21.204]) by nic.hookup.net (8.6.9/1.206) with SMTP id VAA12306; Fri, 15 Jul 1994 21:42:53 -0400 Message-Id: <199407160142.VAA12306@nic.hookup.net> X-Sender: cgraham@hookup.net Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Fri, 15 Jul 1994 21:39:23 -0400 To: clisp-list From: cgraham@hookup.net (Christopher H. Graham) Subject: Re: #\code26 ? X-Mailer: >Hi, > >> >> Hi, I'm trying to use my OS/2 system editor (it's quick & easy) to edit >> my files, but it seems to be inserting a bad character. >> >> If I read a file into lisp, it works fine, but when I edit it and try to >> reload it I get an illegal character #\Code26. What is this? >> >> could this possible be an EOF (ctrl-z)? > >Yes, it is a control Z and yes, both e and epm on os/2 insert it. >I'll guess that epm could be talked out of doing this, but I'm not >sure. > >Solutions? I used a DOS lisp package which had a nice editor and >didn't do the ^Z. You could use emacs for os/2. You could also write >a small program (maybe even in REXX) to strip the last byte off of the >file. > >bruce > Yes, EPM can be configured to not append the ^Z; I believe this requires using the EPM macro compiler, however. An immediate remedy is to direct the Clisp reader to ignore the ^Z character. Unfortunately, I'm not running under OS/2 at the moment so I can't look up the directive I inserted into the def.lsp file. But the procedure is described in the "archive" of Clisp-related messages that is available for download from the Clisp site. Chris Graham. From haible Sat Jul 16 14:23:32 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08673; Sat, 16 Jul 94 14:23:32 +0200 Date: Sat, 16 Jul 94 14:23:32 +0200 From: haible (Bruno Haible) Message-Id: <9407161223.AA08673@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Redefinition of print-object > WARNING: > The generic function # is being modified, but has already been called. > I would like to know if this might be a problem with my installation. Not at all. The function PRINT-OBJECT is called when lispinit.mem is built (on objects of type CONDITION), and the info that it has been called is remembered in lispinit.mem. I am a bit unhappy about this warning because PRINT-OBJECT is meant to be extended even after having been called, but I don't see in which respect PRINT-OBJECT is special among all generic functions. Bruno From schrod@iti.informatik.th-darmstadt.de Mon Jul 18 20:25:16 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03351; Mon, 18 Jul 94 20:25:16 +0200 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA63211 (5.65c/IDA-1.4.4 for ); Mon, 18 Jul 1994 20:21:53 +0200 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id UAA13740; Mon, 18 Jul 1994 20:21:51 +0200 Received: by spice.iti.informatik.th-darmstadt.de (AIX 3.2/UCB 5.64/Client-1.5/HRZ-THD) id AA18140; Mon, 18 Jul 1994 20:21:52 +0200 From: Joachim Schrod Message-Id: <9407181821.AA18140@spice.iti.informatik.th-darmstadt.de> Subject: Re: Redefinition of print-object To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 18 Jul 1994 20:21:52 +0100 (MESZ) In-Reply-To: <9407161223.AA08673@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Jul 16, 94 02:25:59 pm X-Mailer: ELM [version 2.4 PL11] Content-Type: text Content-Length: 2133 Bruno wrote: > > > WARNING: > > The generic function # is being modified, but has already been called. > > > I would like to know if this might be a problem with my installation. > > Not at all. The function PRINT-OBJECT is called when lispinit.mem is > built (on objects of type CONDITION), and the info that it has been called > is remembered in lispinit.mem. > > I am a bit unhappy about this warning because PRINT-OBJECT is meant to > be extended even after having been called, but I don't see in which > respect PRINT-OBJECT is special among all generic functions. It seems to be my turn for the weekly enhancement wish... :-) :-) The background: It concerns CLOS language extensions or installation of applications. In both cases the user works with a virtual platform that should be `clean' for him. I get mails from users that want to install an application and ask now if something went wrong. (Yes, they're no Lisp programmers -- real (l)users...) Of course, the quick fix is to add this to the documentation. But then, who reads documentation? And so I would like to get rid of this superfluous warning. How about: (a) An additional argument to #'saveinitmem that tells CLISP that all definitions are clean (i.e., not used). That can be used if this memory image shall be a virtual machine where the user shall not see its internal structure. The default of this argument is nil. or (b) some global variable (in package system?) that controls the output of such warnings. (And that I can turn off in my installation scripts.) or (c) Some way to tell #'load that it shall not issue such a warning. Perhaps via the value of verbose? Or an additional keyword parameter? I must say, I like (a) since it matches exactly my usage of Lisp. (c) is IMO problematic since it's outside dpANS (is it?). Comments, anybody? Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From donc@ISI.EDU Mon Jul 18 20:56:07 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03430; Mon, 18 Jul 94 20:56:07 +0200 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-14) id ; Mon, 18 Jul 1994 11:52:33 -0700 Date: Mon, 18 Jul 94 11:50:05 -0700 Posted-Date: Mon, 18 Jul 94 11:50:05 -0700 Message-Id: <9407181850.AA15116@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Mon, 18 Jul 94 11:50:05 -0700 From: donc@ISI.EDU (Don Cohen) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: warnings I notice this is a problem for C - the build of clisp produces thousands of compiler warnings. I don't think that whether a function (generic or otherwise) has been called before has much to do with whether you want a warning. Warnings are already defined as a subclass of errors (a subclass of conditions) - you can establish handlers for that class or any subclass. I hope there are some useful classes defined, like redefinition warnings. There's some detail on this in CLtL2 p. 912-913. From philpot@ptolemy.arc.nasa.gov Mon Jul 18 21:08:56 1994 Return-Path: Received: from ptolemy.arc.nasa.gov ([128.102.113.7]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03492; Mon, 18 Jul 94 21:08:56 +0200 Received: from kepler.arc.nasa.gov by ptolemy.arc.nasa.gov (4.1/) id for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Mon, 18 Jul 94 12:02:06 PDT Date: Mon, 18 Jul 94 12:02:06 PDT From: Andrew Philpot Message-Id: <9407181902.AA27413@ptolemy.arc.nasa.gov> Received: by kepler.arc.nasa.gov (4.1/SMI-4.1) id AA18670; Mon, 18 Jul 94 12:01:49 PDT To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9407181821.AA18140@spice.iti.informatik.th-darmstadt.de> (message from Joachim Schrod on Mon, 18 Jul 94 20:29:11 +0200) Subject: Re: Redefinition of print-object I don't really have a dog in this fight (I've only started using CLISP and only on my home PC -- the user of that machine is very tolerant of warning messages), but it seems to me that if the warning generated could be gotten rid of using a suitable combination of MUFFLE-WARNING, HANDLER-BIND, and the like. Wrapping this around an application's use of LOAD/REQUIRE couldn't be that tough. I realize that this would likely muffle all warnings, including "important" ones. Maybe the warning generated could be of a particular type, rather than SIMPLE-WARNING (as it is in clisp version at hand -- 10/12/93) and then the muffler could be a little more discriminating. A warning of type CLOS:MODIFIED-GENERIC-FUNCTION or some such would at least be clear. Andrew From lrw@SDSC.EDU Wed Jul 20 00:11:41 1994 Return-Path: Received: from mailserver.sdsc.edu ([198.17.46.33]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04925; Wed, 20 Jul 94 00:11:41 +0200 Received: from zippy.sdsc.edu by mailserver.sdsc.edu (4.1/4.8) id AA15136; Tue, 19 Jul 94 15:08:02 PDT Received: by zippy.sdsc.edu (5.65/1.10-client) id AA24795; Tue, 19 Jul 1994 15:07:37 -0700 Date: Tue, 19 Jul 1994 15:06:33 -0700 (PDT) From: Len Wanger Subject: Clisp on NT To: clisp-list In-Reply-To: <9407041311.AA17111@ma2s2.mathematik.uni-karlsruhe.de> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Had anyone ported clisp to NT? If not, does anybody know how much effort it would take? Len Wanger Project Sequoia 2000 -- Visualization San Diego Supercomputer Center From blake@netcom.com Wed Jul 20 03:48:52 1994 Return-Path: Received: from netcom.com (netcom11.netcom.com) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05053; Wed, 20 Jul 94 03:48:52 +0200 Received: by netcom.com (8.6.8.1/SMI-4.1/Netcom) id SAA22189; Tue, 19 Jul 1994 18:45:35 -0700 From: blake@netcom.com (Blake McBride) Message-Id: <199407200145.SAA22189@netcom11.netcom.com> Subject: Re: Clisp on NT To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 19 Jul 1994 18:45:34 -0700 (PDT) In-Reply-To: from "Len Wanger" at Jul 20, 94 00:11:59 am X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 454 > > > Had anyone ported clisp to NT? If not, does anybody know how much effort > it would take? > > Len Wanger > Project Sequoia 2000 -- Visualization > San Diego Supercomputer Center > > > I ported CLISP to DOS using the WATCOM 32 bit compiler. As long as you stick to character mode it should be very easy. -- Blake McBride (615) 790-8521 voice 3020 Liberty Hills Drive (615) 791-7736 fax Franklin, TN 37064 blake@netcom.com U.S.A. From lrw@SDSC.EDU Wed Jul 20 18:03:56 1994 Return-Path: Received: from mailserver.sdsc.edu (rosebud.sdsc.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00853; Wed, 20 Jul 94 18:03:56 +0200 Received: from zippy.sdsc.edu by mailserver.sdsc.edu (4.1/4.8) id AA14816; Wed, 20 Jul 94 07:48:16 PDT Received: by zippy.sdsc.edu (5.65/1.10-client) id AA27046; Wed, 20 Jul 1994 07:47:51 -0700 Date: Wed, 20 Jul 1994 07:47:13 -0700 (PDT) From: Len Wanger Subject: Re: Clisp on NT To: clisp-list In-Reply-To: <199407200145.SAA22189@netcom11.netcom.com> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII > I ported CLISP to DOS using the WATCOM 32 bit compiler. As long as you stick > to character mode it should be very easy. Thanks for the info. Len Wanger Project Sequoia 2000 -- Visualization San Diego Supercomputer Center From @sztaki.hu:MENCZEL@everx.szbk.u-szeged.hu Wed Jul 27 20:25:36 1994 Return-Path: <@sztaki.hu:MENCZEL@everx.szbk.u-szeged.hu> Received: from sztaki.hu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15589; Wed, 27 Jul 94 20:25:36 +0200 Received: by sztaki.hu with SMTP (5.67a8/SZTAKI-3.13) id GG20495; Wed, 27 Jul 1994 20:17:42 +0200 Received: from everx.szbk.u-szeged.hu by szbk.u-szeged.hu (5.0/SMI-SVR4) id AA11912; Wed, 27 Jul 1994 20:21:09 --100 Received: from SZBK_EVERX/MERCURY by everx.szbk.u-szeged.hu (Mercury 1.12); Wed, 27 Jul 94 20:14:45 MET DST Received: from MERCURY by SZBK_EVERX (Mercury 1.12); Wed, 27 Jul 94 20:14:37 MET DST From: "Menczel Laszlo" To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Wed, 27 Jul 1994 20:14:27 MET Subject: need: clisp manual, info on calling C functions from CLISP Priority: normal X-Mailer: Pegasus Mail v3.1 (R1a) Message-Id: Content-Length: 486 X-Charset: US X-Char-Esc: 0 I have recently obtained and installed (from a CD-ROM) CLISP on my Linux PC. However, no User's Manual (or anything resembling such a thing) was on the disk. I would appreciate if someone informed me whether such a manual exists, and if yes, how to get it. My second question: Is it possible to call compiled C functions (maybe library functions) from within CLISP? If yes, where is this described? Your advice will be appreciated. Laszlo Menczel From haible Sun Jul 31 19:39:07 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17724; Sun, 31 Jul 94 19:39:07 +0200 Date: Sun, 31 Jul 94 19:39:07 +0200 From: haible (Bruno Haible) Message-Id: <9407311739.AA17724@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: CLISP as a shared library? In comp.lang.lisp, Lawrence G. Mayka wrote: > In article peter@nmti.com (Peter da Silva) writes: > > In article , > Lawrence G. Mayka wrote: > > > I think the original question that started this thread was, "Why did > > people go to the trouble of designing a whole new language for these > > operations when it would have been so much easier to just graft them > > into Lisp?" > > They did, and then discovered a 1.5 megabyte executable to search through > a file was a bit of a drag on the system. > > About 700KB of CLISP is object-file text and could perhaps go into a > shared library. A large portion of the remainder is, I think, > byte-compiled Lisp text and could perhaps go into shared memory. > Perhaps someone will look into these possibilities? I think the byte-compiled Lisp stuff could go into a shared library as well. Perhaps someone will look into these possibilities? From tara@genome1.hgen.pitt.edu Tue Aug 2 21:54:29 1994 Return-Path: Received: from genome1.hgen.pitt.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21047; Tue, 2 Aug 94 21:54:29 +0200 Message-Id: <9408021954.AA21047@ma2s2.mathematik.uni-karlsruhe.de> Received: by genome1.hgen.pitt.edu (16.8/16.2) id AA12878; Tue, 2 Aug 94 15:54:20 -0400 From: Tara Cox Matise Subject: compiled vs. uncompiled code To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 2 Aug 94 15:54:20 EDT Mailer: Elm [revision: 70.30] Can someone please explain why my program bombs when I load in raw source code but not when I load in compiled code. I have a LISP program which I have been using for sometime with CLIP, with great success. Someone esle started using it today with a new dataset, and he encountered this error: *** - Lisp stack overflow. RESET I duplicated the error, and found that it does not occur when compiled code versus source code is loaded into CLISP. Thanks, Tara -- Tara Cox Matise,Ph.D. Department of Human Genetics University of Pittsburgh tara@genome1.hgen.pitt.edu http://www.cs.pitt.edu/~matise From haible Thu Aug 4 16:56:23 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22927; Thu, 4 Aug 94 16:56:23 +0200 Date: Thu, 4 Aug 94 16:56:23 +0200 From: haible (Bruno Haible) Message-Id: <9408041456.AA22927@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: compiled vs. uncompiled code > Can someone please explain why my program bombs when I load in raw > source code but not when I load in compiled code. Behaviour differences between interpreted and compiled code can have the following reasons: - Use of EVAL-WHEN (COMPILE). - Macros which destructively modify the code being interpreted or compiled. Evil. You can detect this using CLISP binaries which have IMMUTABLE support built in. > *** - Lisp stack overflow. RESET Compiled code uses less stack space. Maybe your code is deeply recursive. Find out like this: interrupt just before you get the stack overflow message, and look at the stack using the Backtrace commands. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Tue Aug 9 20:05:53 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29988; Tue, 9 Aug 94 20:05:53 +0200 Date: Tue, 9 Aug 94 20:05:53 +0200 From: haible (Bruno Haible) Message-Id: <9408091805.AA29988@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: Hackers: need your help This message is directed to you if you use Unix, have some C skills (using the C compiler and the debugger) and want to see generational garbage collection supported on your machine in the next CLISP release. "Generational" garbage collection is an algorithm that is more efficient on systems which have virtual memory, i.e. swap memory to disk when needed. It will hopefully enable efficient working with 11 megabyte data (such as Garnet) on 8 MB machines. Unfortunately, its implementation (well, my implementation of it) relies on some very unportable feature: Being able to catch unpriviledged memory accesses, which normally lead to core dumps. How to do this, has to be found out for each Unix variant separately. That's the point where I need your help. Unix systems without mmap() and mprotect() are ruled out. i386/Linux and Sparc/SunOS are already done. You can now try to get the following test program running. Please send me your modifications once you got a "Seems to work." from the program. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de begin 644 sigsegv.c.gz M'XL("*5002X W-I9W-E9W8N8P#56?]SVL82_YV_8NU,$XF'96,G:2;$[5 @ MCJ<$>PQ)VM?7T1/2 1H+'2,)8YKD?^_NGDY?(7':UQ]>IL7H=+>[M_NYW<\> MQ\T&-*'G).["#^@Q-Z$/M+/W B_#L/G2"V<"+-'?NA*R!9^#'@ M?PM_O@BV$,KP:"6CQ)D&H@4; :M(WOF> =B9[D*<(&($QJ=1\Y2BQK)1+R$ MWO!R? VA$%ZLQ,X&EFGTR?[KV X^5 MWH9R$PAO+L /$PEQY!ZO0__>\DC2<:-QW(0W<@-^PLKBE_!!P-*YI6V[ KWA MA^!$P@'\WSOBW9!IF\A/T"$2U[%%'\B,%5J(RW0 9*3];\%D(4((I+P%)U&^ MX(C@!D(O$-$3]H,3S==+$29Q"Y)H2])G?JAV,7/6 1A56&(<\F7X M4KER[KIP= 5'[[5JFW M4V.+KZ-U6'Q<1>CD='9J;/TUVE4?Q+VWZZ/-W<,X>KI[\HYA'#W;/?E,^1%! MT'B$$&T3%J[7"2$K@I63+$)GR4$FP+@RG%D+6(A($)XS]#D!(6-+G@":X\_7 MD;!(ZB,\9<$:#]!AOOZP\0BQZL]8(X)V!N]&E[_TKD:O&8D3"K4, KDAU$_] M) 8Y0^#.9+1T$@PRN$X(4X&:5CXB?A;)9<$Z2R.Z-[3'DW[/?C/H]@_;X\M\# M>Z+"W%\^JC$8 MA!\\W'?2]TQEH*?6%^32RT:F5NEP,15P%&,5*+2XYJ,,-+G[BY"I^Z&P8!L? MD\TQK\F&,U\6Y&1+>&OTCA:2\,(6C*9ZK<^]"8;9:5"V1>>47VD?&>GY;E7? M:Q&=1GF'OB3E*?95.:((> Z6(2<6L,#4C <0:\..-)@?7>5_S_#/7CPWX=.G M;,"VZT.7-(((USH7&/:IP/Q,]0T/%9ZRH1^N[Z%MM:VS%U1,$C(L\&]%P&F9 M*@6>TXB.21.6F#2!U,"[T'<%"7.==C85:AV 1IQM_SRX&0V&MIV]R=P;D.CC/,25 MI:^[[X83N]OOWPS&8TR.!I[KM?2#&YVRH!ST M2LZ;[J@_'-S8W9L+Y (34"B@5?LG]@>](4 *F0[F,;(5 Q!(*OFXM-/8:VQY M!JOPZHR^TML/IIDD2 M.N NG*C)*';7/.?CN MM]/3_]514]1G"YX,GR2* Y3: 4MEZH0;'"3:6$WBE,]O8^(^1KMMEDD7ET-T M*;8J5/I2Y>4FX[I[,2 "48K/"9.$RU_@#'[\L2[R;HFI/2K*O+ZYFB"EZ/;A MIG\U&OY:?V%_N+F<# #>];N3[L^#7W->0 H/- )V>,94M;&KVRZJ.K1Q$3EN MXJ.;/#%=S^?$Q[@:*EB7"'@GJ^T*_EC6Y5*P*RE=GOS>:= +]+T=2AZF,M\H M$($2^P>#<4;$G#]/^?.,/Y_RYS/^Y!*K089?,Z4/6-II?.0C(*B=X@YD)4D4 MD>\#VBXES-Q#CC M559R#JPNQ$%>I^*8+Z>0OZ\(X+&Z"!XN",G?8O?M)POR1 PG]]\%7NLA?RS+ M^D]X^*#(D'/$O9\8)_CUN <# :5B7K:IV=/GSW__D6G M8.R0FEKL*AF9I:7G9-@]VU0NUV9I&H$-TACJ;-$R*M2S!,$= 63P\2)/8:$9.J.Y_\\:136U!!="@Q/JY84;-P<( NS$/65B&K M'5GX")\IH8@ F2_V%-IGJT7+IA%B-^%:*E.+S"M$P6XU$@\PI>9>[:*OH&T)LM7D-+]"YJYFOT[+6;O5-V$Z O(OT>HKLX1M'*R6IJ7VXG5)>T(XT]-!1FU";@[;LQ^MT7 64KJ(0F6KM8EFYO$X:_XQ T,-G=06&[I 4GF:V<^(S#+(G.'!^A^+)F+QIRJ4@'1UF?_'T=.:'- M_$;\9>VS+FLEB"]%N:Y%^L4N+$3BJ>K9,ZX]04 MM6D^B*"FL_T('GN_1J>?8,2-1F&*3C])IR-)V (-4[+;J@,VJ*GW- M 2-FB)/6"%_E%F*(='')OY>H2]5@)Q"YQT3^ZJ5>1=J=>G 5"*3%+77YFO@H M^F_Z]'ZO3_^&2_E8\)Z_W9OW-6_R%8N"%"F;[A2*+AO6(AEK*_)K5+SPOWF%[L7(@9?:%_^!,)\EP3L'@ end From hjstein@MATH.HUJI.AC.IL Tue Aug 9 21:37:29 1994 Return-Path: Received: from sunset.ma.huji.ac.il by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02003; Tue, 9 Aug 94 21:37:29 +0200 Received: by sunset.ma.huji.ac.il id AA24903 (5.65c/HUJI 4.152 for clisp-list ); Tue, 9 Aug 1994 22:32:21 +0300 Date: Tue, 9 Aug 1994 22:32:21 +0300 From: "Harvey J. Stein" Message-Id: <199408091932.AA24903@sunset.ma.huji.ac.il> To: clisp-list Subject: Number crunching in CLISP. Bruno Haible writes: I have to write some serious number crunching code, and I'd like to write it in CLISP. If my memory serves me correctly, Bruno once told me that CLISP does all floating point operations by itself (i.e. - doesn't use the FPU). Is this correct? If so, I won't be able to use it. If it does do floating point in software, how hard is it to change this? Are floating point numbers stored in system format (as a C float)? Is the numerical code well isolated? If it doesn't use the FPU & changing it would be difficult, then what about some other common lisps - does anyone know about GCL & XLISP? From the following quick & simpleminded test, it seems that neither CLISP nor XLISP will be suitable: ------------------ File test.lsp -------------------- (defvar i 1) (time (dotimes (j 100000) (setq i (* i 1.00001)))) ------------------End file test.lsp ----------------------- CLISP run (best of 3): > (load "test.lsp") ;; Loading file test.lsp ... Real time: 25.37575 sec. Run time: 25.36 sec. Space: 800456 Bytes GC: 1, GC time: 0.28 sec. ;; Loading of file test.lsp is finished. T XLISPSTAT run (best of 3): > (load "test.lsp") ; loading "test.lsp" The evaluation took 19.40 seconds T CLISP run of compiled code (best of 3): > (compile-file "test.lsp") Compiling file /new/home/hjstein/test.lsp ... Compilation of file /new/home/hjstein/test.lsp is finished. 0 errors, 0 warnings T . . . > (load "test") ;; Loading file /new/home/hjstein/test.fas ... Real time: 4.628368 sec. Run time: 4.62 sec. Space: 800000 Bytes GC: 1, GC time: 0.28 sec. ;; Loading of file /new/home/hjstein/test.fas is finished. T I didn't run XLISPSTAT compiled because the compiler just came out & I haven't picked it up yet. Here's what I'd consider roughly equivalent C code, along with it's runtime: main() { long j; double i; i = 1; for (j = 0; j < 1000000; j++) i = i * 1.00001; } hjstein:~$ time /home/hjstein/test real 1.0 user 1.6 sys 0.0 All this is on a 486dx20 running Linux. Since the C code is doing the loop 10x as many times as the lisp code (I had to crank it up to measure it with the time command), it seems that this C code is over 20 times faster than the compiled CLISP code. If the CLISP was only twice as slow, or even only 5 times slower, I could probably live with it for prototyping purposes (I have things which run for hours on end). So, how can I speed it up? Thanks, Harvey J. Stein Berger Financial Research hjstein@math.huji.ac.il From haible Tue Aug 9 22:08:39 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02082; Tue, 9 Aug 94 22:08:39 +0200 Date: Tue, 9 Aug 94 22:08:39 +0200 From: haible (Bruno Haible) Message-Id: <9408092008.AA02082@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Number crunching in CLISP. > If my memory serves me correctly, Bruno once told > me that CLISP does all floating point operations by itself (i.e. - > doesn't use the FPU). Is this correct? Yes, on most machines. > If it does do floating point in software, how hard is it to > change this? Not very hard: add "#define FAST_DOUBLE" and "#define FAST_FLOAT" to lispbibl.d, -fallow-single-precision to the CFLAGS in the makefile (need gcc-2.6.0 for this), and recompile. > Are floating point numbers stored in system format (as a C float)? Yes, if the floating point operations are done in hardware, the system format (i.e. IEEE) is used. > Is the numerical code well isolated? Yes, it is a single file called lisparit0.d. But that won't help you much because while the floating point operations are done in hardware, the boxing (allocating storage for the float) and the function call and type dispatching overheads remain. For these kinds of computations, try GCL. You will probably have to add many disgusting (DECLARE (DOUBLE-FLOAT ...)) declarations to your program. (Linux binaries are in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/gcl/.) Btw, your comparison isn't fair since the variable i is a local variable in the C and a global (i.e. more expensive) variable in the Lisp version of your benchmark. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From marcus@ee.pdx.edu Tue Aug 9 22:31:51 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02215; Tue, 9 Aug 94 22:31:51 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA13748; Tue, 9 Aug 94 13:26:31 PDT Date: Tue, 9 Aug 94 13:26:31 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9408092026.AA13748@ursula.ee.pdx.edu> To: clisp-list Subject: Number crunching in CLISP. In-Reply-To: <199408091932.AA24903@sunset.ma.huji.ac.il> References: <199408091932.AA24903@sunset.ma.huji.ac.il> >>>>> "Harvey" == Harvey J Stein writes: Harvey> Bruno once told me that CLISP does Harvey> all floating point operations by itself (i.e. - doesn't use Harvey> the FPU). Is this correct? If so, I won't be able to use it. Harvey> If it does do floating point in software, how hard is it to Harvey> change this? Are floating point numbers stored in system Harvey> format (as a C float)? Platforms like hppa, m88000, rs6000, and sparc can use floating point hardware. Look aridecl.d, arilev0.d, dfloat.d, intlog.d, and sfloat.d for the dependencies. Declare support in lispbibl.d. FAST_DOUBLE and FAST_FLOAT is what you are looking for. Harvey> If it doesn't use the FPU & changing it would be difficult, Harvey> then what about some other common lisps - does anyone know Harvey> about GCL & XLISP? Harvey> From the following quick & simpleminded Harvey> test, it seems that neither CLISP nor XLISP will be suitable: Harvey> ------------------ File test.lsp -------------------- Harvey> (defvar i 1) Harvey> (time (dotimes (j 100000) (setq i (* i 1.00001)))) Harvey> ------------------End file test.lsp ----------------------- The floating point isn't the bottleneck, CLISP's floating point code is exceptional. The difference between CLISP and C is function call (byte-code-interpreter) overhead. For loops like this, there it is always going to be noticeable difference. Using integer arithmetic such as (setq i (* i 1)) or (incf i) won't make it more than about twice as fast. With, GCL you will get results similar to C [for(j=0;j<100000;j++) i*=1.0001;]. On the other hand, you will be waiting and waiting and waiting for compiles. XLISPSTAT (and its new experimental compiler) will likely be tuned for the type of vector-reducing operations that are common in the XLISPSTAT code. Harvey> Since the C code is doing the loop 10x as many times as the Harvey> lisp code (I had to crank it up to measure it with the time Harvey> command), it seems that this C code is over 20 times faster Harvey> than the compiled CLISP code. If the CLISP was only twice as Harvey> slow, or even only 5 times slower, I could probably live with Harvey> it for prototyping purposes (I have things which run for hours Harvey> on end). So, how can I speed it up? For this excruciatingly unrealistic code, I think it is the short answer is "You can't". Write portions of it in C. Use the approach described in foreign.txt (or ask me to point you to the alpha CLISP with FFI). From hjstein@MATH.HUJI.AC.IL Wed Aug 10 00:26:00 1994 Return-Path: Received: from sunset.ma.huji.ac.il by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02418; Wed, 10 Aug 94 00:26:00 +0200 Received: by sunset.ma.huji.ac.il id AA25712 (5.65c/HUJI 4.152 for clisp-list ); Wed, 10 Aug 1994 01:21:01 +0300 Date: Wed, 10 Aug 1994 01:21:01 +0300 From: "Harvey J. Stein" Message-Id: <199408092221.AA25712@sunset.ma.huji.ac.il> To: clisp-list In-Reply-To: <9408092026.AA13748@ursula.ee.pdx.edu> Subject: Number crunching in CLISP. Thank you, Bruno Haible & Marcus Daniels for pointing out that it's easy to get CLISP to use the FPU, and how to do it. Marcus raised questions as to what kind of code I will be using in his comment: > For this excruciatingly unrealistic code, I think it is the short answer is > "You can't". Write portions of it in C. Use the approach described > in foreign.txt (or ask me to point you to the alpha CLISP with FFI). The kind of code I'm considering basically is solving recursive functions. I might have something like: (defun value (level node) (cond ((= level *MAX_LEVEL*) 100) (t (let ((p1 (complicate-expression-involving-exponentials)) (p2 (complicate-expression-involving-exponentials)) (p3 (- 1 p1 p2))) (* (exp (* (aref *RATE* level) (aref *DT* level))) (+ (* p1 (value (+1 level) (+1 node))) (* p2 (value (+1 level) node)) (* p3 (value (+1 level) (-1 node))))))))) where I need to compute (value 0 0) for various values of *RATE* and *DT*. This is very simplified & off the top of my head, but is basically the kind of thing we're looking at. The real thing would have more conditionals embedded in & afew more array references. We have some functions individually coded in FORTRAN which takes maybe a couple of seconds to compute (on a 486dx-66). Adding new functions in FORTRAN is a mess, so I'd like to code a system for investigating functions of this form in LISP. Investigating these functions involves plotting their value as a function of various input parameters. I usually use around 300 points, thus taking about 5 minutes per graph. Then, varying a bunch of other input parameters, I end up with maybe 60 graphs to look at, thus taking about 5 hours to generate, which I spread around 5 machines so that I can look at them in an hour. My dream is to code this in LISP & get it to run comparably. Then, maybe I wouldn't even have to recode it. If I can code this in LISP & get even reasonable speed, then that will be good enough for general testing & some comparative analysis. Thanks, Harvey J. Stein Berger Financial Research hjstein@math.huji.ac.il From reggie@muon.phys.washington.edu Wed Aug 10 01:35:25 1994 Return-Path: Received: from muon.phys.washington.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02517; Wed, 10 Aug 94 01:35:25 +0200 Received: by muon.phys.washington.edu via SMTP (920330.SGI/911001.SGI) for clisp-list@ma2s2.mathematik.uni-karlsruhe.de id AA06984; Tue, 9 Aug 94 16:29:33 -0700 Message-Id: <9408092329.AA06984@muon.phys.washington.edu> To: clisp-list Subject: Re: Number crunching in CLISP. In-Reply-To: Your message of "Tue, 09 Aug 1994 22:10:06 +0200." <9408092008.AA02082@ma2s2.mathematik.uni-karlsruhe.de> Date: Tue, 09 Aug 1994 16:29:33 -0700 From: Reggie Perry > Received: from nz11.rz.uni-karlsruhe.de by muon.phys.washington.edu via SMTP (920330.SGI/911001.SGI) > for reggie id AA05331; Tue, 9 Aug 94 13:07:30 -0700 > Received: from ma2s2.mathematik.uni-karlsruhe.de by nz11.rz.uni-karlsruhe.de > with SMTP (PP); Tue, 9 Aug 1994 22:03:35 +0200 > Received: from (localhost) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) > id AA02115; Tue, 9 Aug 94 22:10:08 +0200 > Date: Tue, 9 Aug 94 22:10:06 +0200 > Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de > Message-Id: <9408092008.AA02082@ma2s2.mathematik.uni-karlsruhe.de> > Originator: clisp-list@ma2s2.mathematik.uni-karlsruhe.de > Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de > Reply-To: clisp-list > Sender: clisp-list@ma2s2.mathematik.uni-karlsruhe.de > Version: 5.5 -- Copyright (c) 1991/92, Anastasios Kotsikonas > From: haible@ma2s2.mathematik.uni-karlsruhe.de (Bruno Haible) > To: Multiple recipients of list > Subject: Re: Number crunching in CLISP. > > > If my memory serves me correctly, Bruno once told > > me that CLISP does all floating point operations by itself (i.e. - > > doesn't use the FPU). Is this correct? > > Yes, on most machines. > > > If it does do floating point in software, how hard is it to > > change this? > > Not very hard: add "#define FAST_DOUBLE" and "#define FAST_FLOAT" to > lispbibl.d, -fallow-single-precision to the CFLAGS in the makefile > (need gcc-2.6.0 for this), and recompile. > > > Are floating point numbers stored in system format (as a C float)? > > Yes, if the floating point operations are done in hardware, the > system format (i.e. IEEE) is used. > > > Is the numerical code well isolated? > > Yes, it is a single file called lisparit0.d. > > But that won't help you much because while the floating point operations > are done in hardware, the boxing (allocating storage for the float) > and the function call and type dispatching overheads remain. Is there any way to get the float operations unboxed with proper declarations? -Reggie From marcus@ee.pdx.edu Wed Aug 10 13:23:26 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03204; Wed, 10 Aug 94 13:23:26 +0200 Received: by ursula.ee.pdx.edu (4.1/SMI-4.1) id AA00333; Wed, 10 Aug 94 04:17:56 PDT Date: Wed, 10 Aug 94 04:17:56 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9408101117.AA00333@ursula.ee.pdx.edu> To: clisp-list Subject: Number crunching in CLISP. In-Reply-To: <199408092221.AA25712@sunset.ma.huji.ac.il> References: <199408092221.AA25712@sunset.ma.huji.ac.il> >>>>> "Harvey" == Harvey J Stein writes: Harvey> The kind of code I'm considering basically is solving Harvey> recursive functions. I might have something like: (defun value (level node) (cond ((= level *MAX_LEVEL*) 100) (t (let ((p1 (complicate-expression-involving-exponentials)) (p2 (complicate-expression-involving-exponentials)) (p3 (- 1 p1 p2))) (* (exp (* (aref *RATE* level) (aref *DT* level))) (+ (* p1 (value (+1 level) (+1 node))) (* p2 (value (+1 level) node)) (* p3 (value (+1 level) (-1 node))))))))) I'd say that would be at least 5* faster with CLISP than a waste-time loop. If you are writing code from scratch you might do so with CLiCC in mind (CL -> C compiler -- runs on CLISP). If speed is the top priority, and you have the right hardware try CMUCL. From RLS@waikato.ac.nz Thu Aug 18 00:47:03 1994 Return-Path: Received: from grace.waikato.ac.nz by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15430; Thu, 18 Aug 94 00:47:03 +0200 Message-Id: <9408172247.AA15430@ma2s2.mathematik.uni-karlsruhe.de> Date: Thu, 18 Aug 94 10:38 +1200 From: RLS@waikato.ac.nz Subject: Re: Number crunching in CLISP. To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de X-Vms-To: IN%"clisp-list@ma2s2.mathematik.uni-karlsruhe.de" > >> If my memory serves me correctly, Bruno once told >> me that CLISP does all floating point operations by itself (i.e. - >> doesn't use the FPU). Is this correct? > >Yes, on most machines. > >> If it does do floating point in software, how hard is it to >> change this? >> >Not very hard: add "#define FAST_DOUBLE" and "#define FAST_FLOAT" to >lispbibl.d, -fallow-single-precision to the CFLAGS in the makefile >(need gcc-2.6.0 for this), and recompile. > >> Are floating point numbers stored in system format (as a C float)? > >Yes, if the floating point operations are done in hardware, the >system format (i.e. IEEE) is used. > >> Is the numerical code well isolated? > >Yes, it is a single file called lisparit0.d. > >But that won't help you much because while the floating point operations >are done in hardware, the boxing (allocating storage for the float) >and the function call and type dispatching overheads remain. > >For these kinds of computations, try GCL. You will probably have to add >many disgusting (DECLARE (DOUBLE-FLOAT ...)) declarations to your program. >(Linux binaries are in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/gcl/.) > > >Btw, your comparison isn't fair since the variable i is a local variable >in the C and a global (i.e. more expensive) variable in the Lisp version >of your benchmark. > We have just recompiled clisp with these defines included for my 486dx2-66 linux, and the sparc 2's here at varsity and the alpha 2000's and for the lisp loop given in a previous message (a local version): (time (do ((i 1.0d0 (* 1.00001d0 i)) (j 0 (1+ j))) ((= j 100000)) (declare (fixnum j)) (declare (double-float i)) ) ) and the times were: 486-dx2 : Real time: 12.982278 sec. Run time: 12.64 sec. Space: 1200532 Bytes GC: 2, GC time: 0.52 sec. sparc2 : Real time: 31.588968 sec. Run time: 31.47 sec. Space: 1600552 Bytes GC: 3, GC time: 0.7 sec. alpha : Real time: 11.301584 sec. Run time: 11.261088 sec. Space: 1601032 Bytes GC: 3, GC time: 0.489952 sec. These results would seem to say that somehow my PC is as fast as the alphas? Also it makes the suns look pretty slow? Is the linux version really using the FPU now? (It is no faster than it was before I rebuilt the clisp!). The only thing that we didn't do was use gcc-2.6 (which we don't have :-() Is this a big bad mistake? (BTW we used gcc-2.5.8) I've heard that Marcus is investigating GNU IUL for unboxing double-float arrays for the FFI (foreign function interface), does this mean that we might get unboxed double-float arrays in CLISP, i.e. faster math? Well hopefully that's some food for thought. Richard Shepherd, Martin Glanvill From marcus@ee.pdx.edu Thu Aug 18 14:15:35 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15803; Thu, 18 Aug 94 14:15:35 +0200 Received: by ursula.ee.pdx.edu (4.1/CATastrophe-8/7/94.1-P) id AA15714; Thu, 18 Aug 94 05:08:51 PDT Date: Thu, 18 Aug 94 05:08:51 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9408181208.AA15714@ursula.ee.pdx.edu> To: clisp-list Subject: Re: Number crunching in CLISP. In-Reply-To: <9408172247.AA15430@ma2s2.mathematik.uni-karlsruhe.de> References: <9408172247.AA15430@ma2s2.mathematik.uni-karlsruhe.de> >>>>> "RLS" == RLS writes: RLS> I've heard that Marcus is investigating GNU IUL for unboxing RLS> double-float arrays for the FFI (foreign function interface), RLS> does this mean that we might get unboxed double-float arrays in RLS> CLISP, i.e. faster math? Parc's ILU isn't going to help with boxing overhead for double-arrays. Since the goal with unboxed double arrays is to avoid copying and reformatting between LISP and foreign code, there is the assumption that a shared format is used (e.g. IEEE). That currently isn't the case. Much of the cost in these types of loop is byte-interpreter overhead, not the actual arithmetic. The Alpha AXP, with unboxed single floats, may give you an idea of boxing costs. (defun test-integer (cnt) (let ((sum 0)) (dotimes (x cnt) (incf sum 2)))) (defun test-float (cnt) (let ((sum 0.0)) (dotimes (x cnt) (incf sum 2.0)))) (defun test-double (cnt) (let ((sum 0.0d0)) (dotimes (x cnt) (incf sum 2.0d0)))) (compile 'test-integer) (compile 'test-float) (compile 'test-double) (time (test-integer 1000000)) (time (test-float 1000000)) (time (test-double 1000000)) Alpha AXP: (integer) Real time: 16.448345 sec. Run time: 7.51032 sec. Space: 0 Bytes (float) Real time: 22.088549 sec. Run time: 8.887456 sec. Space: 0 Bytes (double) Real time: 49.657707 sec. Run time: 19.948463 sec. Space: 15999984 Bytes GC: 27, GC time: 3.202256 sec. From haible Thu Aug 18 16:07:13 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16164; Thu, 18 Aug 94 16:07:13 +0200 Date: Thu, 18 Aug 94 16:07:13 +0200 From: haible (Bruno Haible) Message-Id: <9408181407.AA16164@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Number crunching in CLISP. > (time (do ...)) > > sparc2 : Real time: 31.588968 sec. > Run time: 31.47 sec. > Space: 1600552 Bytes > GC: 3, GC time: 0.7 sec. You were benchmarking mostly the interpreter! Compile things before timing them: (locally (declare (compile)) (time (do ...))) Real time: 3.758725 sec. Run time: 2.88 sec. Space: 1600000 Bytes GC: 3, GC time: 0.84 sec. > Also it makes the suns look pretty slow? The SPARC architecture makes clisp's recursive interpreter a bit slow. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Tue Aug 23 15:55:50 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00725; Tue, 23 Aug 94 15:55:50 +0200 Date: Tue, 23 Aug 94 15:55:50 +0200 From: haible (Bruno Haible) Message-Id: <9408231355.AA00725@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: New version of old CLISP A new version of my current personal source of CLISP is at the usual place, in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source-haible/clispsrc.tar.z. Change log since 4 July 1994: 23 August 1994 ============== User visible changes -------------------- * X3J13 vote <64> is implemented: New macro DESTRUCTURING-BIND. * The function ED can now edit functions that have been entered in interpreted form even if they have later been compiled. * New function UNCOMPILE. (UNCOMPILE function-name) undoes the effect of (COMPILE function-name) if the function's definition had been entered in interpreted form. * The OPEN option :IF-EXISTS :RENAME-AND-DELETE now deletes the renamed file. Previously :RENAME-AND-DELETE was equivalent to :RENAME. * (LISP-IMPLEMENTATION-VERSION) returns a more precise version string. * Readline library: Completion of a function call with no arguments automatically adds the closing parenthesis. * Readline library: When a closing parenthesis is typed, the corresponding opening parenthesis is displayed. Portability ----------- * Added support for Convex. Thanks to Marcus Daniels. * Added support for SCO. Thanks to Cathy Bareiss and Marcus Daniels. * More NeXTstep support. * More Sinix support. Thanks to Manfred Weichel. * Updated support for AmigaOS. Thanks to Jörg Höhle. * Some modification for the sake of gcc-2.6. * Added GNU malloc. For HP-UX. * Added a bunch of character set conversion utilities. Covers the ASCII, ISO Latin-1, IBM PC, HP Roman8, NeXTstep and Atari ST character sets. * The `configure' script now prints its results. * Floating point computations on some CPUs (Sparc, HP-PA, M88000, RS/6000): Fixed some confusion between overflow and NaN and between underflow and zero. * Removed support for Atari Turbo-C (now known as PURE-C). Other modifications ------------------- * Copyright clarification. * Generational garbage collection. This works only for Unix implementations with powerful virtual memory management, currently only SunOS. * Improved virtual memory efficiency: - Memory model SPVW_PAGES: don't put a piece of management data into every page. - Memory model SPVW_BLOCKS: compact conses, don't shuffle them, so that they are kept sorted according to their age. - Memory model SPVW_PURE_BLOCKS: pages containing garbage are immediately freed. * Unix version only: To reduce the startup time, try to use mmap() instead of read() for the startup file. * Added a readline manual page. * Miscellaneous documentation updates. Be forewarned that the generational garbage collection may not work on various Unix systems. I have tested it on SunOS 4 and 5, it does not work on unmodified Linux and may uncover operating system bugs on other systems. Please tell me about your experiences. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From mauricio@cs.columbia.edu Fri Aug 26 19:52:04 1994 Return-Path: Received: from cs.columbia.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03906; Fri, 26 Aug 94 19:52:04 +0200 Received: from shadow.cs.columbia.edu (shadow.cs.columbia.edu [128.59.10.4]) by cs.columbia.edu (8.6.9/8.6.6) with ESMTP id NAA18973 for ; Fri, 26 Aug 1994 13:42:15 -0400 Received: (from mauricio@localhost) by shadow.cs.columbia.edu (8.6.9/8.6.6) id NAA00687 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Fri, 26 Aug 1994 13:42:19 -0400 Date: Fri, 26 Aug 1994 13:42:19 -0400 From: Mauricio Hernandez Message-Id: <199408261742.NAA00687@shadow.cs.columbia.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Clisp over Linux problem Hi, I am having a small problem installing CLISP over LINUX (Slackware distribution, kernel 1.0.9). The following trasncript shows the problem: bash# pwd /usr/lib/lisp bash# ls -F ANNOUNCE LISP-tutorial.txt clisp.man impnotes.txt CLOS-guide.txt README config.fas lisp.run* COPYRIGHT SUMMARY config.lib lispinit.mem GNU-GPL clisp.1 config.lsp lispinit.mem.old bash# lisp.run -M lispinit.mem i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I I I I I I I 8 8 8 8 8 8 I I I I I I I 8 8 8 ooooo 8oooo I \ `+' / I 8 8 8 8 8 \ `-+-' / 8 o 8 8 o 8 8 `-__|__-' ooooo 8oooooo ooo8ooo ooooo 8 | ------+------ Copyright (c) Bruno Haible, Michael Stoll 1992, 1993 > (compile-file "config") *** - incorrect date: 2.10.1993, 12h59m32s, time zone 300 1. Break> (quit) Bye. bash# date Thu Aug 25 12:55:32 EDT 1994 bash# How do I get rid of the "incorrect date" message? I do not know what version of CLISP I am using. All I know it came with the distribution disk of Linux (Slackware). Thanks for any help, Mauricio -- Mauricio A. Hernandez (Graduate Student) mauricio@cs.columbia.edu Department of Computer Science, Columbia University. New York, NY From kovach@franus.edu Thu Sep 1 21:24:40 1994 Return-Path: Received: from dialup.oar.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA12040; Thu, 1 Sep 94 21:24:40 +0200 Received: from a.franus.edu for kovach@franus.edu by dialup.oar.net (PIPE/8.6.8.1/931123.1402) id PAA16306; Thu, 1 Sep 1994 15:14:05 -0400 X-Mailer: InterCon TCP/Connect II 1.1 Message-Id: <9409011520.AA12584@a.franus.edu> Date: Thu, 1 Sep 1994 15:20:12 -0500 From: "Edward G. Kovach" To: haible@ma2s2.mathematik.uni-karlsruhe.de Cc: kovach@franus.edu Subject: CLISP on Novel networks Hi, One of the professors I work with is interested in using CLISP for his programming languages course. He would want to put CLISP on our IBM LAN. This raises two questions for us. 1. What registration fee would you want for this? 2. Has anyone put CLISP on an IBM Novel network? (Novel 3.12, the computers are 386s and 486s) Can it be done easily? are there any major problems? Thanks, Ed Kovach kovach@franus.edu ps As before, I will BCC this to the CLISP listserv. EGK From haible Fri Sep 2 16:12:06 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA13124; Fri, 2 Sep 94 16:12:06 +0200 Date: Fri, 2 Sep 94 16:12:06 +0200 From: haible (Bruno Haible) Message-Id: <9409021412.AA13124@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: CLISP on Novel networks Edward G. Kovach asks: > 1. What registration fee would you want for this? Registration fee? Are we bureaucrates? > 2. Has anyone put CLISP on an IBM Novel network? > the computers are 386s and 486s The operating systems supported on 386/486 by CLISP are DOS, MS Windows 3.1 (DOS box only), OS/2, Linux, SysVR4, SunOS 4. You'll certainly know whether your "Novel" is compatible to one of these. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From rudloff@steinway.u-strasbg.fr Wed Sep 7 14:38:23 1994 Return-Path: Received: from steinway.u-strasbg.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05303; Wed, 7 Sep 94 14:38:23 +0200 Received: by steinway.u-strasbg.fr (NX5.67d/NX3.0M) id AA02053; Wed, 7 Sep 94 14:22:04 +0100 Date: Wed, 7 Sep 94 14:22:04 +0100 From: Rudloff Message-Id: <9409071322.AA02053@steinway.u-strasbg.fr> Received: by NeXT.Mailer (1.100) Received: by NeXT Mailer (1.100) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Lisp and C Reply-To: rudloff@steinway.u-strasbg.fr Hi, I'am a NeXT user and I would like to use a good lisp environment on NeXT (but my problem concerns all systems). My aim (but I begin to think that it's a dream) is the following: - To make an App with Project Builder - To write some Lisp routines, to compile them, and get .o object files - To link these compiled lisp routines (and the lisp kernel needed) with my App and to call them from a C function. The problem is that CLisp just produce fasl files and not .o. gcl produce .o file but I didn't reach to do what I wanted. Did someone try such things? Do exist a good lisp environment for NeXTStep? Do someone use NeXTStep Interface with Lisp program? How? Thanks in advance. -------------------------------------------------------------- David Rudloff e-mail: rudloff@steinway.u-strasbg.fr -------------------------------------------------------------- ERIC (Equipe de Recherche en Ingenierie des connaissanes) ENSAIS 24 Bd de la Victoire 67084 STRASBOURG CEDEX Tel:88.14.47.53 Fax:88.24.14.90 -------------------------------------------------------------- From ono@n105.is.tokushima-u.ac.jp Thu Sep 8 09:43:45 1994 Received: from is.is.tokushima-u.ac.jp ([150.59.20.201]) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08193; Thu, 8 Sep 94 09:43:45 +0200 Received: from louvre.is.tokushima-u.ac.jp (n105.is.tokushima-u.ac.jp) by is.is.tokushima-u.ac.jp (5.67+1.6W/2.7W-tokushima-u-slave-1.0) id AA07008; Thu, 8 Sep 94 16:32:17 JST Received: by louvre.is.tokushima-u.ac.jp (NX5.67c/6.4J.6) id AA00604; Thu, 8 Sep 94 16:32:56 +0900 Date: Thu, 8 Sep 94 16:32:56 +0900 From: ono@n105.is.tokushima-u.ac.jp (Norihiko Ono) Return-Path: Message-Id: <9409080732.AA00604@louvre.is.tokushima-u.ac.jp> Received: by NeXT.Mailer (1.87.2) Received: by NeXT Mailer (1.87.2) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: can't install clisp in NeXTStep 3.0 Cc: hkt@zkm.de Reply-To: ono@is.tokushima-u.ac.jp Hello, Recently I have started subscribing this mailing-list and found: > I can't seem to install clisp on NeXTStep 3.0 because of problems > with libnoreadline.a and libreadline.a. Any idea what the workaround > is? im using the clisp version from > binaries/next/clisp-english.tar.gz > > % cc lisp.a libnoreadline.a -ltermcap -s -o lisp.run > /bin/ld: libnoreadline.a bad magic number (not a Mach-O file) > > -Rick Taube > hkt@zkm.de > Zentrum fuer Kunst und Medientechnologie > Ritterstr. 42 76137 Karlsruhe Germany I encountered the same problem under Japanese version of NeXTSTEP 3.0 -- NeXTSTEP 3.0J. Probably this problem has been already resolved by someone, but I've just bypassed it. The following steps seem to be needed before using cc: jenny libnoreadline.a ranlib libnoreadline.a ranlib lisp.a However, yet another problem I have with thus generated clisp. When I try to let it evaluate `(fact 1000)' employing the following definition: (defun fact (n) (if (zerop n) 1 (* n (fact (1- n))))) `memory fault' error happens on my NeXTstation Turbo. So long as parameter of `fact' is a small positive integer, say 100, the function is evaluated successfully. Any suggestion would be appreciated. Thank you. -- Norihiko Ono Dept. of Information Science and Intelligent Systems Faculty of Engineering, University of Tokushima Email: ono@is.tokushima-u.ac.jp Phone: +81 886 56 7509 F A X: +81 886 56 7511 From eru@tele.nokia.fi Thu Sep 8 10:39:28 1994 Return-Path: Received: from ns.ntc.nokia.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08329; Thu, 8 Sep 94 10:39:28 +0200 Received: from tnds05.tele.nokia.fi (tnds05.tele.nokia.fi [131.228.116.51]) by ns.ntc.nokia.com (8.6.9/8.6.9) with ESMTP id KAA27091 for ; Thu, 8 Sep 1994 10:40:17 +0300 Received: from tnso04.tele.nokia.fi (tnso04.tele.nokia.fi [131.228.116.144]) by tnds05.tele.nokia.fi (8.6.9/8.6.6/1.2.kim) with SMTP id LAA04333; Thu, 8 Sep 1994 11:27:55 +0300 (for ) Date: Thu, 8 Sep 1994 11:27:55 +0300 From: Erkki Ruohtula Message-Id: <199409080827.LAA04333@tnds05.tele.nokia.fi> Received: by tnso04.tele.nokia.fi (4.1/SMI-4.1) id AA01609; Thu, 8 Sep 94 11:27:50 +0300 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Clisp & VAX/VMS Hello, I would like to hear opinions about how hard it would be to get Clisp running on VAX/VMS. I seem to recall that at one point clisp sources had some VMS-related code, but apparently it never was finished, and was later removed. Was it due to lack of interest, or because of some hard technical obstacle? Clisp has support for VAX/unix. If we assume that the VMS port of GCC 2.X is always available to someone who wishes to compile Clisp, this should simplify things. No need to worry about the quirks of VAX-C. Besides GCC for VMS employs as its last pass a port of the GAS assembler with unix-style syntax, so VAX inline assembly things should in theory work unmodified. Porting the "readline" stuff (which involves TTY modes that are entirely different on VMS) could be initially forgotten, because VMS has a simple built-in command-line editor. Are there any other serious system dependencies? Erkki From sitter@mx304.tfh-berlin.de Thu Sep 8 10:55:46 1994 Return-Path: Received: from mx304.tfh-berlin.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08426; Thu, 8 Sep 94 10:55:46 +0200 Message-Id: <9409080855.AA08426@ma2s2.mathematik.uni-karlsruhe.de> From: sitter@mx304.tfh-berlin.de Subject: clisp for MS-Windows? To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 8 Sep 1994 10:44:13 +0100 (MDT) >From: "sitter" Cc: sitter@mx304.tfh-berlin.de X-Mailer: ELM [version 2.4 PL23] Content-Type: text Content-Length: 145 Are there any projects about ? There are not many high-level development tools for MS-Windows ... yours, Stefan (sitter@tfh-berlin.de) From marcus@ee.pdx.edu Thu Sep 8 11:54:44 1994 Return-Path: Received: from ursula.ee.pdx.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08703; Thu, 8 Sep 94 11:54:44 +0200 Received: by ursula.ee.pdx.edu (4.1/CATastrophe-8/24/94-P) id AA21992; Thu, 8 Sep 94 02:45:05 PDT Date: Thu, 8 Sep 94 02:45:05 PDT From: marcus@ee.pdx.edu (Marcus Daniels) Message-Id: <9409080945.AA21992@ursula.ee.pdx.edu> To: clisp-list Subject: Re: can't install clisp in NeXTStep 3.0 In-Reply-To: <9409080732.AA00604@louvre.is.tokushima-u.ac.jp> References: <9409080732.AA00604@louvre.is.tokushima-u.ac.jp> >>>>> "Norihiko" == Norihiko Ono writes: Norihiko> `memory fault' error happens on my NeXTstation Turbo. So Norihiko> long as parameter of `fact' is a small positive integer, say Norihiko> 100, the function is evaluated successfully. Rebuild from a recent source-haible and the problem with disappear. From kn@limba.wil.pk.edu.pl Thu Sep 8 12:00:51 1994 Return-Path: Received: from limba.wil.pk.edu.pl by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA08771; Thu, 8 Sep 94 12:00:51 +0200 Received: by limba.wil.pk.edu.pl (4.1/SMI-4.1) id AA14949; Thu, 8 Sep 94 11:48:29 +0200 Date: Thu, 8 Sep 94 11:48:29 +0200 From: kn@limba.wil.pk.edu.pl (Krzysztof Nowak) Message-Id: <9409080948.AA14949@limba.wil.pk.edu.pl> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Installation problem on Sun I was trying to install CLISP on my Sun running under SunOS 4.1.3. I've got binaries from sun4-sunos4/clisp-sun4c.tar.z. I've linked it successfully, but when I run lisp.run it writes: Illegal instruction. Could somebody help me? Krzysztof Nowak From haible Thu Sep 8 19:26:37 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15774; Thu, 8 Sep 94 19:26:37 +0200 Date: Thu, 8 Sep 94 19:26:37 +0200 From: haible (Bruno Haible) Message-Id: <9409081726.AA15774@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Installation problem on Sun Krzysztof Nowak wrote: > I was trying to install CLISP on my Sun running under SunOS 4.1.3. I've > got binaries from sun4-sunos4/clisp-sun4c.tar.z. I've linked it successfully, > but when I run lisp.run it writes: Illegal instruction. Oops. The lisp.a therein is broken because I used a buggy GNU BFD 2.2 linker to build it. This is now fixed. Please get clisp-sun4c.tar.z again. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Thu Sep 8 19:45:48 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15905; Thu, 8 Sep 94 19:45:48 +0200 Date: Thu, 8 Sep 94 19:45:48 +0200 From: haible (Bruno Haible) Message-Id: <9409081745.AA15905@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp for MS-Windows? Thanks to Rainer Schnitker and Ralf Muschall, it is possible to run clisp in the DOS box of MS-Windows. The DOS README file describes how. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From frmug.fr.net!bacbuc.frmug.fr.net!charpent@frmug.fr.net Thu Sep 8 23:26:10 1994 Return-Path: Received: from soleil.uvsq.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16079; Thu, 8 Sep 94 23:26:10 +0200 Received: by soleil.uvsq.fr (8.6.9/jtpda-5.0) id RAA29032 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Thu, 8 Sep 1994 17:14:34 -0400 Received: from frmug.fr.net with uucp; Thu, 8 Sep 94 09:19:38 Received: from bacbuc.frmug.fr.net by frmug.fr.net; Thu, 8 Sep 94 09:19:38 +0200 Received: by bacbuc.frmug.fr.net (Smail3.1.28.1 #52) id m0qidkY-000Ce9C; Thu, 8 Sep 94 09:18 MET DST Message-Id: From: charpent@bacbuc.frmug.fr.net (Emmanuel Charpentier) Subject: Re: Lisp and C To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 8 Sep 1994 09:18:26 +0200 (MET DST) In-Reply-To: <9409071322.AA02053@steinway.u-strasbg.fr> from "Rudloff" at Sep 7, 94 02:42:51 pm X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit Content-Length: 1023 > > Hi, > > I'am a NeXT user and I would like to use a good lisp environment on > NeXT (but my problem concerns all systems). > > My aim (but I begin to think that it's a dream) is the following: > > - To make an App with Project Builder > - To write some Lisp routines, to compile them, and get .o object > files > - To link these compiled lisp routines (and the lisp kernel needed) > with my App and to call them from a C function. > > The problem is that CLisp just produce fasl files and not .o. > gcl produce .o file but I didn't reach to do what I wanted. akcl might be what you are looking for. Its compiler produces C code which is handed to the cc compiler (gcc in my case). This makes for a *slow* compiler, but gives *tight* and *fast* code. Fair warning : akcl does not seems to be very alive, those days. Furthermore, it is *not* in public domain : you'll have to request a (free) license from some japanese university... E. Charpentier -- Emmanuel Charpentier charpent@bacbuc.frmug.fr.net From ian.cdn@genie.geis.com Fri Sep 9 06:34:22 1994 Return-Path: Received: from relay2.geis.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16307; Fri, 9 Sep 94 06:34:22 +0200 Received: by relay2.geis.com (1.37.109.10G/15.6) id AA148924561; Fri, 9 Sep 1994 04:22:41 GMT From: ian.cdn@genie.geis.com Message-Id: <199409090422.AA148924561@relay2.geis.com> Date: Fri, 9 Sep 94 03:55:00 UTC To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: clisp dos serial X-Genie-Id: 6295978 X-Genie-From: IAN.CDN Has anybody used the serial ports from Clisp-Dos? If so I'd be interested to hear how you went about it. I've tried (open "com1") but had problems due to buffering. Ian Garmaise ian.cdn@genie.geis.com From hjstein@MATH.HUJI.AC.IL Fri Sep 9 07:29:15 1994 Return-Path: Received: from sunset.ma.huji.ac.il by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16370; Fri, 9 Sep 94 07:29:15 +0200 Received: by sunset.ma.huji.ac.il id AA29589 (5.65c/HUJI 4.152 for clisp-list ); Fri, 9 Sep 1994 07:17:02 +0200 Date: Fri, 9 Sep 1994 07:17:02 +0200 From: "Harvey J. Stein" Message-Id: <199409090517.AA29589@sunset.ma.huji.ac.il> To: clisp-list In-Reply-To: Subject: Re: Lisp and C Emmanuel Charpentier writes: > > My aim (but I begin to think that it's a dream) is the following: > > > > - To make an App with Project Builder > > - To write some Lisp routines, to compile them, and get .o object > > files > > - To link these compiled lisp routines (and the lisp kernel needed) > > with my App and to call them from a C function. > > > > The problem is that CLisp just produce fasl files and not .o. > > gcl produce .o file but I didn't reach to do what I wanted. > > akcl might be what you are looking for. Its compiler produces > C code which is handed to the cc compiler (gcc in my case). This > makes for a *slow* compiler, but gives *tight* and *fast* code. > > Fair warning : akcl does not seems to be very alive, those days. > Furthermore, it is *not* in public domain : you'll have to request > a (free) license from some japanese university... But gcl (gnu common lisp) is a derivative of akcl, is (more or less) alive, and is gpled (doesn't require license). Harvey J. Stein Berger Financial Research hjstein@math.huji.ac.il From sitter@mx304.tfh-berlin.de Fri Sep 9 14:40:58 1994 Return-Path: Received: from mx304.tfh-berlin.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17252; Fri, 9 Sep 94 14:40:58 +0200 Message-Id: <9409091240.AA17252@ma2s2.mathematik.uni-karlsruhe.de> From: sitter@mx304.tfh-berlin.de Subject: Re: clisp for MS-Windows? To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 9 Sep 1994 14:30:08 +0100 (MDT) >From: "sitter" Cc: sitter@mx304.tfh-berlin.de X-Mailer: ELM [version 2.4 PL23] Content-Type: text Content-Length: 345 According to Bruno Haible: > Thanks to Rainer Schnitker and Ralf Muschall, it is possible to run > clisp in the DOS box of MS-Windows. The DOS README file describes how. > Thank you for this hint. Before I have a closer look at it - I guess there is no access to the Windows API, which is what I meant actually? Stefan (sitter@tfh-berlin.de) From haible Fri Sep 9 15:12:47 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17465; Fri, 9 Sep 94 15:12:47 +0200 Date: Fri, 9 Sep 94 15:12:47 +0200 From: haible (Bruno Haible) Message-Id: <9409091312.AA17465@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, ian.cdn@genie.geis.com Subject: Re: clisp dos serial Ian Garmaise writes: > I've tried (open "com1") but had problems due to buffering. To get unbuffered streams as result of (open "com1") the following patch should work: *** src/lispbibl.d Tue Aug 30 20:50:04 1994 --- src/lispbibl.d.new Fri Sep 9 15:08:45 1994 *************** *** 1568,1574 **** # Bei Erweiterung: STREAM erweitern (viel Arbeit!). # Ob es File-Handle-Streams gibt: ! #if defined(UNIX) || defined(AMIGAOS) || defined(RISCOS) #define HANDLES #endif # Bei Erweiterung: STREAM erweitern. --- 1568,1574 ---- # Bei Erweiterung: STREAM erweitern (viel Arbeit!). # Ob es File-Handle-Streams gibt: ! #if defined(UNIX) || defined(MSDOS) || defined(AMIGAOS) || defined(RISCOS) #define HANDLES #endif # Bei Erweiterung: STREAM erweitern. *** src/stream.d Tue Aug 30 02:25:37 1994 --- src/stream.d.new Fri Sep 9 15:09:18 1994 *************** *** 8742,8748 **** # Alles andere gibt File-Handle-Streams, weil vermutlich lseek() nicht geht. if (!nullp(handle)) { ! #if defined(UNIX) || defined(RISCOS) var struct stat statbuf; begin_system_call(); if (!( fstat(TheHandle(handle),&statbuf) ==0)) { OS_error(); } --- 8742,8748 ---- # Alles andere gibt File-Handle-Streams, weil vermutlich lseek() nicht geht. if (!nullp(handle)) { ! #if defined(UNIX) || defined(MSDOS) || defined(RISCOS) var struct stat statbuf; begin_system_call(); if (!( fstat(TheHandle(handle),&statbuf) ==0)) { OS_error(); } Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From blake@edge.ercnet.com Fri Sep 9 16:22:44 1994 Return-Path: Received: from edge.ercnet.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17610; Fri, 9 Sep 94 16:22:44 +0200 Received: from ip223.ercnet.com (ip223.ercnet.com [199.0.68.223]) by edge.ercnet.com (8.6.9/8.6.9) with SMTP id JAA04765 for ; Fri, 9 Sep 1994 09:08:03 -0500 Date: Fri, 9 Sep 1994 09:08:03 -0500 Message-Id: <199409091408.JAA04765@edge.ercnet.com> X-Sender: blake@edge.ercnet.com Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: clisp-list From: blake@edge.ercnet.com (Blake McBride) Subject: Re: clisp for MS-Windows? X-Mailer: >According to Bruno Haible: >> Thanks to Rainer Schnitker and Ralf Muschall, it is possible to run >> clisp in the DOS box of MS-Windows. The DOS README file describes how. >> >Thank you for this hint. > >Before I have a closer look at it - I guess there is no access to the >Windows API, which is what I meant actually? > >Stefan (sitter@tfh-berlin.de) > > > Clisp has also been ported to DOS by using the WATCOM 32 bit compiler. Since this compiler can also compile real Windows programs it should be easy to compile Clisp as a real Windows program. I could do it if I had a little time (a wish)...:-) -- 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 haible Fri Sep 9 19:17:12 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17876; Fri, 9 Sep 94 19:17:12 +0200 Date: Fri, 9 Sep 94 19:17:12 +0200 From: haible (Bruno Haible) Message-Id: <9409091717.AA17876@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Lisp and C > > - To link these compiled lisp routines (and the lisp kernel needed) > > with my App and to call them from a C function. > > > > The problem is that CLisp just produce fasl files and not .o. > > gcl produce .o file but I didn't reach to do what I wanted. > > akcl might be what you are looking for. Its compiler produces > C code which is handed to the cc compiler (gcc in my case). This > makes for a *slow* compiler, but gives *tight* and *fast* code. > > Fair warning : akcl does not seems to be very alive, those days. > Furthermore, it is *not* in public domain : you'll have to request > a (free) license from some japanese university... No, if GCL doesn't serve David Rudloff's, its predecessor AKCL won't either. Maybe EcoLisp will serve his purpose? AKCL (the last release) and GCL don't require a license, they are covered by LGPL. And the code produced by GCL is certainly not "tight", at least when compared to CLISPs code. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Sep 9 19:19:39 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17913; Fri, 9 Sep 94 19:19:39 +0200 Date: Fri, 9 Sep 94 19:19:39 +0200 From: haible (Bruno Haible) Message-Id: <9409091719.AA17913@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: clisp for MS-Windows? > Before I have a closer look at it - I guess there is no access to the > Windows API, which is what I meant actually? No, there isn't. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From buyukisik_o_f@ae.ge.com Fri Sep 9 20:08:21 1994 Return-Path: Received: from ns.ge.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA18072; Fri, 9 Sep 94 20:08:21 +0200 Received: from thomas.ge.com by ns.ge.com (5.65/GE Gateway 1.26) with SMTP id AA16344; Fri, 9 Sep 94 13:36:08 -0400 Received: from c0228.ae.ge.com by thomas.ge.com (5.65/GE Internal Gateway 1.26) with SMTP id AA06079; Fri, 9 Sep 94 13:42:37 -0400 Message-Id: <9409091742.AA06079@thomas.ge.com> Received: from c0230.ae.ge.com by c0228.ae.ge.com with SMTP(1.37.187.4/15.6) id AA15782; Fri, 9 Sep 94 13:42:48 -0400 Received: by c0230.ae.ge.com(1.38.193.3/16.2) id AA05721; Fri, 9 Sep 94 13:39:46 -0400 Date: Fri, 9 Sep 94 13:39:46 -0400 From: U-E59264-Osman Buyukisik To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9409091719.AA17913@ma2s2.mathematik.uni-karlsruhe.de> (haible%ma2s2.mathematik.uni-karlsruhe.de@c0228.ae.ge.com) Subject: Re: clisp for MS-Windows? >>> "Bruno" == Bruno Haible writes: >> Before I have a closer look at it - I guess there is no access >> to the Windows API, which is what I meant actually? Bruno> No, there isn't. I thought Rainer Schnither's rsxwdk1 package allows one to build 16/32 bit full windows programs. libwin.a may not be complete though. Osman From frmug.fr.net!bacbuc.frmug.fr.net!charpent@frmug.fr.net Mon Sep 12 23:26:38 1994 Return-Path: Received: from soleil.uvsq.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21556; Mon, 12 Sep 94 23:26:38 +0200 Received: by soleil.uvsq.fr (8.6.9/jtpda-5.0) id RAA02605 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Mon, 12 Sep 1994 17:14:15 -0400 Received: from frmug.fr.net with uucp; Mon, 12 Sep 94 09:29:01 Received: from bacbuc.frmug.fr.net by frmug.fr.net; Mon, 12 Sep 94 09:29:01 +0200 Received: by bacbuc.frmug.fr.net (Smail3.1.28.1 #52) id m0qk5qI-000Ce9C; Mon, 12 Sep 94 09:30 MET DST Message-Id: From: charpent@bacbuc.frmug.fr.net (Emmanuel Charpentier) Subject: gcl and linux To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 12 Sep 1994 09:30:22 +0200 (MET DST) Cc: wfs@fireant.ma.utexas.edu X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit Content-Length: 1224 I apologize for posting this here, but I haven't the foggiest idea of where to post *properly*. I tried to build gcl on Linux. I use Linux 1.0.9, gcc 2.5.8 and libraries 4.5.26. The unpacking went smoothly, but make crashed on c/run-process.c : the compiler complained about an undefined FASYNC name, and a careful exploration of the include files (find /usr/include/ -name \*, grep on it for FASYNC) showed no such identifier or macro. This particular piece of source is related to sockets : apparently, it is used to run a subprocess, conversing with it through a socket. I haven't the foggiest idea of what FASYNC is supposed to do. Anyway, I found *one* hint in /usr/include/linux/fcntl.h : "O_SYNC" isn't implemented yet". Apparently, this code is trying to use an unimplemented feature. Could somebody help me on this ? Should I patch the source code, or does it exists a gcc|libraries|linux version aware of this ? I post a Cc of this to Bill Schelter, author of the README file, but, given my mailfeed, I won't probably hear of him before quite a while... so any help is welcome, but should not begin by "ask wfs@math.utexas.edu" ;->... Sincerely yours, -- Emmanuel Charpentier charpent@bacbuc.frmug.fr.net From frmug.fr.net!bacbuc.frmug.fr.net!charpent@frmug.fr.net Mon Sep 12 23:27:03 1994 Return-Path: Received: from soleil.uvsq.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21561; Mon, 12 Sep 94 23:27:03 +0200 Received: by soleil.uvsq.fr (8.6.9/jtpda-5.0) id RAA02611 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Mon, 12 Sep 1994 17:14:44 -0400 Received: from frmug.fr.net with uucp; Mon, 12 Sep 94 09:38:58 Received: from bacbuc.frmug.fr.net by frmug.fr.net; Mon, 12 Sep 94 09:38:58 +0200 Received: by bacbuc.frmug.fr.net (Smail3.1.28.1 #52) id m0qk65m-000Ce9C; Mon, 12 Sep 94 09:46 MET DST Message-Id: From: charpent@bacbuc.frmug.fr.net (Emmanuel Charpentier) Subject: Re: Lisp and C : explanations To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 12 Sep 1994 09:46:22 +0200 (MET DST) In-Reply-To: <9409091717.AA17876@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Sep 9, 94 07:21:54 pm X-Mailer: ELM [version 2.4 PL23] Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit Content-Length: 2271 > > > > - To link these compiled lisp routines (and the lisp kernel needed) > > > with my App and to call them from a C function. > > > > > > The problem is that CLisp just produce fasl files and not .o. > > > gcl produce .o file but I didn't reach to do what I wanted. > > > > akcl might be what you are looking for. Its compiler produces > > C code which is handed to the cc compiler (gcc in my case). This > > makes for a *slow* compiler, but gives *tight* and *fast* code. > > > > Fair warning : akcl does not seems to be very alive, those days. > > Furthermore, it is *not* in public domain : you'll have to request > > a (free) license from some japanese university... > > No, if GCL doesn't serve David Rudloff's, its predecessor AKCL won't > either. Maybe EcoLisp will serve his purpose? I remember somewhat foggily helping a friend of mine with such a project. The idea was to modify the back-end part of the compiler, adding a flag allowing to "include" an almost-verbatim copy of the target C code and generating a wrapper interface between C and lisp. I didn't achieve this *myself*, but I heard that it worked and gave fast exeutions and *slowww* compilations (as usual with akcl...). BTW : I wasn't aware of gcl, even less of its akcl origin.... What is Ecolisp ? > AKCL (the last release) and GCL don't require a license, they are covered I wasn't aware of this "last version"... > by LGPL. And the code produced by GCL is certainly not "tight", at least > when compared to CLISPs code. Hmmm... I think that my words betrayed me : what I wanted to say was not related to the *size* of the code ; I meant that clisp generates code for an abstract lmachine, which is then interpreted, while (a)kcl generates C code which is then *compiled* by a *good* C compiler (gcc). The resulting native code is larger (by maybe an order of magnitude) but what is executed is smaller (and faster), since each clisp pseudo-instruction has to be processed by an interpreter. > > Bruno Haible > haible@ma2s2.mathematik.uni-karlsruhe.de BTW : this letter got me grabbing gcl, and I ran in trouble, but this is another story (and another mail). Sincerely yours, -- Emmanuel Charpentier charpent@bacbuc.frmug.fr.net From dliu@faraday-gw.njit.edu Tue Sep 13 01:43:15 1994 Return-Path: Received: from njitgw.njit.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21834; Tue, 13 Sep 94 01:43:15 +0200 Received: from faraday-gw.njit.edu (faraday-gw.njit.edu [128.235.1.97]) by njitgw.njit.edu (8.6.9/8.6.9) with SMTP id TAA22425 for ; Mon, 12 Sep 1994 19:32:25 -0400 Received: from rice.njit.edu by faraday-gw.njit.edu (4.1/SMI-4.1) id AA15944; Mon, 12 Sep 94 19:30:55 EDT Date: Mon, 12 Sep 94 19:30:55 EDT From: dliu@faraday-gw.njit.edu (Dong Liu) Received: by rice.njit.edu (4.1/SMI-4.1) id AA29441; Mon, 12 Sep 94 19:30:54 EDT To: clisp-list Subject: Re: gcl and linux In-Reply-To: References: Mailer: VM 5.32 (beta) for GNU Emacs 18.59.5 Message-Id: I have built gcl-1.0 successfully on linux. FASYNC is defined in /usr/include/linux/fcntl.h, "/usr/include/linux" usally is a symbolic link to LINUX_KERNEL_SRC_DIR/include/linux, where LINUX_KERNEL_SRC_DIR is where the kernal source files live, did you install them? BTW, my linux is 1.1.50. Dong From zhtgrad@sdphu1.ucsd.edu Tue Sep 13 06:26:44 1994 Return-Path: Received: from sdphu1.ucsd.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22123; Tue, 13 Sep 94 06:26:44 +0200 Received: by sdphu1.ucsd.edu (5.65/DEC-Ultrix/4.3) id AA14446; Mon, 12 Sep 1994 21:08:22 -0700 Date: Mon, 12 Sep 1994 21:08:22 -0700 From: zhtgrad@sdphu1.ucsd.edu (Haitao Zhang) Message-Id: <9409130408.AA14446@sdphu1.ucsd.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: date error on compilation Hi, I am new user of CLISP. I just installed it on my 486 running Linux/X. I used the binary came with Slackware distribution of Linux. I followed the in- structions in README file to compile the config.lsp file. However, the compila- tion cannot complete when the Lisp gave a mesage of incorrect date, followed by the date of my machine (I think.). Could someone give some hints? Thanks, Haitao From attardi@DI.UniPi.IT Tue Sep 13 12:35:54 1994 Return-Path: Received: from apollo.di.unipi.it by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22518; Tue, 13 Sep 94 12:35:54 +0200 Received: from omega.di.unipi.it by apollo.di.unipi.it with SMTP (1.37.109.4/16.2) id AA08211; Tue, 13 Sep 94 12:23:28 +0200 Organization: Dipartimento di Informatica - Universita' di Pisa - Italy Received: by omega (5.0/SMI-4.1) id AA04640; Tue, 13 Sep 1994 12:21:27 --100 Date: Tue, 13 Sep 1994 12:21:27 --100 From: attardi@DI.UniPi.IT Message-Id: <9409131021.AA04640@omega> To: charpent@bacbuc.frmug.fr.net Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: (charpent@bacbuc.frmug.fr.net) Subject: Re: Lisp and C : explanations Content-Length: 2262 >From clisp-list@ma2s2.mathematik.uni-karlsruhe.de Mon Sep 12 23:25:53 1994 Date: Mon, 12 Sep 94 23:33:16 +0200 Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de Originator: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Errors-To: haible@ma2s2.mathematik.uni-karlsruhe.de Reply-To: clisp-list Sender: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Version: 5.5 -- Copyright (c) 1991/92, Anastasios Kotsikonas From: charpent@bacbuc.frmug.fr.net (Emmanuel Charpentier) ... What is Ecolisp ? ECL is an implementation of Common Lisp designed for being embeddable into C based applications. ECL uses standard C calling conventions for Lisp compiled functions, which allows C programs to easily call Lisp functions and viceversa. No foreign function interface is required: data can be exchanged between C and Lisp with no need for conversion. ECL is based on a Common Runtime Support (CRS) which provides basic facilities for memory managment, dynamic loading and dumping of binary images, support for multiple threads of execution. The CRS is built into a library that can be linked with the code of the application. ECL is modular: main modules are the program development tools (top level, debugger, trace, stepper), the compiler, and CLOS. A native implementation of CLOS is available in ECL: one can configure ECL with or without CLOS. A runtime version of ECL can be built with just the modules which are required by the application. The ECL compiler compiles from Lisp to C, and then invokes the GCC compiler to produce binaries. ECL has been ported so far on: - Sun workstations with SunOS 4.x - Silicon Graphics with IRIX 4.x - IBM PC with DOS/go32. - IBM PC with Linux 1.0. The newest versions are available via 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 Since ECoLisp provides many of the features that are desired for GCL, Richard Stallman has urged me to integrate my work with GCL. Discussion is underway with Bill Schelter on how to do this. A paper on ECoLisp has been presented at the Lisp Users and Vendors Conference in Berkeley last month. -- Beppe From G.D.BAXTER@dundee.ac.uk Tue Sep 13 15:27:23 1994 Return-Path: Received: from pp.dundee.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22979; Tue, 13 Sep 94 15:27:23 +0200 Received: from charon2.dundee.ac.uk by pp.dundee.ac.uk with SMTP (PP) id <08799-0@pp.dundee.ac.uk>; Tue, 13 Sep 1994 14:03:12 +0100 Received: From PHIL-ENGL/MAILQUEUE by charon2.dundee.ac.uk via Charon-4.0A-VROOM with IPX id 100.940913141402.640; 13 Sep 94 14:23:17 +0500 Message-Id: From: GORDONB To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 13 Sep 1994 14:13:55 Subject: Using CLOS under CLISP Priority: normal X-Mailer: Pegasus Mail v3.1 (R1) I am trying to get the ACT-R production system running under CLISP, on a 386 with 3Meg of memory, under DOS. (Please note that I am NOT a LISP expert.) I am having problems, however, in getting the CLOS extensions to work: when I load in CLOS I get a number of "continuable error" messages, before I get the "Stack Overflow. RESET" message. Does anybody know how I can get around this problem? Thanks, Gordon Baxter Cognitive Science Student University of Dundee Scotland From haible Tue Sep 13 15:39:22 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23058; Tue, 13 Sep 94 15:39:22 +0200 Date: Tue, 13 Sep 94 15:39:22 +0200 From: haible (Bruno Haible) Message-Id: <9409131339.AA23058@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: gcl and linux [Forwarded from Reginald S. Perry .] >"Emmanuel" == Emmanuel Charpentier writes: > Could somebody help me on this ? Should I patch the source code, or > does it exists a gcc|libraries|linux version aware of this ? > I post a Cc of this to Bill Schelter, author of the README file, > but, given my mailfeed, I won't probably hear of him before quite a > while... so any help is welcome, but should not begin by "ask > wfs@math.utexas.edu" ;->... Just go to ftp://ma2s2.mathematik.uni-karlsruhe.de/pub/lisp/gcl. The sources and the binares for linux-gcl are there. -Reggie From haible Tue Sep 13 16:39:33 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23281; Tue, 13 Sep 94 16:39:33 +0200 Date: Tue, 13 Sep 94 16:39:33 +0200 From: haible (Bruno Haible) Message-Id: <9409131439.AA23281@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: date error on compilation -- Linux specific -- > I just installed it on my 486 running Linux/X. ... However, the compila- > tion cannot complete when the Lisp gave a mesage of incorrect date, > followed by the date of my machine (I think.). It has been observed that on some Linux machines the system variable sys_tz.tz_minuteswest is set to the number of seconds (not minutes!) west of Greenwich. You might fix this by fixing your clock/date program or by putting a workaround into your Linux kernel: *** linux/kernel/time.c Thu Jun 2 09:54:37 1994 --- linux/kernel/time.c.fix Tue Sep 13 16:35:53 1994 *************** *** 272,277 **** --- 272,279 ---- return -EPERM; if (tz) { sys_tz.tz_minuteswest = get_fs_long((unsigned long *) tz); + if (abs(sys_tz.tz_minuteswest) >= 30) + sys_tz.tz_minuteswest = sys_tz.tz_minuteswest / 60; sys_tz.tz_dsttime = get_fs_long(((unsigned long *) tz)+1); if (firsttime) { firsttime = 0; Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From mauricio@cs.columbia.edu Tue Sep 13 17:01:44 1994 Return-Path: Received: from cs.columbia.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23378; Tue, 13 Sep 94 17:01:44 +0200 Received: from yin.cs.columbia.edu (yin.cs.columbia.edu [128.59.27.20]) by cs.columbia.edu (8.6.9/8.6.6) with ESMTP id KAA24065 for ; Tue, 13 Sep 1994 10:49:04 -0400 Received: (from mauricio@localhost) by yin.cs.columbia.edu (8.6.9/8.6.6) id KAA15827 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Tue, 13 Sep 1994 10:49:00 -0400 Date: Tue, 13 Sep 1994 10:49:00 -0400 From: Mauricio Hernandez Message-Id: <199409131449.KAA15827@yin.cs.columbia.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: date error on compilation -- Linux -- >> I just installed it on my 486 running Linux/X. ... However, the compila- >> tion cannot complete when the Lisp gave a mesage of incorrect date, >> followed by the date of my machine (I think.). > >It has been observed that on some Linux machines the system variable >sys_tz.tz_minuteswest is set to the number of seconds (not minutes!) >west of Greenwich. You might fix this by fixing your clock/date program >or by putting a workaround into your Linux kernel: I was having the same problem and was pointed by a member of this list to ftp ma2s2.mathematik.uni-karlsruhe.de and get the binaries directly from there. I believe they are under pub/lisp/clisp/binaries/linux. That version has worked without problems for me. Mauricio -- Mauricio A. Hernandez (Graduate Student) mauricio@cs.columbia.edu Department of Computer Science, Columbia University. New York, NY From zhtgrad@sdphu1.ucsd.edu Wed Sep 14 08:26:45 1994 Return-Path: Received: from sdphu1.ucsd.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23986; Wed, 14 Sep 94 08:26:45 +0200 Received: by sdphu1.ucsd.edu (5.65/DEC-Ultrix/4.3) id AA27660; Tue, 13 Sep 1994 23:08:10 -0700 Date: Tue, 13 Sep 1994 23:08:10 -0700 From: zhtgrad@sdphu1.ucsd.edu (Haitao Zhang) Message-Id: <9409140608.AA27660@sdphu1.ucsd.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: date error solved I want to point out that the way that I solved the problem is identical to what was suggested by mauricio@cs.columbia.edu, i.e. get a copy of the tar file from ma2s2.mathematik.uni-karlsruhe.de directly. BTW, the problem occured when compiling clisp files, not c files. Thanks for the responses. Haitao From ian.cdn@genie.geis.com Sun Sep 18 09:49:06 1994 Return-Path: Received: from relay2.geis.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23544; Sun, 18 Sep 94 09:49:06 +0200 Received: by relay2.geis.com (1.37.109.10G/15.6) id AA268663745; Sun, 18 Sep 1994 07:35:45 GMT From: ian.cdn@genie.geis.com Message-Id: <199409180735.AA268663745@relay2.geis.com> Date: Sun, 18 Sep 94 07:18:00 UTC To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: tar trouble X-Genie-Id: 2579519 X-Genie-From: IAN.CDN I'm trying to install the Dos source for Clisp along with GCC, which I have downloaded from Karlsruhe (clisp) and Columbia.cs (gcc). I've had problems untarring these archives using a couple of different dos tar utilities, they seem to be having problems with embedded periods in directory names. Anybody have any suggestions? Ian Garmaise From tom@jsk.t.u-tokyo.ac.jp Sun Sep 18 21:04:28 1994 Received: from monoceros.jsk.t.u-tokyo.ac.jp (jsk.t.u-tokyo.ac.jp) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23933; Sun, 18 Sep 94 21:04:28 +0200 Received: from colliel.jsk.t.u-tokyo.ac.jp (hyp.jsk.t.u-tokyo.ac.jp) by monoceros.jsk.t.u-tokyo.ac.jp (4.1/6.4J.6-MX) id AA03455; Mon, 19 Sep 94 03:54:04 JST Received: by colliel.jsk.t.u-tokyo.ac.jp (4.1/6.4J.6-MX) id AA01269; Mon, 19 Sep 94 03:50:20 JST Date: Mon, 19 Sep 94 03:50:20 JST From: tom@jsk.t.u-tokyo.ac.jp (Tomohiro Shibata) Return-Path: Message-Id: <9409181850.AA01269@colliel.jsk.t.u-tokyo.ac.jp> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: copy-object Hi, I use clisp + pcl package for my research. I think it's a great stuff. I want to use pcl::copy-object, and the funtion apropos tells me it is in pcl package, but I can't use. The system tells me it is undefined function. I really can't use pcl::copy-object? --------------------------------------------------------------------------- Tomohiro Shibata |email tom@jsk.t.u-tokyo.ac.jp Inoue-Inaba Laboratory, |www http://www.jsk.t.u-tokyo.ac.jp/~tom/ Department of Mechano informatics,| University of Tokyo; Japan | From whitten@netcom.com Fri Sep 23 00:34:02 1994 Return-Path: Received: from netcom12.netcom.com by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28131; Fri, 23 Sep 94 00:34:02 +0200 Received: by netcom12.netcom.com (8.6.9/Netcom) id PAA03418; Thu, 22 Sep 1994 15:17:35 -0700 From: whitten@netcom.com (David Whitten) Message-Id: <199409222217.PAA03418@netcom12.netcom.com> Subject: Building Problems Solvers code To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Thu, 22 Sep 1994 15:17:35 -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: 520 I have the book 'Building Problem Solvers' by K. Forbus and J. De Kleer. This book has associated code written in Common Lisp to implement several different Truth Maintenance Systems. Has anyone figured out what is necessary to get this code to work with any public domain Common Lisp systems (such as clisp) ? I am interested in re-writing the code in another language(MUMPS) and need to make sure I understand it enough to be able to port it successfully. Thank you, David (whitten@netcom.com) (214) 437-5255 From hjstein@MATH.HUJI.AC.IL Mon Oct 3 11:51:40 1994 Return-Path: Received: from sunset.ma.huji.ac.il by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09938; Mon, 3 Oct 94 11:51:40 +0100 Received: by sunset.ma.huji.ac.il id AA08209 (5.65c/HUJI 4.152 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Mon, 3 Oct 1994 12:34:55 +0200 Date: Mon, 3 Oct 1994 12:34:55 +0200 From: "Harvey J. Stein" Message-Id: <199410031034.AA08209@sunset.ma.huji.ac.il> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Questions regarding garnet on ma2s2.mathematik. I am about to try out garnet with clisp, so I downloaded src.tar.Z, doc.tar.Z, and lib.tar.Z from a.gp.cs.cmu.edu. Then, I downloaded a new version of CLISP from ma2s2.mathematik.uni-karlsruhe.de. I then noticed the existence of garnet on ma2s2, namely -rw-rw-r-- 1 haible clisp 1170738 Sep 22 1993 garnet21.clisp.tar.z -rw-r--r-- 2 haible clisp 4483 Jul 6 17:22 garnet22.speedup-in-clisp.diffs.z -rw-r--r-- 1 haible clisp 172 Jul 21 18:11 garnet22.speedup-in-clisp.readme -rw-rw-r-- 1 haible clisp 2510523 Jan 22 1994 garnet22.tar.z drwxr-xr-x 2 haible clisp 512 Mar 23 1994 garnet22.tar.z-split in /pub/lisp/clisp/packages. According to the README file in /pub/lisp/clisp/packages, the .orig. files are the original code, and the .clisp. are the versions modified for clisp. However, garnet22.tar.z has neither, so I don't know if it's the same as the version I got from a.gp.cs.cmu.edu. To avoid additional ftp traffic, perhaps someone can tell me if garnet22.tar.z differs significantly from the version on a.gp.cs.cmu.edu. Thanks, Harvey J. Stein Berger Financial Research hjstein@math.huji.ac.il From haible Tue Oct 4 14:11:30 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA11431; Tue, 4 Oct 94 14:11:30 +0100 Date: Tue, 4 Oct 94 14:11:30 +0100 From: haible (Bruno Haible) Message-Id: <9410041311.AA11431@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list, haible@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Questions regarding garnet Harvey J. Stein asks: > According to the README file in /pub/lisp/clisp/packages, the .orig. > files are the original code, and the .clisp. are the versions modified > for clisp. However, garnet22.tar.z has neither, so I don't know if > it's the same as the version I got from a.gp.cs.cmu.edu. To avoid > additional ftp traffic, perhaps someone can tell me if garnet22.tar.z > differs significantly from the version on a.gp.cs.cmu.edu. The garnet22.tar.z in ma2s2:/pub/lisp/clisp/packages/ is exactly the original code from a.gp.cs.cmu.edu. If you want the speed patches for clisp, you have to apply them yourself. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From hoehle@inf-wiss.uni-konstanz.de Fri Oct 7 14:32:54 1994 Return-Path: Received: from inf-wiss.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16069; Fri, 7 Oct 94 14:32:54 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA02346; Fri, 7 Oct 94 14:16:08 +0100 Date: Fri, 7 Oct 94 14:16:08 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9410071316.AA02346@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA01966; Fri, 7 Oct 94 14:18:42 +0100 To: clisp-list@[129.13.115.2] Return-Receipt-To: hoehle@inf-wiss.uni-konstanz.de Subject: Beta testers help sought for Amiga-CLISP Hi, Since the last distribution of CLISP/Amiga in February, a few things have changed. Here are the Amiga related changes (not to mention the general changes like LOOP, French/German/English language start-time switch, generic streams, external modules and others): 1 SYS::terminal-raw exists and can switch *terminal-io* of any CON or RAW file-handle stream to cooked or single-character mode. 2 SYS::%mem-read, %mem-write and %libcall exist and are supposed to be the basis of an upcoming FFI in CLISP. 3 c-C handling has been improved during READ from file-handle-streams (i.e. also *terminal-io*). 4 a version of CLISP (called *-wide) now runs together with virtual memory (tested with VMM) or boards that put memory above #x07ffffff (untested). Things to do, to test and or to develop: ad 1) has been added so that Maxima/Punimax can be supported, although the port is not complete. This is mainly because I feel that there's a design flaw in the functions from the SCREEN package: (SCREEN:MAKE-WINDOW) returns a "window stream". As long as this stream is open, the terminal is in cbreak/noecho mode. *TERMINAL-IO* shouldn't be used for input or output during this time. (Use WITH-KEYBOARD and *KEYBOARD-INPUT* instead.) (SCREEN:WITH-WINDOW . body) binds SCREEN:*WINDOW* to a window stream and executes body. The stream is guaranteed to be closed when the body is left. During its execution, *TERMINAL-IO* shouldn't be used, as above. Punimax doesn't stick to that rule and nevertheless reads from *TERMINAL-IO*. This works on CLISP/UNIX or DOS(?) because there's a hack in CLISP to switch the modes. I don't like to go through a hack. In my opinion, what's missing is a way to do both screen oriented output (setting/getting the cursor position) and read chars in either cooked or single-character (non-echoing) mode. The current SCREEN doesn't provide for that (when there's no *KEYBOARD-INPUT*). ad 2) could be enhanced a lot, but I'd like people to help me on that. If I had to write everything myself, that'd just delay and delay a new distribution of CLISP (which is why I decided to put out a beta). I'm still dreaming of a (let ((w (libcall |OpenWindow| args...))) ...) with full resource-tracking. ad 3) is just nice when you mix quotes and parentheses. ad 4) is extremely useful _now_ (maybe even necessary to compile Punimax on small systems). 5 CLISP doesn't work nicely with neither PIPE: nor FIFO: although it's perfectly fine with CON: or RAW: streams. Anybody wants to investigate on that? How to really distinguish streams that can be buffered from others? 6 For the advanced C programmer: I could distribute CLISP as a library (like is done on UNIX). This would have the advantage that one can easily add new foreign modules by linking without recompiling CLISP itself, although that would require a GCC platform. Is there any interest in this? That would mean even more archives :-( 7 opening "SER:" or "AUX:" is not possible with CLISP, because it thinks that these are note correct pathnames ("SER:9600" works). Any ideas? 8 Compilation: Are you able to get a working CLISP from sources or am I the only one?? (GCC258 is recommended). Thanks to any volunteers, Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From donc@ISI.EDU Fri Oct 7 18:43:08 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16378; Fri, 7 Oct 94 18:43:08 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-18) id ; Fri, 7 Oct 1994 10:26:17 -0700 Date: Fri, 7 Oct 94 10:26:24 -0700 Posted-Date: Fri, 7 Oct 94 10:26:24 -0700 Message-Id: <9410071726.AA19198@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Fri, 7 Oct 94 10:26:24 -0700 From: donc@ISI.EDU (Don Cohen) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: define-condition, defclass I've noticed that clisp differs from some other lisps in how it translates define-condition. Suppose you just want to define a subclass of CONDITION. CLtL2 doesn't seem to say whether you need to write (define-condition foo (CONDITION) nil) or whether (define-condition foo () nil) is enough. First question - does anyone know whether the ANSI standard says any more about this? In clisp the second works but the first does not! Part of the reason is that in clisp, define-condition ALWAYS adds CONDITION at the end: > (macroexpand-1 '(define-condition foo (bar baz) nil)) (CLOS:DEFCLASS FOO (BAR BAZ CONDITION) NIL) ; T The rest of the problem is that defclass doesn't like the resulting two occurrences of CONDITION. I don't see why that's a problem. It seems to work in other lisps. Second question - is this a bug in clisp, or am I missing something? From hoehle@inf-wiss.uni-konstanz.de Wed Oct 12 21:14:15 1994 Return-Path: Received: from inf-wiss.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21325; Wed, 12 Oct 94 21:14:15 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA12633; Wed, 12 Oct 94 20:56:44 +0100 Date: Wed, 12 Oct 94 20:56:44 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9410121956.AA12633@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA03233; Wed, 12 Oct 94 21:00:07 +0100 To: clisp-list@[129.13.115.2] Subject: bug: *debug-io* not respected Hi, I found that the text ** - Continuable Error Break If you continue (by typing 'continue'): Return from BREAK loop or any error message is not printed to *debug-io* as I believe it should be, whereas the prompt and debug input go through *debug-io*. The text is printed to *terminal-io*. I can remember that this was not broken in earlier versions of CLISP (maybe without CLCS?). The current behaviour causes debug messages and Read-eval-print go to different windows when I'm using this feature. :-( Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de Amiga-CLISP From csb@asperhq.os.dhhs.gov Thu Oct 13 14:12:11 1994 Received: from asperhq.os.dhhs.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22045; Thu, 13 Oct 94 14:12:11 +0100 Received: by asperhq.os.dhhs.gov (5.65/25-eef) id AA05887; Thu, 13 Oct 94 08:49:30 -0400 Return-Path: Date: Thu, 13 Oct 1994 08:49:30 -0400 (EDT) From: Cameron Bowes Sender: Cameron Bowes Reply-To: Cameron Bowes Subject: Problem compile on HP 9000/I70 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII I finally got clisp (basically) compiled on an HP I70 (high-end 800 series) running HP-UX/9.04. I'm using Bruno Haible's 8/23/94 source. I had to hard code the system page size in the gmalloc.c source to accomodate the fact that the HP didn't have the getpagesize system call. Then I was able to successfully compile the interpreter with gcc. Where I wind up is that when the first stage is done and clisp goes into the next stage (compiling the .lsp source), I continually get a message from lisp.run that the "initialisation file was not created by this version of LISP." Snippet from the make follows: gcc -O -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -fomit-frame-pointer -O2 spvw.o spvwtabf.o spvwtabs.o spvwtabo.o eval.o control.o pathname.o stream.o socket.o io.o array.o hashtabl.o list.o package.o record.o sequence.o charstrg.o d ebug.o error.o misc.o predtype.o symbol.o lisparit0.o stdwin.o graph.o unixaux.o arihppa.o gmalloc.o modules.o libreadline.a -ltermcap -L/usr/lib/X11R5 -lX11 -o lisp.run sync ./lisp.run -m 750KW -x "(load \"init.lsp\") (sys::%saveinitmem) (exit)" i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I I I I I I I 8 8 8 8 8 8 I I I I I I I 8 8 8 ooooo 8oooo I \ `+' / I 8 8 8 8 8 \ `-+-' / 8 o 8 8 o 8 8 `-__|__-' ooooo 8oooooo ooo8ooo ooooo 8 | ------+------ Copyright (c) Bruno Haible, Michael Stoll 1992, 1993, 1994 ;; Loading file defseq.lsp ... ... < Many loads follow > ( and finally...) ;; Loading of file /u05/porting/clisp.src/src/screen.lsp is finished. T 2169584 ; 2744 Bye. mv lispinit.mem interpreted.mem ./lisp.run -m 750KW -M interpreted.mem -q -c init.lsp ./lisp.run: initialisation file was not created by this version of LISP make: *** [init.fas] Error 1 Does anyone have any idea about what may be causing this problem? I'm at a loss at this point. If there's any additional information I can provide, please let me know. Thanks in advance for any help! Cameron Bowes US Dept. of Health and Human Services csb@asperhq.os.dhhs.gov From haible Thu Oct 13 16:20:20 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22325; Thu, 13 Oct 94 16:20:20 +0100 Date: Thu, 13 Oct 94 16:20:20 +0100 From: haible (Bruno Haible) Message-Id: <9410131520.AA22325@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Problem compile on HP 9000/I70 Cameron Bowes writes: > I'm using Bruno Haible's 8/23/94 source. I > had to hard code the system page size in the gmalloc.c source to > accomodate the fact that the HP didn't have the getpagesize system call. This is fixed in the 1994-09-01 source. > ./lisp.run: initialisation file was not created by this version of LISP This may be fixed in the 1994-09-01 source as well. If not, then please try to rebuild spvw.o without the gcc flags "-fomit-frame-pointer -O2". Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From dodger@gcr.com Mon Oct 17 02:45:06 1994 Return-Path: Received: from mandolin.GCR.COM by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA25229; Mon, 17 Oct 94 02:45:06 +0100 Received: by mandolin.GCR.COM (Smail3.1.28.1 #1) id m0qwgr3-0004QKC; Sun, 16 Oct 94 21:27 EDT Message-Id: From: dodger@gcr.com (Roger Labbe) Subject: DOS version keeps issuing Ctrl-C during input To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de (lisp listserv) Date: Sun, 16 Oct 1994 21:27:13 -0400 (EDT) X-Mailer: ELM [version 2.4 PL24alpha4] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 390 I am using the DOS version of CLISP (dated 13 aug 1994). When I am working in readline I keep getting spurious messages ctrl-C was pressed and brings me to the "break 1>" prompt. It seems to happen most often when the cursor moves left to match parenthesis and I type a ), but it happens other times also. Is anyone familiar with this problem? BTW, I am running w/ MSDOS 6.21. Roger Labbe From johann@mail4.ai.univie.ac.at Mon Oct 24 12:30:47 1994 Return-Path: Received: from wieden.ai.univie.ac.at by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03560; Mon, 24 Oct 94 12:30:47 +0100 Received: by wieden.ai.univie.ac.at id AA11457 (5.65c/IDA-1.4.4 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de); Mon, 24 Oct 1994 12:27:31 +0100 Date: Mon, 24 Oct 1994 12:27:31 +0100 From: Johann Petrak Message-Id: <199410241127.AA11457@wieden.ai.univie.ac.at> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Problem w/ builtin editor in DOS clisp (August 94) After starting the lisp with the image included in the package: > lisp.exe -M lispinit.mem I load the (compiled) editor: (load "editor") Now, if I do (ed "xxx.lsp") the following error message appears: SYSTEM::STORE: DEUTSCH does not fit in " ", bad type Anybody else encountered that problem - and knows how to fix it? Thanx in advance, Johann Johann Petrak Email: johann@ai.univie.ac.at Austrian Research Institute for Phone: +43-1-533-61-12 Artificial Intelligence +43-1-535-32-81/0 Schottengasse 3 Fax: +43-1-532-06-52 A-1010 Vienna, AUSTRIA http://www.ai.univie.ac.at From hoehle@inf-wiss.uni-konstanz.de Mon Oct 24 12:53:37 1994 Return-Path: Received: from inf-wiss.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03688; Mon, 24 Oct 94 12:53:37 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA00590; Mon, 24 Oct 94 12:50:42 +0100 Date: Mon, 24 Oct 94 12:50:42 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9410241150.AA00590@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA07139; Mon, 24 Oct 94 12:54:25 +0100 To: clisp-list@[129.13.115.2] Subject: Problem w/ builtin editor in DOS clisp (August 94) In-Reply-To: <199410241127.AA11457@wieden.ai.univie.ac.at> References: <199410241127.AA11457@wieden.ai.univie.ac.at> Johann Petrak writes: > Now, if I do > (ed "xxx.lsp") > the following error message appears: > SYSTEM::STORE: DEUTSCH does not fit in " ", bad type I got similar errors about SYSTEM::STORE with EDITOR or SCREEN on the Amiga (January and newer versions) but had no time yet to trace them. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From mprice@u.washington.edu Mon Oct 24 20:45:56 1994 Return-Path: Received: from homer01.u.washington.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04336; Mon, 24 Oct 94 20:45:56 +0100 Received: by homer01.u.washington.edu (5.65+UW94.4/UW-NDC Revision: 2.30 ) id AA16059; Mon, 24 Oct 94 12:42:50 -0700 X-Sender: mprice@homer01.u.washington.edu Date: Mon, 24 Oct 1994 12:42:48 -0700 (PDT) From: matthew price To: clisp-list Cc: Multiple recipients of list Subject: Re: Problem w/ builtin editor in DOS clisp (August 94) In-Reply-To: <199410241127.AA11457@wieden.ai.univie.ac.at> Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I am new to lisp, and have been encountering problems with the editor also. The instructions in the readme file don't specify where to use the command "(load "editor")" nor how to edit the config.lsp file to make use of the built in editor. I've tried a variety of approaches and none of them have been successful. If anyone has a correctly edited config file they would care to share, I would be very grateful. I have a 386/40 running DOS. Thanks! --Matt Price On Mon, 24 Oct 1994, Johann Petrak wrote: > After starting the lisp with the image included in the package: > > lisp.exe -M lispinit.mem > I load the (compiled) editor: > (load "editor") > > Now, if I do > (ed "xxx.lsp") > the following error message appears: > SYSTEM::STORE: DEUTSCH does not fit in " ", bad type > > Anybody else encountered that problem - and knows how to fix it? > Thanx in advance, > > Johann > > Johann Petrak Email: johann@ai.univie.ac.at > Austrian Research Institute for Phone: +43-1-533-61-12 > Artificial Intelligence +43-1-535-32-81/0 > Schottengasse 3 Fax: +43-1-532-06-52 > A-1010 Vienna, AUSTRIA http://www.ai.univie.ac.at > > From dodger@gcr.com Wed Oct 26 00:38:03 1994 Return-Path: Received: from mandolin.GCR.COM by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01805; Wed, 26 Oct 94 00:38:03 +0100 Received: by mandolin.GCR.COM (Smail3.1.28.1 #1) id m0qzvOn-0004RCC; Tue, 25 Oct 94 19:35 EDT Message-Id: From: dodger@gcr.com (Roger Labbe) Subject: Re: Problem w/ builtin editor in DOS clisp (August 94) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Tue, 25 Oct 1994 19:35:25 -0400 (EDT) In-Reply-To: <199410241127.AA11457@wieden.ai.univie.ac.at> from "Johann Petrak" at Oct 24, 94 12:36:24 pm X-Mailer: ELM [version 2.4 PL24alpha4] Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 296 I had the same problem, too. I stopped using the built in editor (probably not the answer you wanted to hear). I put the line (defparameter *editor* "c:\\bin\\emacs.exe") is my config.lsp file (I am running on a DOS machine, I forget what machine you said you are on) to load my editor. Roger From haible Thu Oct 27 00:28:55 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03096; Thu, 27 Oct 94 00:28:55 +0100 Date: Thu, 27 Oct 94 00:28:55 +0100 From: haible (Bruno Haible) Message-Id: <9410262328.AA03096@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2 Subject: New version of old CLISP Cc: AI.Repository@cs.cmu.edu, friedman@gnu.ai.mit.edu A new version of my current personal source of CLISP is at the usual place, in ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source-haible/. The distribution is now split up into: clispsrc.tar.z main CLISP source, required clispsrc-readline.tar.z modified GNU readline library, recommended clispsrc-newreadline.tar.z another modified GNU readline library, optional clispsrc-stdwin.tar.z stdwin library, optional clispsrc-queens.tar.z sample add-on module, optional The required + recommended parts together now fit on 2 diskettes again. Change log since 23 August 1994: 26 October 1994 =============== Important note -------------- * Changed bytecode format. All .fas files generated by previous CLISP versions are invalid and must be recompiled. User visible changes -------------------- * X3J13 vote <77> is implemented: CL:FLET, CL:LABELS, CL:MACROLET allow declarations. * X3J13 vote <78> is implemented: CL:FLET, CL:LABELS, CL:MACROLET, DEFTYPE, DEFSETF, DEFINE-SETF-METHOD establish an implicit BLOCK. * X3J13 vote <128> is implemented: MAKE-PATHNAME, PATHNAME-HOST, PATHNAME-DEVICE, PATHNAME-DIRECTORY, PATHNAME-NAME, PATHNAME-TYPE have a keyword argument :CASE. Thanks to Marcus Daniels. * X3J13 vote <137> is implemented: New functions WILD-PATHNAME-P, PATHNAME-MATCH-P and TRANSLATE-PATHNAME. Thanks to Marcus Daniels. * X3J13 vote <130> is implemented: New built-in type LOGICAL-PATHNAME. New place LOGICAL-PATHNAME-TRANSLATIONS. New functions LOGICAL-PATHNAME, TRANSLATE-LOGICAL-PATHNAME, LOAD-LOGICAL-PATHNAME-TRANSLATIONS, COMPILE-FILE-PATHNAME. Thanks to Marcus Daniels. * X3J13 vote <132> is implemented: Synonym streams to file streams are allowed as pathnames. * Amiga version: SCREEN package is implemented. Thanks to Joerg Hoehle. * The debugger emits some more messages to *DEBUG-IO*, not *ERROR-OUTPUT*. Reported by Joerg Hoehle. * (COERCE symbol 'FUNCTION) now works. Reported by Don Cohen. * Fixed a bug in ENOUGH-NAMESTRING: In many cases, a relative directory specification was returned instead of an absolute directory specification. * Fixed a CLOS bug which caused (DEFCLASS FOO (STANDARD-OBJECT) ()) and (DEFINE-CONDITION FOO (CONDITION) ()) to signal errors. Reported by Don Cohen. * Fixed a bug: In some situations, USE-PACKAGE reported a name conflict when there was none. Reported by Don Cohen. * Fixed a bug: (READ-CHAR-NO-HANG stream nil eof-object) now signals an error if stream is not an input stream. Previously it returned eof-object. Reported by Joerg Hoehle. * Fixed a bug: On some Unix systems, (FINISH-OUTPUT *TERMINAL-IO*) signalled an error if standard output was redirected to a file. Reported by Brad Miller. * (SQRT 0) now returns an integer 0 instead of a floating-point 0.0. Reported by Michael Stoll. * Readline library: Fixed a small problem with input prompts longer than the screen width. * Fixed three bugs in the built-in editor. One of them made the editor entirely unusable. Reported by Johann Petrak and others. Portability ----------- * On DOS, the readline library now handles the /!INPUTRC and history files correctly. Reported by Ralf Muschall. Other modifications ------------------- * Generational garbage collection now also works on Linux (1.1.52 or newer). * On Unix, external modules written in C can be linked to CLISP without recompiling CLISP from source. For example, the STDWIN library. 1 September 1994 ================ User visible changes -------------------- * The DEFCONSTANT warning about redefinition of a constant is also inhibited if the constant's new and old values are the same string (in the sense of EQUAL). Thanks to Marcus Daniels. * Unix version only: The daylight saving time flag of a time zone (eighth value of GET-DECODED-TIME and DECODE-UNIVERSAL-TIME) is now correct. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Thu Oct 27 00:39:36 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03205; Thu, 27 Oct 94 00:39:36 +0100 Date: Thu, 27 Oct 94 00:39:36 +0100 From: haible (Bruno Haible) Message-Id: <9410262339.AA03205@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Problem w/ builtin editor in DOS clisp (August 94) Johann Petrak stated: > Now, if I do > (ed "xxx.lsp") > the following error message appears: > SYSTEM::STORE: DEUTSCH does not fit in " ", bad type The built-in editor must have been unusable since 1994-06-22. A fixed editor.lsp is contained in the 1994-10-26 clispsrc.tar.z. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Thu Oct 27 00:51:25 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03325; Thu, 27 Oct 94 00:51:25 +0100 Date: Thu, 27 Oct 94 00:51:25 +0100 From: haible (Bruno Haible) Message-Id: <9410262351.AA03325@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: DOS version keeps issuing Ctrl-C during input Roger Labbe wrote: > I am using the DOS version of CLISP (dated 13 aug 1994). When > I am working in readline I keep getting spurious messages > ctrl-C was pressed and brings me to the "break 1>" prompt. > It seems to happen most often when the cursor moves left > to match parenthesis and I type a ), but it happens other > times also. This turned out to be a bug in EMX. The annoying behaviour will be fixed when a new DOS version of CLISP is built from the 1994-10-26 source. For the moment, here is a workaround: Create a file \!INPUTRC in the current drive's root directory, containing the line set blink-matching-paren off and convert this file to Unix conventions (LF not CR/LF as line end marker, no Ctrl-Z file end marker). Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From csb@aurora.os.dhhs.gov Mon Oct 31 20:09:46 1994 Return-Path: Received: from aurora.os.dhhs.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA19155; Mon, 31 Oct 94 20:09:46 +0100 Received: by aurora.os.dhhs.gov (1.38.193.5/16.2) id AA13834; Mon, 31 Oct 1994 14:08:03 -0500 Date: Mon, 31 Oct 1994 14:08:02 -0400 (EDT) From: Cameron Bowes Subject: CLX on HP-UX To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: Cameron Bowes Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Using Bruno's 10/26/94 source I've gotten clisp working well with our HP I70 running HP/UX 9.04. Many thanks to Bruno for the tips on getting things running. Then I decided to go for it in an attempt to get CLX and garnet working. CLX seems to compile just fine and creates the image, however, when I go to run the demo (hello.lsp), I receive in response: (xlib::hello-world "") *** - UNIX error 2 (ENOENT): No such file or directory I've tried this using various clisp binaries, including the pre-compiled one from the ftp server. I'm stuck troubleshooting this one, other than it seems to have something to do with the DISPLAY variable? I'm connected as a legitimate authorized X station while running this. Any assistance would be greatly appreciated, or I can provide more information if necessary. Thanks in advance. Cameron Bowes U.S. Dept. of Health & Human Svcs. csb@aurora.os.dhhs.gov From Michel.Loi@lip.ens-lyon.fr Wed Nov 2 09:33:37 1994 Return-Path: Received: from cri.ens-lyon.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20634; Wed, 2 Nov 94 09:33:37 +0100 Received: from lip.ens-lyon.fr (lip-gw) by cri.ens-lyon.fr (5.0/SMI-SVR4) id AA22214; Wed, 2 Nov 1994 09:29:15 +0100 Received: from mezcal.ens-lyon.fr by lip.ens-lyon.fr (4.1/SMI-4.1) id AA12397; Wed, 2 Nov 94 09:29:16 +0100 Date: Wed, 2 Nov 94 09:29:16 +0100 From: Michel.Loi@lip.ens-lyon.fr (Michel Loi) Message-Id: <9411020829.AA12397@lip.ens-lyon.fr> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: problem building clisp for AMIGA NetBSD 1.0 Cc: Michel.Loi@lip.ens-lyon.fr Content-Length: 948 Hello, I am trying to build the last version of B. Haible clisp (ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/source-haible) for AMIGA NetBSD 1.0. lisp.run dumps core when loading "defmacro.lsp" I use the following flags: - -DNO_MULTIMAP_SHM -DNO_MULTIMAP_FILE - unixconf.h is OK - I've modified lispbibl.d (appropriately ?): the address space layout of NetBSD 1.0 seems to be the same as the "ATARITT" one: address: bits 0..25 (shared libraries are mapped above 0x02000000 ?) and tag: 31..26 thus I have followed the definitions for "ATARITT" - I've also tried -DWIDE: same result - I've tried older versions of clisp: same result these versions work fine with AMIX 2.1 and NetBSD 0.9 (!) - I've used gcc 2.4.5 and 2.6.0: same result I suspect I am missing something. Has anybody built clisp for amiga NetBSD 1.0 ? (at least someone has built it for 386 NetBSD 1.0 Beta) Any help is welcome. Thanks. -- Michel LOI From hoehle@inf-wiss.uni-konstanz.de Wed Nov 2 12:36:34 1994 Return-Path: Received: from inf-wiss.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20910; Wed, 2 Nov 94 12:36:34 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA19011; Wed, 2 Nov 94 12:32:14 +0100 Date: Wed, 2 Nov 94 12:32:14 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9411021132.AA19011@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA09046; Wed, 2 Nov 94 12:36:11 +0100 To: clisp-list@[129.13.115.2] Subject: problem building clisp for AMIGA NetBSD 1.0 In-Reply-To: <9411020829.AA12397@lip.ens-lyon.fr> References: <9411020829.AA12397@lip.ens-lyon.fr> Michel Loi writes: > for AMIGA NetBSD 1.0. Well, I've never tried this OS but I've got some experience with CLISP, GCC and the Amiga :-) > lisp.run dumps core when loading "defmacro.lsp" I'd suggest that you try to find the bug more closely. Sometimes, when I succeeded in generating a lisp.run that would start, later crashes would be caused by GCC bugs inside a specific function, e.g. I had to patch a little of assembly output for GCC260 and -DWIDE in CONTROL:_C_go. > - I've tried older versions of clisp: same result > these versions work fine with AMIX 2.1 and > NetBSD 0.9 (!) As the writers of NetBSD 1.0 were so crazy as to require 64 bit pointers for every platform, a GCC bug is possibility to think of. I'm not yet too confident in GCC 64 bit usage on m68k now, but I didn't test the latest beta2.6.1. I'm not using the last source-haible myself, the snapshot I'm working on is 1st Sep. Maybe something bad slipped in. Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de AMIGAOS-CLISP From mycroft@gnu.ai.mit.edu Thu Nov 3 04:58:08 1994 Return-Path: Received: from albert.gnu.ai.mit.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA22470; Thu, 3 Nov 94 04:58:08 +0100 Received: from goldman.gnu.ai.mit.edu by albert.gnu.ai.mit.edu (5.65/4.0) with SMTP id ; Wed, 2 Nov 94 22:53:31 -0500 Received: by goldman.gnu.ai.mit.edu (15.11/4.0) id ; Wed, 2 Nov 94 22:53:28 est Date: Wed, 2 Nov 94 22:53:28 est From: mycroft@gnu.ai.mit.edu Message-Id: <9411030353.AA01241@goldman.gnu.ai.mit.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: problem building clisp for AMIGA NetBSD 1.0 As the writers of NetBSD 1.0 were so crazy as to require 64 bit pointers for every platform, a GCC bug is possibility to think of. You mean `64-bit file offsets'. It is hardly `crazy' to expect that file offsets be 64 bits on all machines. I'm not yet too confident in GCC 64 bit usage on m68k now, but I didn't test the latest beta2.6.1. We use GCC 2.4.5, and I've fixed the only bug I've encountered with 64-bit arithmetic. From kaelin@bridge.com Thu Nov 10 19:06:24 1994 Return-Path: Received: from gatekeeper.Bridge.COM by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02311; Thu, 10 Nov 94 19:06:24 +0100 Received: from localhost (mail@localhost) by gatekeeper.Bridge.COM (8.6.5/8.6.5) id LAA09306 for ; Thu, 10 Nov 1994 11:59:02 -0600 Received: from ignatz.bridge.com(167.76.24.6) by gatekeeper.Bridge.COM via smap (V1.0mjr) id sma009304; Thu Nov 10 11:58:58 1994 Received: from binki (binki.bridge.com) by ignatz.bridge.com with SMTP id AA22391 (5.67b/IDA-1.5 for ); Thu, 10 Nov 1994 12:00:34 -0600 Received: by binki (4.1/SMI-4.1) id AA15908; Thu, 10 Nov 94 12:00:28 CST Date: Thu, 10 Nov 1994 12:00:28 -0600 (CST) From: Kaelin Colclasure X-Sender: kaelin@binki To: CLISP Mailing List Subject: ??? CLISP and CLUE ??? Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Greetings! I've just added myself to this list, so forgive me if I'm rehashing old ground... Has anyone successfully used the current version of CLISP and CLX with CLUE? I retrieved the relevant tar files from the CLISP FTP site, but was not able to get CLUE to build "out of the box." I'm pretty sure the immediate problem is caused by the need to (use-package "CLOS") to get CLX to use DEFCLASS instead of DEFSTRUCT, but before I jump in and start modifying sources I was wondering if a) there is an easy fix for this or b) it is a complete waste of time because CLISP and CLUE don't play well together? // Kaelin Colclasure --------------------------------------------------------- // EMail: kaelin@bridge.com Mail: Bridge Information Systems, Inc. // Voice: (314)567-8463 717 Office Parkway // Fax: (314)432-5391 St. Louis, MO 63141 From wechard@YorkU.CA Fri Nov 11 15:02:37 1994 Return-Path: Received: from trocaz.yorku.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03392; Fri, 11 Nov 94 15:02:37 +0100 Received: (from wechard@localhost) by trocaz.yorku.ca (8.6.9/8.6.9) id IAA32680 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Fri, 11 Nov 1994 08:56:27 -0500 Date: Fri, 11 Nov 1994 08:56:27 -0500 From: "William Echard" Message-Id: <9411110856.ZM15014@trocaz.yorku.ca> X-Mailer: Z-Mail Lite (3.2.0 26may94) To: Subject: need description of DOS graphics routines Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii In my copy of the latest DOS version, I can't seem to find a description of the simple graphics routines that I've heard are included. Could someone tell me where I could find these? Thanks, William. From haible Fri Nov 11 15:09:34 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA03483; Fri, 11 Nov 94 15:09:34 +0100 Date: Fri, 11 Nov 94 15:09:34 +0100 From: haible (Bruno Haible) Message-Id: <9411111409.AA03483@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: need description of DOS graphics routines > In my copy of the latest DOS version, I can't seem to find a description of > the simple graphics routines that I've heard are included. Could someone > tell me where I could find these? ma2s2.mathematik.uni-karlsruhe.de:/pub/lisp/clisp/binaries/dos/vga-graph.txt Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From mabramso@site.gmu.edu Sat Nov 12 14:02:16 1994 Return-Path: Received: from site.gmu.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA04557; Sat, 12 Nov 94 14:02:16 +0100 Received: by site.gmu.edu (5.0/SMI-SVR4) id AA19276; Sat, 12 Nov 1994 07:56:07 +0500 Date: Sat, 12 Nov 1994 07:56:07 +0500 From: mabramso@site.gmu.edu (Myriam Abramson) Message-Id: <9411121256.AA19276@site.gmu.edu> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: editor Content-Length: 150 I just downloaded the clisp dos version. If I also download FSF emacs for dos, will I be able to call Clisp from within emacs? Thanks myriam From nummi@cissy.gia.rwth-aachen.de Mon Nov 21 11:47:39 1994 Return-Path: Received: from cissy.gia.rwth-aachen.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14436; Mon, 21 Nov 94 11:47:39 +0100 Received: by cissy.gia.rwth-aachen.de (MX V4.1 VAX) id 2; Mon, 21 Nov 1994 11:39:43 EST Date: Mon, 21 Nov 1994 11:39:42 EST From: nummi@cissy.gia.rwth-aachen.de To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: <00987CBD.0A5DC3C0.2@cissy.gia.rwth-aachen.de> Subject: CLisp under Linux, run time error Hi Lispers, I recently installed Linux on my PC and I tried to install the CLisp version Oct. 94 too. Because i didn't use Linux before (so i'm an absolute beginner with it) i ignored the Linux question and answers so far unfortunately ... Hope this isn't too much redundant. I ftp'd the binary version and this is what happened: after starting CLisp: Cannot allocate private shared memory segment errno = ENOSYS: Function not implemented Lisp.run: Not enough memory Memory at this time: Mem: 7024K av., 3120K used, 3904K free, 1768 shrd, 1140K buff Swap: 16668K av., 0K used, 16668K free Is this an error message from Linux itself ? I compiled the Linux kernel version 1.1.50 The CLisp Oct. version from 93 is running. Must i install a new version of gcc ? I dont have the version here. Linux is running at home =) It comes from the InfoMagic CD Oct. 94 Many thanks in advance -Nummi ------------------------------ nummi@cissy.gia.rwth-aachen.de From daa93@aber.ac.uk Mon Nov 21 13:45:01 1994 Return-Path: Received: from mailsun.aber.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA14678; Mon, 21 Nov 94 13:45:01 +0100 Received: from athene.dcs.aber.ac.uk by mailsun.aber.ac.uk with SMTP (PP); Mon, 21 Nov 1994 12:36:26 +0000 Received: from saturn.dcs.aber.ac.uk by athene.dcs.aber.ac.uk (4.1/aberclient-4.0-cs-1.1) id AA09213; Mon, 21 Nov 94 12:33:33 GMT From: daa93@aber.ac.uk Date: Mon, 21 Nov 1994 12:36:12 +0000 Message-Id: <26163.9411211236@saturn.dcs.aber.ac.uk> X-Mailer: Mail User's Shell (7.2.5 10/14/92) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: CLISP on SunOS4 Content-Length: 1082 Hello, I'm sorry if this is in the archives but I need a rather quick reply. I'm trying to get CLISP running on a Sun under SunOS 4.1.3. A 'uname' command gives: SunOS neptune 4.1.3 3 sun4 I've downloaded and extracted the files in 'binaries/sun4-sunos4/clisp-sun4c.tar.z' and run the compiler as per the README file. However, when trying to get CLISP to start using the command given in the README file I get the following error: lisp.run: initialisation file was not created by this version of LISP I tried starting without the memory file and loaded the 'init.fas' file and it seems to work O.K. Should I just save this memory image or is it better to use the one supplied? David. -- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- David Arnold (daa93@aber.ac.uk) Dept. Computer Science +44 (0)970-622449 University of Wales,Aberystwyth, Dyfed SY23 3DB, UK. http://www.dcs.aber.ac.uk/~daa93 GCS -d+ p c++@ !l e++ m+++(*) s+/- n+ h(-) f !g w- t+@ y? -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -= -=- -=-- -=- -=- From Michel.Loi@lip.ens-lyon.fr Mon Nov 21 16:10:18 1994 Return-Path: Received: from cri.ens-lyon.fr by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15383; Mon, 21 Nov 94 16:10:18 +0100 Received: from lip.ens-lyon.fr (lip-gw) by cri.ens-lyon.fr (5.0/SMI-SVR4) id AA28362; Mon, 21 Nov 1994 16:02:31 +0100 Received: from mezcal.ens-lyon.fr by lip.ens-lyon.fr (4.1/SMI-4.1) id AA19025; Mon, 21 Nov 94 16:02:32 +0100 Date: Mon, 21 Nov 94 16:02:32 +0100 From: Michel.Loi@lip.ens-lyon.fr (Michel Loi) Message-Id: <9411211502.AA19025@lip.ens-lyon.fr> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: foreign.lsp Cc: Michel.Loi@lip.ens-lyon.fr Content-Length: 781 Hi, what is the current status of the foreign call interface ? I use Bruno Haible sources (1994-10-26) and foreign.lsp is still under construction. Are newst version of this interface available ? Currently I use a modified version of clisp in order to dynamicaly load .so files and call c functions with raw arrays of integers as arguments, but I want to move to something more portable and flexible. Any help is welcome. Many thanks in advance. *************************************************************************** Michel LOI Email: Michel.Loi@lip.ens-lyon.fr L.I.P.- CNRS Tel: (33) 72 72 83 52 ENS-LYON 69364 Lyon Cedex 07 FRANCE *************************************************************************** From oneel@arupa.gsfc.nasa.gov Mon Nov 21 16:11:10 1994 Return-Path: Received: from arupa.gsfc.nasa.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA15412; Mon, 21 Nov 94 16:11:10 +0100 Received: by arupa.gsfc.nasa.gov (Smail3.1.28.1 #2) id m0r9aFh-0001v0C; Mon, 21 Nov 94 10:01 EST Message-Id: Date: Mon, 21 Nov 94 10:01 EST From: oneel@arupa.gsfc.nasa.gov (Bruce O'Neel) To: clisp-list Subject: CLisp, CLOS, and warning when you reload a file In-Reply-To: <102889924@toto.iv> References: <00987CBD.0A5DC3C0.2@cissy.gia.rwth-aachen.de> Hi, This may be a silly question, but.... I'm running Clisp on OS/2 and when I'm using a file which uses CLOS and I reload it I get a load'o warnings. This is ok, but I'd prefer not to see them. Is there a simple way to turn them off? Thanks! bruce oneel@arupa.gsfc.nasa.gov -- Bruce O'Neel HSTX (301) 286-1511 -- Graphical icons were intended to make software friendly, and easy to use. Now Microsoft applications have Tool Tips - Text labels that appear when you move the mouse pointer over icons. We used to call these "menus." -- D Kalman DBMS 9/94 From daa93@aber.ac.uk Tue Nov 22 14:53:54 1994 Return-Path: Received: from mailsun.aber.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA16688; Tue, 22 Nov 94 14:53:54 +0100 Received: from athene.dcs.aber.ac.uk by mailsun.aber.ac.uk with SMTP (PP); Tue, 22 Nov 1994 13:45:13 +0000 Received: from saturn.dcs.aber.ac.uk by athene.dcs.aber.ac.uk (4.1/aberclient-4.0-cs-1.1) id AA28095; Tue, 22 Nov 94 13:42:13 GMT From: daa93@aber.ac.uk Date: Tue, 22 Nov 1994 13:44:52 +0000 Message-Id: <22399.9411221344@saturn.dcs.aber.ac.uk> X-Mailer: Mail User's Shell (7.2.5 10/14/92) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Problem with .FAS file on SunOS4 Content-Length: 1451 Hi, I have a SunOS4 '.fas' file that I am having trouble using. When I first tried loading it I got the message: *** - This file was produced by another lisp version, must be recompiled. Since I do not have the source code for this file, and being a bit of a hacker, I thought I would have a look at the file. The first thing that struck me was a number that looked suspiciously like a date in the first line. So I compiled a simple file and compared them. Sure enough this number had changed. I then decided to alter the date in the original '.fas' file to be the same as in the simple one. The file now starts to load but I then get the following message: *** - UNUSE-PACKAGE: argument should be a package or a package name, not # The original '.fas' file has a first line of: (SYSTEM::VERSION '(SYSTEM::CLISP3 9. LISP:T 290893.)) and the simple one of: (SYSTEM::VERSION '(SYSTEM::CLISP3 9. LISP:T 101293.)) Does this mean that I cannot use this file, or can I get a copy of an earlier compiler to run it on. Thanks for any help, David. -- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- David Arnold (daa93@aber.ac.uk) Dept. Computer Science +44 (0)970-622449 University of Wales,Aberystwyth, Dyfed SY23 3DB, UK. http://www.dcs.aber.ac.uk/~daa93 GCS -d+ p c++@ !l e++ m+++(*) s+/- n+ h(-) f !g w- t+@ y? -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -= -=- -=-- -=- -=- From barryw@ucs.orst.edu Tue Nov 22 20:09:55 1994 Return-Path: Received: from ucs.orst.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA17468; Tue, 22 Nov 94 20:09:55 +0100 Received: by ucs.orst.edu; (5.65/1.1.8.2/24Sep94-1201PM) id AA03908; Tue, 22 Nov 1994 11:01:58 -0800 Date: Tue, 22 Nov 1994 11:01:58 -0800 (PST) From: William Barry Sender: William Barry Reply-To: William Barry Subject: Attempt to modify read-only data To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; CHARSET=US-ASCII I am having trouble with the following test file using the 10-26-94 version of clisp under Linux -----test2.lisp----------------- (in-package 'user) (defvar temp-string "Matson, I need you") (setf (char temp-string 0) #\W) (print temp-string) --------------------------------------------- I get the following output > (load 'test2.lisp) ;; Loading file test2.lisp ... *** - Attempt to modify read-only data 1. Break> up EVAL frame for form (SETF (CHAR TEMP-STRING 0) #\W) 1. Break> --------------------------------------------------- It works fine using the dos version of clisp. Can anyone suggest a way of fixing this? Thanks, Bill Barry From wechard@YorkU.CA Wed Nov 23 15:05:36 1994 Return-Path: Received: from trocaz.yorku.ca by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA18131; Wed, 23 Nov 94 15:05:36 +0100 Received: (from wechard@localhost) by trocaz.yorku.ca (8.6.9/8.6.9) id IAA34287 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Wed, 23 Nov 1994 08:57:23 -0500 Date: Wed, 23 Nov 1994 08:57:23 -0500 From: "William Echard" Message-Id: <9411230857.ZM21997@trocaz.yorku.ca> X-Mailer: Z-Mail Lite (3.2.0 26may94) To: Subject: DOS graphics help needed Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii I've been playing with the pixel graphics under DOS. I've found that the (SYSTEM::GRAPH_SHOW) command only leaves the graphics on screen for about a quarter second. What I'd like to know is what is the best way to embed this command in a function, such that the graphics stay on screen until a key is pressed. I've looked through my LISP manuals for some kind of pause or key-detecting function, but no luck. Sorry for the newbie question, but any help would be appreciated. From haible Fri Nov 25 01:22:20 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20757; Fri, 25 Nov 94 01:22:20 +0100 Date: Fri, 25 Nov 94 01:22:20 +0100 From: haible (Bruno Haible) Message-Id: <9411250022.AA20757@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: CLisp under Linux, run time error --- Linux specific --- Ralf Numrich tried to run the CLISP binaries on Linux and got the following error message: > Cannot allocate private shared memory segment > errno = ENOSYS: Function not implemented > Lisp.run: Not enough memory Shared memory is part of SysV IPC. Reconfigure and recompile your Linux kernel, _with_ IPC, not without, install it and reboot. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Nov 25 01:34:18 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20866; Fri, 25 Nov 94 01:34:18 +0100 Date: Fri, 25 Nov 94 01:34:18 +0100 From: haible (Bruno Haible) Message-Id: <9411250034.AA20866@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: CLISP on SunOS4 David Arnold writes: > I've downloaded and extracted the files in > 'binaries/sun4-sunos4/clisp-sun4c.tar.z' > and run the compiler as per the README file. > > However, when trying to get CLISP to start using the command given > in the README file I get the following error: > lisp.run: initialisation file was not created by this version of LISP I can't reproduce this. > I tried starting without the memory file and loaded the 'init.fas' > file and it seems to work O.K. Should I just save this memory image or > is it better to use the one supplied? The memory image you get from running the command lisp.run -x '(load "init.fas") (saveinitmem)' is good. It is safe to use this one, especially if the one I supplied doesn't work. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Nov 25 01:50:09 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA20933; Fri, 25 Nov 94 01:50:09 +0100 Date: Fri, 25 Nov 94 01:50:09 +0100 From: haible (Bruno Haible) Message-Id: <9411250050.AA20933@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Problem with .FAS file on SunOS4 David Arnold writes about old .FAS files: > *** - This file was produced by another lisp version, must be recompiled. > > Since I do not have the source code for this file, and being a bit > of a hacker, I thought I would have a look at the file. The first thing > that struck me was a number that looked suspiciously like a date in > the first line. Yes, this is the date of the last incompatible change to the bytecode. > I then decided to alter the date in > the original '.fas' file to be the same as in the simple one. I would not recommend to do this. > Does this mean that I cannot use this file, or can I get a copy of an > earlier compiler to run it on. Indeed, you cannot use this .FAS file with newer CLISP versions. Either - you get a not-so-new CLISP (available in the 199x-yy-zz/ directories of the source/ and binaries/*/ directories on ma2s2.mathematik.uni-karlsruhe.de), or - someone writes a "decompiler" that turns the bytecode contained in the .fas file into some primitive Lisp code which can then be compiled by a newer CLISP version. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Nov 25 02:20:25 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21011; Fri, 25 Nov 94 02:20:25 +0100 Date: Fri, 25 Nov 94 02:20:25 +0100 From: haible (Bruno Haible) Message-Id: <9411250120.AA21011@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, oneel@arupa.gsfc.nasa.gov Subject: Re: CLisp, CLOS, and warning when you reload a file Bruce O'Neel wrote: > when I'm using a file which uses CLOS > and I reload it I get a load'o warnings. This is ok, but I'd prefer > not to see them. Is there a simple way to turn them off? Yes, put a (handler-bind ((warning #'(lambda (w) (muffle-warning w)))) ... ) around your LOAD form. Btw, we have already discussed the issue of the CLOS warnings on this mailing list in July 1994. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Nov 25 02:35:00 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21084; Fri, 25 Nov 94 02:35:00 +0100 Date: Fri, 25 Nov 94 02:35:00 +0100 From: haible (Bruno Haible) Message-Id: <9411250135.AA21084@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Attempt to modify read-only data William Barry is having trouble with the following program file: > (in-package 'user) > (defvar temp-string "Matson, I need you") > (setf (char temp-string 0) #\W) > (print temp-string) Common Lisp forbids to modify constants that appear in programs, because this is the way a certain class of "self-modifying programs" works. Your string is such a constant. If you intend to modify it, you have to copy it: (defvar temp-string (copy-seq "Matson, I need you")) > It works fine using the dos version of clisp. Because under Linux and some other Unices it is possible to catch this kind of error at no speed cost, whereas under DOS it would make CLISP slower so I refrained from implementing the check. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Fri Nov 25 02:44:22 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21158; Fri, 25 Nov 94 02:44:22 +0100 Date: Fri, 25 Nov 94 02:44:22 +0100 From: haible (Bruno Haible) Message-Id: <9411250144.AA21158@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: DOS graphics help needed William Echard writes: > I've looked through my LISP manuals for some kind of pause or > key-detecting function, but no luck. Sorry for the newbie question, but any > help would be appreciated. Such a function hasn't been standardized. In CLISP, something like (with-keyboard (clear-input *keyboard-input*) (read-char *keyboard-input*)) will wait until a key is pressed. Please refer to impnotes.txt, section 21.1, for details. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From oneel@arupa.gsfc.nasa.gov Fri Nov 25 16:11:14 1994 Return-Path: Received: from arupa.gsfc.nasa.gov by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA21883; Fri, 25 Nov 94 16:11:14 +0100 Received: by arupa.gsfc.nasa.gov (Smail3.1.28.1 #2) id m0rB1m2-0001u0C; Fri, 25 Nov 94 09:37 EST Message-Id: Date: Fri, 25 Nov 94 09:37 EST From: oneel@arupa.gsfc.nasa.gov (Bruce O'Neel) To: clisp-list Subject: Re: CLisp, CLOS, and warning when you reload a file In-Reply-To: <9411250120.AA21011@ma2s2.mathematik.uni-karlsruhe.de> References: <9411250120.AA21011@ma2s2.mathematik.uni-karlsruhe.de> Bruno Haible writes: > Bruce O'Neel wrote: > > > when I'm using a file which uses CLOS > > and I reload it I get a load'o warnings. This is ok, but I'd prefer > > not to see them. Is there a simple way to turn them off? > > Yes, put a > > (handler-bind ((warning #'(lambda (w) (muffle-warning w)))) ... ) > > around your LOAD form. > > Btw, we have already discussed the issue of the CLOS warnings on this > mailing list in July 1994. > > > Bruno Haible > haible@ma2s2.mathematik.uni-karlsruhe.de > Thanks! bruce oneel@arupa.gsfc.nasa.gov -- Bruce O'Neel HSTX (301) 286-1511 -- Graphical icons were intended to make software friendly, and easy to use. Now Microsoft applications have Tool Tips - Text labels that appear when you move the mouse pointer over icons. We used to call these "menus." -- D Kalman DBMS 9/94 From schrod@iti.informatik.th-darmstadt.de Mon Nov 28 21:22:05 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA23886; Mon, 28 Nov 94 21:22:05 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA38632 (5.65c/IDA-1.4.4 for ); Mon, 28 Nov 1994 21:13:04 +0100 Received: from spice.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id VAA17765; Mon, 28 Nov 1994 21:13:02 +0100 Received: by spice.iti.informatik.th-darmstadt.de (8.6.9/Client-1.5+iti/HRZ-THD) id VAA28179; Mon, 28 Nov 1994 21:13:03 +0100 From: Joachim Schrod Message-Id: <199411282013.VAA28179@spice.iti.informatik.th-darmstadt.de> Subject: Re: Problem with .FAS file on SunOS4 To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Mon, 28 Nov 1994 21:13:03 +0100 (MEZ) In-Reply-To: <9411250050.AA20933@ma2s2.mathematik.uni-karlsruhe.de> from "Bruno Haible" at Nov 25, 94 01:51:51 am X-Mailer: ELM [version 2.4 PL24] Content-Type: text Content-Length: 2579 Bruno wrote: > > David Arnold writes about old .FAS files: > > > *** - This file was produced by another lisp version, must be recompiled. > > > > Since I do not have the source code for this file, and being a bit > > of a hacker, I thought I would have a look at the file. The first thing > > that struck me was a number that looked suspiciously like a date in > > the first line. > > Yes, this is the date of the last incompatible change to the bytecode. > [...] Indeed, you cannot use this .FAS file with newer CLISP versions. Since we're at it; can you scetch in a few words what parameters FAS compatibility has? I ask because we noticed that the same CLISP (Version 1994-10-26) produces different FAS files on two platforms (RS6000/AIX and Linux [1.1.62]). Are there differences due to big/little-endianness? I ask because it would be nice if we could share FAS files between different platforms. For reference, I append the differences below. Cheers, Joachim fac.lsp: ------------8<-------------8<-------------8<---------------8<---------------- (defun fac (n) (if (zerop n) 1 (* n (fac (1- n))))) ------------8<-------------8<-------------8<---------------8<---------------- fac.lib: ------------8<-------------8<-------------8<---------------8<---------------- (PROGN (SYSTEM::C-DEFUN 'FAC)) ------------8<-------------8<-------------8<---------------8<---------------- RS6000 fac.fas: ------------8<-------------8<-------------8<---------------8<---------------- (SYSTEM::VERSION '(SYSTEM::CLISP3 64. LISP:T 161094.)) #Y(#:TOP-LEVEL-FORM-1 #18Y(00 00 00 00 00 00 00 01 D8 2E 01 D8 DA 31 79 C3 19 01) FAC SYSTEM::REMOVE-OLD-DEFINITIONS #Y(FAC #25Y(00 00 00 01 00 00 00 02 AB 8D 89 0A AB 96 02 6B 77 32 02 37 19 02 C3 19 02 ) 1. ) ) ------------8<-------------8<-------------8<---------------8<---------------- Linux fac.fas: ------------8<-------------8<-------------8<---------------8<---------------- (SYSTEM::VERSION '(SYSTEM::CLISP2 6. LISP:NIL 161094.)) #Y(#:TOP-LEVEL-FORM-1 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 79 C3 19 01) FAC SYSTEM::REMOVE-OLD-DEFINITIONS #Y(FAC #23Y(01 00 00 00 00 02 AB 8D 89 0A AB 96 02 6B 77 32 02 37 19 02 C3 19 02 ) 1. ) ) ------------8<-------------8<-------------8<---------------8<---------------- -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From donc@ISI.EDU Mon Nov 28 23:36:00 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA24227; Mon, 28 Nov 94 23:36:00 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-19) id ; Mon, 28 Nov 1994 14:26:59 -0800 Date: Mon, 28 Nov 94 14:26:23 -0800 Posted-Date: Mon, 28 Nov 94 14:26:23 -0800 Message-Id: <9411282226.AA01465@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Mon, 28 Nov 94 14:26:23 -0800 From: donc@ISI.EDU (Don Cohen) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: must be recompiled I ask because it would be nice if we could share FAS files between different platforms. This was my motivation when I discussed this with Bruno (via email). Unfortunately I haven't gotten around to DOING anything about it yet. If I'm lucky someone else out there will beat me to it. In the mean while, if I answer this quickly perhaps I'll save Bruno the trouble. The "must be recompiled" message results from differences between the loading environment and compiling ennvironment, described in the version expression at the top of the compiled file. The version contains 1. clisp2 or clisp3 2. *jmpbuf-size* 3. *big-endian* 4. the date on which the compiler was last changed in an incompatible way. Different changes result in different incompatibilities and I do not think we should hope to load files compiled by different compiler versions. I only hope to eliminate incompatibilities from the other three. #1 is clisp2 if C can manipulate the SP stack pointer, otherwise clisp3. #2 is a positive integer #3 is T or NIL #1,2,3 are all related to the format of compiled code in memory. I believe the compiler currently builds the compiled code in memory and then writes it out to produce a compiled file. Unfortunately this loses some data that could be used to produce one compiled file for all cases. Ideally the compiler should build another structure with the extra information. That structure would be written to the compiled file. It would be translated into a run time version in order to run it (this is what the loader would do too.) Clisp3 interpreters use an extra word (maximum stack depth). Obviously this extra data should be computed on machines that don't need it if we want to use the compiled code on machines that do. The compiled code contains in some places a number that is computed by the compiler as (*jmpbuf-size* * x) + y. If the compiler were altered slightly, it could remember x and y, and store both of those in the compiled file. Then the loader could compute the right value for the loading machine. #3 could be fixed by changing the loader (the #Y read macro) to swap various bytes on machines that need it. All of the necesssary info appears to be in the file compiler.lsp. Unfortunately (for me), the comments, which I imagine would be quite helpful, are in German. From pr-nilss@dsv.su.se Fri Dec 2 09:41:11 1994 Return-Path: Received: from garvin.dsv.su.se by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29616; Fri, 2 Dec 94 09:41:11 +0100 Received: from localhost (localhost [127.0.0.1]) by garvin.dsv.su.se (8.6.9/8.6.9) with SMTP id JAA09732 for clisp-list@ma2s2.mathematik.uni-karlsruhe.de; Fri, 2 Dec 1994 09:43:34 +0100 Message-Id: <199412020843.JAA09732@garvin.dsv.su.se> X-Authentication-Warning: garvin.dsv.su.se: Host localhost didn't use HELO protocol To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Compiling on Ultrix Date: Fri, 02 Dec 94 09:43:25 +0100 From: Peter Nilsson X-Mts: smtp Hi As the clisp binary for Ultrix on the ftp site is rather old I am trying to compile the src on my system. I'm running Ultrix V4.4 (Rev. 69) on a DECstation 5000. I have tried with and without the hints found in the file unix/PLATFORMS supplied with the source code, that is: After executing "target ...", change the first line in makemake from "#! /bin/sh" to "#! /usr/bin/ksh". /bin/sh apparently doesn't support function definitions. Add -DNO_MULTIMAP_SHM to the CFLAGS in the makefile. Shared memory facilities do not work: even SHMLBA is not defined correctly in . Regardless of this I get an error while making the file control.c: gcc -O -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -fomit- frame-pointer -O2 -c control.c In file included from /usr/local/gnu/lib/gcc-lib/mips-dec-ultrix4.4/2.6.1/inc lude/sys/termio.h:59, from /usr/local/gnu/lib/gcc-lib/mips-dec-ultrix4.4/2.6.1/include/sys/ termios.h:60, from /usr/include/termios.h:2, from unix.d:519, from lispbibl.d:1504, from control.d:4: /usr/local/gnu/lib/gcc-lib/mips-dec-ultrix4.4/2.6.1/include/sys/ioctl.h:473: warning: `/*' within comment /usr/local/gnu/lib/gcc-lib/mips-dec-ultrix4.4/2.6.1/include/sys/ioctl.h:474: warning: `/*' within comment /usr/local/gnu/lib/gcc-lib/mips-dec-ultrix4.4/2.6.1/include/sys/ioctl.h:475: warning: `/*' within comment gcc: Internal compiler error: program cpp got fatal signal 4 *** Error code 1 Stop. The warnings I get on a lot of other files too so they shouldn't be the cause of the error. Any hints on how to fix it will be very much appreciated. Alternatively, If anyone know of a fairly recently compiled clisp binary for Ultrix I would like to know. Peter Nilsson pr-nilss@dsv.su.se Royal Institute of Technology, Stockholm, Sweden From haible Fri Dec 2 15:54:21 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA00697; Fri, 2 Dec 94 15:54:21 +0100 Date: Fri, 2 Dec 94 15:54:21 +0100 From: haible (Bruno Haible) Message-Id: <9412021454.AA00697@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Compiling on Ultrix Peter Nilsson tries to build clisp: > gcc -O -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -fomit- > frame-pointer -O2 -c control.c ... > gcc: Internal compiler error: program cpp got fatal signal 4 The gcc-2.6.1 cpp has a bug, which is fixed in gcc-2.6.2. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From daa93@aber.ac.uk Fri Dec 2 16:40:59 1994 Return-Path: Received: from mailsun.aber.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01238; Fri, 2 Dec 94 16:40:59 +0100 Received: from athene.dcs.aber.ac.uk by mailsun.aber.ac.uk with SMTP (PP); Fri, 2 Dec 1994 15:42:38 +0000 Received: from saturn.dcs.aber.ac.uk by athene.dcs.aber.ac.uk (4.1/aberclient-4.0-cs-1.1) id AA10467; Fri, 2 Dec 94 15:39:15 GMT From: daa93@aber.ac.uk Date: Fri, 2 Dec 1994 15:41:59 +0000 Message-Id: <25114.9412021541@saturn.dcs.aber.ac.uk> X-Mailer: Mail User's Shell (7.2.5 10/14/92) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Command Line error on Sun4 CLISP Content-Length: 941 Hi, I've compiled an old (29/08/93) version of CLISP for use with a commercial toolkit. Everything seemed to be fine (except for lots of warnings :-) until I tried to run the 'lisp.run' command. This generated the following error continuously: *** - UNIX error 35 (EWOULDBLOCK): Operation would block Running using the '-x' option (i.e. ./lisp.run -x '(print 2)') works fine, so I'm assuming this is something to do with the readline library. Has anyone encountered this problem before? I am running on a Sun4 SunOS 4.1.3. Thanks, David Arnold. -- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- David Arnold (daa93@aber.ac.uk) Dept. Computer Science +44 (0)970-622449 University of Wales,Aberystwyth, Dyfed SY23 3DB, UK. http://www.dcs.aber.ac.uk/~daa93 GCS -d+ p c++@ !l e++ m+++(*) s+/- n+ h(-) f !g w- t+@ y? -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -= -=- -=-- -=- -=- From haible Fri Dec 2 17:28:24 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA01469; Fri, 2 Dec 94 17:28:24 +0100 Date: Fri, 2 Dec 94 17:28:24 +0100 From: haible (Bruno Haible) Message-Id: <9412021628.AA01469@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Command Line error on Sun4 CLISP > ... the 'lisp.run' command. This > generated the following error continuously: > *** - UNIX error 35 (EWOULDBLOCK): Operation would block > Has anyone encountered this problem before? Mr Hans Groschwitz reported the same error. In his case it was related to using a pty on standard input/ output, and went away when he linked without the readline library. Can you investigate a bit more the circumstances that lead to the error in your case? Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From daa93@aber.ac.uk Tue Dec 6 17:02:08 1994 Return-Path: Received: from mailsun.aber.ac.uk by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA05940; Tue, 6 Dec 94 17:02:08 +0100 Received: from athene.dcs.aber.ac.uk by mailsun.aber.ac.uk with SMTP (PP); Tue, 6 Dec 1994 16:03:12 +0000 Received: from saturn.dcs.aber.ac.uk by athene.dcs.aber.ac.uk (4.1/aberclient-4.0-cs-1.1) id AA05282; Tue, 6 Dec 94 15:59:58 GMT From: daa93@aber.ac.uk Date: Tue, 6 Dec 1994 16:02:49 +0000 Message-Id: <20143.9412061602@saturn.dcs.aber.ac.uk> In-Reply-To: haible@ma2s2.mathematik.uni-karlsruhe.de (Bruno Haible) "Re: Command Line error on Sun4 CLISP" (Dec 2, 5:33pm) X-Mailer: Mail User's Shell (7.2.5 10/14/92) To: clisp-list Subject: Re: Command Line error on Sun4 CLISP Content-Length: 2533 On Dec 2, 5:33pm, you wrote: > Subject: Re: Command Line error on Sun4 CLISP > > ... the 'lisp.run' command. This > > generated the following error continuously: > > *** - UNIX error 35 (EWOULDBLOCK): Operation would block > > > Has anyone encountered this problem before? > > Mr Hans Groschwitz reported the > same error. In his case it was related to using a pty on standard input/ > output, and went away when he linked without the readline library. > > Can you investigate a bit more the circumstances that lead to the error > in your case? > > > Bruno Haible > haible@ma2s2.mathematik.uni-karlsruhe.de >-- End of excerpt from Bruno Haible O.K. I've run the program through a debugger and the code that generates the error is in the file 'stream.d' lines 931-936: #else # non-blocking I/O ` la SYSV { var reg2 int fcntl_flags; if (( fcntl_flags = fcntl(handle,F_GETFL,0) )<0) { OS_error(); } if ( fcntl(handle,F_SETFL,fcntl_flags|O_NDELAY) <0) { OS_error(); } --> ergebnis = read(handle,&c,1); # Zeichen lesen versuchen if ( fcntl(handle,F_SETFL,fcntl_flags) <0) { OS_error(); } } The 'read' command generates the EWOULDBLOCK error. I think the error must be linked to terminal I/O since the program runs fine when the standard input is a pipe. >From the 'unixconf.h' file the following are defined: /* CL_IOCTL */ /* Define as the type of `request' in ioctl() declaration. */ #define IOCTL_REQUEST_T int /* Define if the declaration of ioctl() needs dots. */ #undef IOCTL_DOTS /* Define if you have the FIONREAD ioctl(). */ #undef HAVE_FIONREAD /* Define if you need for using ioctl's like FIONREAD. */ #undef NEED_SYS_FILIO_H /* Define if you need for using ioctl's like FIONREAD. */ #undef NEED_SYS_IOCTL_H I am slightly confused as to why it is executing NON-BLOCKING code if the system does actually BLOCK but have to confess that my knowledge of UNIX system I/O is extremely limited. I hope this is some help, if you require more information let me know. David Arnold -- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- David Arnold (daa93@aber.ac.uk) Dept. Computer Science +44 (0)970-622449 University of Wales,Aberystwyth, Dyfed SY23 3DB, UK. http://www.dcs.aber.ac.uk/~daa93 GCS -d+ p c++@ !l e++ m+++(*) s+/- n+ h(-) f !g w- t+@ y? -=- -=- -=- -=- -=- -=- -=- -=- -=- -=- -= -=- -=-- -=- -=- From haible Tue Dec 6 19:02:22 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06360; Tue, 6 Dec 94 19:02:22 +0100 Date: Tue, 6 Dec 94 19:02:22 +0100 From: haible (Bruno Haible) Message-Id: <9412061802.AA06360@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, haible@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Command Line error on Sun4 CLISP David Arnold found the reason for the EWOULDBLOCK error: > I've run the program through a debugger and the code that generates > the error is in the file 'stream.d' lines 931-936: > #else # non-blocking I/O ` la SYSV > { var reg2 int fcntl_flags; > if (( fcntl_flags = fcntl(handle,F_GETFL,0) )<0) { OS_error(); } > if ( fcntl(handle,F_SETFL,fcntl_flags|O_NDELAY) <0) { OS_error(); } > --> ergebnis = read(handle,&c,1); # Zeichen lesen versuchen > if ( fcntl(handle,F_SETFL,fcntl_flags) <0) { OS_error(); } > } > The 'read' command generates the EWOULDBLOCK error. Well done, your investigation! A couple of lines below that, the error code is checked: if (errno==EAGAIN) Change this to if ((errno==EAGAIN)||(errno==EWOULDBLOCK)) Thank you. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From thommark@access.digex.net Tue Dec 6 20:14:09 1994 Return-Path: Received: from access1.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06627; Tue, 6 Dec 94 20:14:09 +0100 Received: by access1.digex.net id AA08095 (5.67b8/IDA-1.5 for CLISP List ); Tue, 6 Dec 1994 14:15:41 -0500 Date: Tue, 6 Dec 1994 14:15:41 -0500 (EST) From: "M. Thomas" To: CLISP List Subject: Are nested DEFUN's illegal? Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Watch what happens when I type a nested DEFUN form into the CLISP interpreter (version "1994-10-26 (October 1994)"): > (defun bar (x) (defun foo () (+ x 3))) *** - THE-ENVIRONMENT is impossible in compiled code Does this mean that nested DEFUN forms are illegal? There seems to be no discussion of this in CLtL2, but on page 92, Steele uses the form above as an example. Note 1: Perhaps nested DEFUN forms are considered poor style, but is there a _technical_ reason for disallowing them? (Naturally, I was able to achieve the effect I wanted by creating and passing closures ...) Note 2: I believe the 1994-7-4 version of CLISP didn't complain about nested DEFUN forms. Note 3: The error message refers to 'compiled code'. What code is that? Thanks for satisfying my curiosity. Mark A. Thomas thommark@access.digex.net From thommark@access.digex.net Tue Dec 6 20:38:11 1994 Return-Path: Received: from access1.digex.net by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA06753; Tue, 6 Dec 94 20:38:11 +0100 Received: by access1.digex.net id AA09355 (5.67b8/IDA-1.5 for CLISP List ); Tue, 6 Dec 1994 14:39:46 -0500 Date: Tue, 6 Dec 1994 14:39:46 -0500 (EST) From: "M. Thomas" To: CLISP List Subject: Simultaneous generational GC and error-check immutables? Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I recently compiled CLISP from the latest source (in source-haible directory), under Linux 1.1.54, following the instructions to enable better error-checking of immutables. (I assume I automatically got generational garbage-collection.) But the following sequence of forms gives no error message (return values omitted here): > (defvar temp-string "Matson") > (setf (char temp-string 0) #\W) and now temp-string evals to "Watson". A recent poster to this list inquired why evaluating the (setf ...) produced an error -- my CLISP does _not_ produce the error, hence my question. There seem to be three likely reasons for this behavior: (1) I did something wrong in trying to enable immutable error-checking; (2) I misunderstand what error-checking of immutables really means; (3) Error-checking of immutables and generational GC can't be had at the same time. (This is suggested by the existence of two Linux binaries in the binaries/linux directory ... Hmmmm ...) Thanks for the enlightenment! Mark A. Thomas thommark@access.digex.net From haible Thu Dec 8 16:22:56 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09002; Thu, 8 Dec 94 16:22:56 +0100 Date: Thu, 8 Dec 94 16:22:56 +0100 From: haible (Bruno Haible) Message-Id: <9412081522.AA09002@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, haible@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Are nested DEFUN's illegal? Mark Thomas noticed the following: > > (defun bar (x) > (defun foo () > (+ x 3))) > *** - THE-ENVIRONMENT is impossible in compiled code This is a bug. It will be fixed in the next release. > Note 1: Perhaps nested DEFUN forms are considered poor style, but is > there a _technical_ reason for disallowing them? There is no technical reason for disallowing them. Nested DEFUNs are simply used so rarely that it wasn't noticed before you came. > The error message refers to 'compiled code'. What code is that? When the "defun bar" is evaluated, the macros inside of it are expanded. This is a kind of pre-compilation. The "defun foo" wants to save its form and environment, in order to make it possible to later (ED 'FOO). I put in an error message because this is not possible if BAR were compiled. But - and that's the bug - it is not compilation, but only pre-compilation which happens here. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From haible Thu Dec 8 16:36:55 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA09132; Thu, 8 Dec 94 16:36:55 +0100 Date: Thu, 8 Dec 94 16:36:55 +0100 From: haible (Bruno Haible) Message-Id: <9412081536.AA09132@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, haible@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Simultaneous generational GC and error-check immutables? Mark Thomas tried this: > ... following the instructions to enable > better error-checking of immutables. (I assume I automatically got > generational garbage-collection.) No, you didn't get generational GC; CLISP does not yet support immutable checking and generational GC simultaneously. > But the following sequence of forms gives no error message > > (defvar temp-string "Matson") > > (setf (char temp-string 0) #\W) Immutable checking is only done for immutable objects whose printed represen- tation has been read from a file, using LOAD. I felt it would be annoying, especially for beginners, to get errors when evaluating forms like (nreverse '(a b c)) (nstring-upcase "My Name") interactively. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From Manfred.Weichel@mch.sni.de Fri Dec 9 15:33:12 1994 Return-Path: Received: from thoth.mch.sni.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA10513; Fri, 9 Dec 94 15:33:12 +0100 Received: from athen.mch.sni.de by thoth.mch.sni.de with SMTP id AA24715 (5.67a/IDA-1.5 for ); Fri, 9 Dec 1994 15:34:17 +0100 Received: by athen.mch.sni.de at Fri, 9 Dec 94 15:34:43 +0100 (5.52.1/SIE-1.1) Message-Id: <9412091434.AA02767@athen.mch.sni.de> From: Manfred Weichel Subject: clisp (1994-10-26) and SVR4.0 (SINIX-Z) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Fri, 9 Dec 1994 15:34:40 +0100 (MET) X-Mailer: ELM [version 2.4 PL22] Content-Type: text Content-Length: 2373 Hi, I try to build clisp on a Pentium with SINIX-Z (a SVR4.0 derivative). I read through the PLATFORMS file and tried all given hints for SVR4 systems (-DNO_MULTIMAP_SHM, or -DNO_GENERATIONAL_GC) but nothing helped. In every case I got the following error: ./lisp.run -m 750KW -x "(load \"init.lsp\") (sys::%saveinitmem) (exit)" i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I I I I I I I 8 8 8 8 8 8 I I I I I I I 8 8 8 ooooo 8oooo I \ `+' / I 8 8 8 8 8 \ `-+-' / 8 o 8 8 o 8 8 `-__|__-' ooooo 8oooooo ooo8ooo ooooo 8 | ------+------ Copyright (c) Bruno Haible, Michael Stoll 1992, 1993, 1994 ;; Loading file defseq.lsp ... ;; Loading of file defseq.lsp is finished. ;; Loading file backquot.lsp ... ;; Loading of file backquot.lsp is finished. ;; Loading file defmacro.lsp ... ;; Loading of file defmacro.lsp is finished. ;; Loading file macros1.lsp ... ;; Loading of file macros1.lsp is finished. ;; Loading file macros2.lsp ...make: *** Error code 139 make: Fatal error. gdb lisp.run core 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.13 (i386v4), Copyright 1994 Free Software Foundation, Inc... (no debugging symbols found)... Core was generated by `./lisp.run -m 750KW -x (load "init.lsp") (sys::%saveinitmem) (exit)'. Program terminated with signal 11, Segmentation fault. Cannot access memory at address 0x8003500c. #0 0x804af30 in gar_col_normal () (gdb) bt #0 0x804af30 in gar_col_normal () #1 0x2 in ?? () Cannot access memory at address 0x4000a270. (gdb) Every help is appreciated -- Manfred ------------------------------------------------------------------------------- Manfred Weichel Siemens Nixdorf Informationssysteme SNI SU MR PD122 Mch-P E-Mail: manfred.weichel@mch.sni.de ------------------------------------------------------------------------------- From hoehle@inf-wiss.uni-konstanz.de Fri Dec 16 20:25:46 1994 Return-Path: Received: from inf-wiss.uni-konstanz.de (post.inf-wiss.ivp.uni-konstanz.de) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26191; Fri, 16 Dec 94 20:25:46 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA17159; Fri, 16 Dec 94 20:25:36 +0100 Date: Fri, 16 Dec 94 20:25:36 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9412161925.AA17159@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA02786; Fri, 16 Dec 94 20:25:36 +0100 To: clisp-list@[129.13.115.2] Subject: portability of .fas files is questionable Hi, I agree that having portable .fas files would be a nice thing to have, but what scheme could be used to avoid problems with machine-specific macros that get compiled into one's code? As an example, USER1.LSP:with-keyboard is extremely different between the different machines. We could consider the functions of the CLISP lispinit.mem kernel a black box, but what's about macros? Was the thread about portability only between UNIX version? Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From donc@ISI.EDU Sat Dec 17 00:11:28 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26400; Sat, 17 Dec 94 00:11:28 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-20) id ; Fri, 16 Dec 1994 15:11:07 -0800 Date: Fri, 16 Dec 94 15:11:07 -0800 Posted-Date: Fri, 16 Dec 94 15:11:07 -0800 Message-Id: <9412162311.AA27439@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Fri, 16 Dec 94 15:11:07 -0800 From: donc@ISI.EDU (Don Cohen) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: re: portability of .fas files I had not even realized that there were macros that expanded differently on different platforms. Is this really necessary? How many such macros are there and how hard would it be to encapsulate the differences inside functions instead? I had definitely hoped for .fas files to be shared at least between DOS and UNIX machines. From schrod@iti.informatik.th-darmstadt.de Sat Dec 17 16:14:23 1994 Return-Path: Received: from rs2.hrz.th-darmstadt.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA26624; Sat, 17 Dec 94 16:14:23 +0100 Received: from hp5.iti.informatik.th-darmstadt.de by rs2.hrz.th-darmstadt.de with SMTP id AA36557 (5.65c/IDA-1.4.4 for ); Sat, 17 Dec 1994 16:14:05 +0100 Received: from spock.iti.informatik.th-darmstadt.de by hp5.iti.informatik.th-darmstadt.de (8.6.9/Server-1.5/HRZ-THD/8.6.9u-ITI) id QAA02892; Sat, 17 Dec 1994 16:14:03 +0100 Received: by spock.iti.informatik.th-darmstadt.de (8.6.9/Client-1.5+iti/HRZ-THD) id QAA20616; Sat, 17 Dec 1994 16:14:04 +0100 From: Joachim Schrod Message-Id: <199412171514.QAA20616@spock.iti.informatik.th-darmstadt.de> Subject: Re: portability of .fas files is questionable To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Date: Sat, 17 Dec 1994 16:14:03 +0100 (MEZ) In-Reply-To: <9412161925.AA17159@inf-wiss.uni-konstanz.de> from "Joerg-Cyril Hoehle" at Dec 16, 94 08:27:13 pm X-Mailer: ELM [version 2.4 PL24] Content-Type: text Content-Length: 1777 Joerg Hoehle wrote: > > I agree that having portable .fas files would be a nice thing to have, > but what scheme could be used to avoid problems with machine-specific > macros that get compiled into one's code? As an example, > USER1.LSP:with-keyboard is extremely different between the different > machines. > [...] > Was the thread about portability only between UNIX version? No, not really. As always, `portability' is a term denoting a continuum, not a few (two) discrete points. The question was ``how much portability could we achieve with .FAS files'' with resonable effort and reasonable price (in terms of performance and storage, for instance). When we access the operating system below, in particular, when we do it with forms that are not in any way standardized, we must expect to take a deep look if we can transport the respective source to another platform. That's one region of the continuum above. But another region are programs that use only CLtL2 code and run on a (roughly) POSIX.1 compliant system. (Note, that this term shall include DOS.) As an example, I've written an SGML backend in Lisp, and that backend does not use any system-dependent stuff. So my question was `what are the differences in FAS files for such kind of sources'. Actually, I got the answer, and it satisfied my curiousity. Now I know that I must not distribute FAS files for convenience, but the installation process must compile the Lisp files. It makes packing distributions a bit harder for me; but that is just an annoyance, not a problem. Cheers, Joachim -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Joachim Schrod Email: schrod@iti.informatik.th-darmstadt.de Computer Science Department Technical University of Darmstadt, Germany From jblack@bme.jhu.edu Mon Dec 19 15:43:07 1994 Return-Path: Received: from bme.jhu.edu (eureka-gold.wbme.jhu.edu) by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28346; Mon, 19 Dec 94 15:43:07 +0100 Received: by bme.jhu.edu; Mon, 19 Dec 94 09:42:18 EST Sender: jblack@bme.jhu.edu Date: Mon, 19 Dec 1994 09:42:17 -0500 (EST) From: Jason Black To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Swap file? Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I am getting the error "Cannot create swap file." It happens at inconsistent times, and it dumps me directly into Dos. What does this mean? From haible Mon Dec 19 16:11:33 1994 Return-Path: Received: by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28560; Mon, 19 Dec 94 16:11:33 +0100 Date: Mon, 19 Dec 94 16:11:33 +0100 From: haible (Bruno Haible) Message-Id: <9412191511.AA28560@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de, haible@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: Swap file? Jason Black about an EMX error message: > I am getting the error "Cannot create swap file." Please take a look at the file EMX-USER.DOC. It explains this error message. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de From Pbhogar@vt.edu Mon Dec 19 16:26:35 1994 Return-Path: Received: from vtucs.cc.vt.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA28655; Mon, 19 Dec 94 16:26:35 +0100 Message-Id: <9412191526.AA28655@ma2s2.mathematik.uni-karlsruhe.de> Received: from horus.ento.vt.edu by vtucs.cc.vt.edu with SMTP (1.37.109.8/16.2) id AA28157; Mon, 19 Dec 1994 10:25:41 -0500 Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Mon, 19 Dec 1994 10:26:59 -0500 To: clisp-list From: Pbhogar@vt.edu (Prabhakar Bhogaraju) Subject: Basic stuff Hai, I have just installed CLISP on my PC (once again!). It runs from dos and gives me the usual prompt. What should I do to quit it? If I say 'exit' or 'quit' it gives me an error message and gets to the 'break>' prompt. How should I quit the environment? What's the normal protocol for opening and closing existing files? How do we create a file i.e., how to call the editor and how to quit it? As you might see from the nature of my questions, I am an absolute novice. Any and all help is appreciated. -Prabhakar. From rls@therat.math.waikato.ac.nz Mon Dec 19 20:56:07 1994 Return-Path: Received: from therat.math.waikato.ac.nz by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA29081; Mon, 19 Dec 94 20:56:07 +0100 Received: by therat.math.waikato.ac.nz (Linux Smail3.1.28.1 #1) id m0rJo9j-00006lC; Tue, 20 Dec 94 08:54 NZDT Message-Id: Date: Tue, 20 Dec 94 08:54 NZDT From: rls@therat.math.waikato.ac.nz (Richard Shepherd) To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Cc: clisp-list@ma2s2.mathematik.uni-karlsruhe.de In-Reply-To: <9412191526.AA28655@ma2s2.mathematik.uni-karlsruhe.de> (Pbhogar@vt.edu) Subject: Re: Basic stuff > Date: Mon, 19 Dec 94 16:31:46 +0100 > From: Pbhogar@vt.edu > > gives me the usual prompt. What should I do to quit it? If I say 'exit' or > 'quit' it gives me an error message and gets to the 'break>' prompt. How Assuming you have started it with the initial memory image, lispinit.mem then to quit go: (bye) or (quit) or (exit) or just enough times should also do it. The file opening/closing stuff can be done in a variety of ways and you should really have a LISP book, e.g. Common Lispcraft by R. Wilensky or the official LISP book called Common Lisp, the Language by Guy L. Steele (but that costs an arm and a leg so I reccommend some other way of learning!). Here's a simple one that should get you going: (with-open-file (infile "test" :direction :output) (princ "Hello, this is a test" infile) (terpri infile) (princ "Bye now" infile) (terpri infile) ) The analogue for reading from a file can hopefully be guessed from this one. Note that the file is both opened and closed byu this example which is tidy. Hope that helps, -- Richard Shepherd (rls@therat.math.waikato.ac.nz) From hoehle@inf-wiss.uni-konstanz.de Wed Dec 21 20:18:52 1994 Return-Path: Received: from pan.rz.uni-konstanz.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02016; Wed, 21 Dec 94 20:18:52 +0100 Received: from inf-wiss.uni-konstanz.de (actually post.inf-wiss.ivp.uni-konstanz.de) by pan.rz.uni-konstanz.de with SMTP(PP); Wed, 21 Dec 1994 20:17:33 +0100 Received: from stetten.inf-wiss.ivp.uni-konstanz.de by inf-wiss.uni-konstanz.de (4.1/SMI-4.1) id AA01988; Wed, 21 Dec 94 20:17:31 +0100 Date: Wed, 21 Dec 94 20:17:31 +0100 From: hoehle@inf-wiss.uni-konstanz.de (Joerg-Cyril Hoehle) Message-Id: <9412211917.AA01988@inf-wiss.uni-konstanz.de> Received: by stetten.inf-wiss.ivp.uni-konstanz.de (4.1/SMI-4.1) id AA04604; Wed, 21 Dec 94 20:17:32 +0100 To: clisp-list , donc@ISI.EDU (Don Cohen) Subject: re: portability of .fas files In-Reply-To: <9412162311.AA27439@hpai19.isi.edu> References: <9412162311.AA27439@hpai19.isi.edu> Don Cohen writes: > I had not even realized that there were macros that expanded differently > on different platforms. Is this really necessary? How many such macros Well, IMHO you can't have everything a function that can hide system dependencies. Especially when you need some clean-up forms, macros come in handy (see user1.lsp:with-keyboard). > are there and how hard would it be to encapsulate the differences inside > functions instead? I had definitely hoped for .fas files to be shared Don't know. I Didn't grep all #+/-UNIX/DOS/AMIGA/... features. I would not expect it to be trivial. One could reasonably assume that Common-Lisp code could be portable (see J. Schrod's post on this). Good system design would give you only a few files where specific machine dependencies reside (either within an implementation on different platforms, or for different implementations, e.g. CMU, Allegro and others). They would need site- and user-specific adaption and compilation. > at least between DOS and UNIX machines. Why just these? Because these are the only ones that you are concerned about? I wouldn't want a CLISP were there would be the kind of "full-featured" version and another one for the "poor". Joerg Hoehle. hoehle@inf-wiss.uni-konstanz.de From donc@ISI.EDU Wed Dec 21 21:00:27 1994 Return-Path: Received: from venera.isi.edu by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02138; Wed, 21 Dec 94 21:00:27 +0100 Received: from hpai19.isi.edu by venera.isi.edu (5.65c/5.61+local-20) id ; Wed, 21 Dec 1994 11:59:18 -0800 Date: Wed, 21 Dec 94 11:59:26 -0800 Posted-Date: Wed, 21 Dec 94 11:59:26 -0800 Message-Id: <9412211959.AA12189@hpai19.isi.edu> Received: by hpai19.isi.edu (1.37.109.4/4.0.3-4) id ; Wed, 21 Dec 94 11:59:26 -0800 From: donc@ISI.EDU (Don Cohen) Cc: donc@ISI.EDU, hoehle@inf-wiss.uni-konstanz.de To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: re: portability of .fas files Since you mention with-keyboard as an example, let me suggest an alternative implementation. The original: (defmacro with-keyboard (&body body) #+(or ATARI DOS OS/2) ; *keyboard-input* existiert schon `(LET () (PROGN ,@body)) #+UNIX `(UNWIND-PROTECT (PROGN (SYS::TERMINAL-RAW *TERMINAL-IO* T) ,@body ) (SYS::TERMINAL-RAW *TERMINAL-IO* NIL) ) ) my proposal: (defmacro with-keyboard (&body body) `(do-with-keyboard (function (lambda nil ,@body)))) #+(or ATARI DOS OS/2) (defun do-with-keyboard (fn) (funcall fn)) ; BTW, what was that LET () for? #+UNIX (defun do-with-keyboard (fn) (UNWIND-PROTECT (PROGN (SYS::TERMINAL-RAW *TERMINAL-IO* T) (funcall fn)) (SYS::TERMINAL-RAW *TERMINAL-IO* NIL))) The result is that the macro expands the same way on all machines. The difference is hidden inside a function that differs from one machine to the next. Thus the compiled code that uses the macro (as opposed to the compiled code that defines it, which is another matter) is machine independent. > at least between DOS and UNIX machines. Why just these? They're the ones that I actually use. The point was really that I did NOT only want compatibility between unix machines. (This was in response to an earlier message.) Notice that my proposal was meant to obtain compatibility among ALL machines. From haible Wed Dec 21 21:21:01 1994 Return-Path: Received: from ma2s3.mathematik.uni-karlsruhe.de by ma2s2.mathematik.uni-karlsruhe.de (4.1/SMI-4.0) id AA02226; Wed, 21 Dec 94 21:21:01 +0100 Date: Wed, 21 Dec 94 21:21:01 +0100 From: haible (Bruno Haible) Message-Id: <9412212021.AA02226@ma2s2.mathematik.uni-karlsruhe.de> To: clisp-list@ma2s2.mathematik.uni-karlsruhe.de Subject: Re: what was that LET () for? Don Cohen found the following piece of code in CLISP (defmacro with-keyboard (&body body) `(LET () (PROGN ,@body)) ) and asked: BTW, what was that LET () for? This matters only if a (WITH-KEYBOARD ...) form occurs as a top-level form in a file (which, I admit, is not likely for this particular macro). If it expanded to PROGN only, the body forms would be compiled separately by COMPILE-FILE. Since CLISP's compiler doesn't preserve EQ-ness of objects across top-level forms, this would be noticeable: (WITH-KEYBOARD (setq x #1="foo") (setq y #1#) (print (eq x y))) would print T when loaded from a .lsp file and NIL when loaded from a .fas file. The LET () inhibits splitting the body forms and thereby avoids this difference between interpreted and compiled code. Bruno Haible haible@ma2s2.mathematik.uni-karlsruhe.de