- ecl-devel - mailman3.common-lisp.net

Crosscompiling ECL for Windows
by Wolfgang Dautermann 17 Nov '16

17 Nov '16

Dear ECL-developers, Can one crosscompile ECL for Windows (on a Linux based system)? Currently it fails - both the latest release and the current GIT - with: $ ./configure --host=i686-w64-mingw32 $ make [...] i686-w64-mingw32-gcc -DECLDIR="\"/usr/local/lib/ecl-16.1.2\"" -I. -I/tmp/ecl/build -I/tmp/ecl/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -g -O2 -D_THREAD_SAFE -Dmingw32 -c -o threads/process.o threads/process.o.c /tmp/ecl/src/c/threads/process.d:40:22: error: conflicting types for 'GC_CreateThread' extern HANDLE WINAPI GC_CreateThread( ^ In file included from /tmp/ecl/build/ecl/config.h:84:0, from /tmp/ecl/build/ecl/ecl.h:37, from /tmp/ecl/src/c/threads/process.d:20: /tmp/ecl/build/ecl/gc/gc.h:1536:26: note: previous declaration of 'GC_CreateThread' was here GC_API HANDLE WINAPI GC_CreateThread( ^ /tmp/ecl/src/c/threads/process.d: In function 'mp_exit_process': /tmp/ecl/src/c/threads/process.d:604:1: warning: 'noreturn' function does return Makefile:85: recipe for target 'threads/process.o' failed make[2]: *** [threads/process.o] Error 1 make[2]: Leaving directory '/tmp/ecl/build/c' Makefile:120: recipe for target 'libeclmin.a' failed make[1]: *** [libeclmin.a] Error 2 make[1]: Leaving directory '/tmp/ecl/build' Makefile:70: recipe for target 'all' failed make: *** [all] Error 2 What is the problem here? (Background: I developed a crosscompiled Windows installer for the (Lisp based) computer algebra system 'Maxima' (using 'Wine' (does ECL work with the emulator 'wine'?)), currently based on CLISP and SBCL - and probably I can support ECL too - but for that I should be able to crosscompile it. Best regards, Wolfgang

2 12

[quarterly volume 5]
by Daniel Kochmański 10 Nov '16

10 Nov '16

Dear All, New ECL Quarterly issue has been published today. I hope to make it more regular, sorry for the delay. https://common-lisp.net/project/ecl/posts/ECL-Quarterly-Volume-V.html I have also some latency with the next release, but I hope to finish it before a new year. Best regards, Daniel -- Daniel Kochmański ;; aka jackdaniel | Przemyśl, Poland TurtleWare - Daniel Kochmański | www.turtleware.eu "Be the change that you wish to see in the world." - Mahatma Gandhi

2 1

10th European Lisp Symposium, April 3-4 2017, Brussels, Belgium
by Didier Verna 07 Nov '16

07 Nov '16

ELS'17 - 10th European Lisp Symposium VUB - Vrije Universiteit Brussel Belgium April 3-4, 2017 In co-location with <Programming> 2017 http://www.european-lisp-symposium.org/ The purpose of the European Lisp Symposium is to provide a forum for the discussion and dissemination of all aspects of design, implementation and application of any of the Lisp and Lisp-inspired dialects, including Common Lisp, Scheme, Emacs Lisp, AutoLisp, ISLISP, Dylan, Clojure, ACL2, ECMAScript, Racket, SKILL, Hop and so on. We encourage everyone interested in Lisp to participate. The 10th European Lisp Symposium invites high quality papers about novel research results, insights and lessons learned from practical applications and educational perspectives. We also encourage submissions about known ideas as long as they are presented in a new setting and/or in a highly elegant way. Topics include but are not limited to: - Context-, aspect-, domain-oriented and generative programming - Macro-, reflective-, meta- and/or rule-based development approaches - Language design and implementation - Language integration, inter-operation and deployment - Development methodologies, support and environments - Educational approaches and perspectives - Experience reports and case studies We invite submissions in the following forms: Papers: Technical papers of up to 8 pages that describe original results or explain known ideas in new and elegant ways. Demonstrations: Abstracts of up to 2 pages for demonstrations of tools, libraries, and applications. Tutorials: Abstracts of up to 4 pages for in-depth presentations about topics of special interest for at least 90 minutes and up to 180 minutes. The symposium will also provide slots for lightning talks, to be registered on-site every day. All submissions should be formatted following the ACM SIGS guidelines and include ACM classification categories and terms. For more information on the submission guidelines and the ACM keywords, see: http://www.acm.org/sigs/publications/proceedings-templates and http://www.acm.org/about/class/1998. The conference proceedings will be published in the ACM Digital Library. Important dates: - 30 Jan 2017 Submission deadline - 27 Feb 2017 Notification of acceptance - 20 Mar 2017 Final papers due - 03-04 Apr 2017 Symposium Programme chair: Alberto Riva, University of Florida, USA Programme committee: tba Search Keywords: #els2017, ELS 2017, ELS '17, European Lisp Symposium 2017, European Lisp Symposium '17, 10th ELS, 10th European Lisp Symposium, European Lisp Conference 2017, European Lisp Conference '17 -- Resistance is futile. You will be jazzimilated. Lisp, Jazz, Aïkido: http://www.didierverna.info

1 0

ECL build and SHELL variable.
by Tigran Aivazian 27 Sep '16

27 Sep '16

Dear Yasuaki, I have some good news --- I have successfully compiled ECL 16.1.2 under Termux environment and then successfully compiled MAxima 5.38.1 based on it. This is Android 5.1.1 running on Nexus 10 tablet, i.e. armv7l architecture. I intend to also compile it on Android 6.0.1 on aarch64 architecture. I had to make a few changes to ECL which I will have to submit to the maintainer at some point. Now, everything (except the bits you noticed, like fib() etc which are worked around in your init.lisp file) works fine except the system() function (and invoking gnuplot which uses the same mechanism). I used strace to track it down to the fact that even though Maxima was compiled with "--posix-shell=/data/data/com.termux/files/usr/bin/bash", still the plot2d() command causes execve() with hardcoded path "/bin/sh". I have made sure that there are NO hardcoded instances of "/bin/sh" left in Maxima, BUT it still happens. This means it is coming from ECL and I see hardcoded "/bin/sh" here: $ strings /usr/local/lib/ecl-16.1.2/defsystem.fas | fgrep --color "/bin/sh" So I suspect it is coming from defsystem.fas. Now, you must have faced the same issue when you compiled ECL 12.12.1 for use by Maxima 5.36.1 on Android. But your sources on github don't contain any patches to ECL, so I am writing to you to ask how you overcame this issue (because running your maxima.pie binary in Termux works fine, but I wanted to have Maxima 5.38.1 and so I had to recompile everything from sources). I will dig into ECL sources today trying to find this hardcoded "/bin/sh" (it should really rely on the value of SHELL variable) but if you know the answer it would save my time greatly. Thank you. Kind regards, Tigran

1 1

Problems compiling ECL for Termux on Android.
by Tigran Aivazian 26 Sep '16

26 Sep '16

Hello, I am trying to compile ECL 16.1.2 under Android 6.0.1 in Termux environment (this has almost nothing to do with compiling for Android target --- just think of Termux as a GNU Linux implementation running on Android kernel). Termux is an Android application which provides GNU Linux environment, see here http://termux.com (After installing Termux do "apt update && apt upgrade -y" and also install a myriad of applications to turn it into proper Linux development workstation, e.g. I always install the following (plus a plethora of python modules but they are irrelevant for this discussion): apt install autoconf automake bc binutils-dev bison bzip2 cboard clang-dev cmake coreutils ctags curl cvs diffutils dnsutils dos2unix dpkg-dev ecj elfutils-dev \ elinks expect-dev fftw-dev ffmpeg-dev file-dev findutils flac flex-dev freetype-dev gawk-dev gcal gdb-dev git glib-dev glib-bin gnuchess gnuplot grep gzip htop iconv imagemagick-dev \ lftp libandroid-glob-dev openssh libtool-dev libpng libpng-dev libtiff libtiff-dev libtiff-utils ltrace strace mc man-dev make-dev \ lua-dev luarocks mlocate ncurses-dev ncurses-utils nmap patch p7zip php-dev pkg-config mpv procps python-dev qalc rsync sed tar taskwarrior tcl-dev termux-api \ tesseract-dev tmate tracepath tree units unzip unrar vim wget zip linux-man-pages but a smaller subset should be sufficient, e.g. surely one doesn't need gnuchess/cboard to compile ECL :) So, in order to configure ECL 16.1.2 I did the following after unpacking the sources: 1. $ export CONFIG_SHELL = $SHELL 2. Fix all configure and config.guess scripts to not use #!/bin/sh because under Termux the shell is $PREFIX/bin/bash (and /bin is not accessible): $ find -name 'configure' -exec termux-fix-shebang {} \; $ find -name 'config.guess' -exec termux-fix-shebang {} \; 3. $ ./configure --prefix=$PREFIX/local This succeeds. And so I go on to 4. $ make (this fails but due to a trivial thing --- some Makefiles contain hardcoded "/bin/sh" references --- so I fix all these to refer to the proper location of bash in Termux) 5. Re-run make after all these changes and it fails here: $ make cd build; make make[1]: Entering directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build' if (echo c gc libffi atomic | grep gmp); then \ cd gmp && make install && \ cd .. && mv include/gmp.h ecl/ && rmdir include && \ mv ./libgmp.a ./libeclgmp.a; \ fi test -d ecl/gc || mkdir ecl/gc test -d ecl/gc/private || mkdir ecl/gc/private if (echo c gc libffi atomic | grep gc); then \ cd gc && make install && cd .. && \ cp -rf /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/include/private/*.h ecl/gc/private/ && \ mv libgc.a libeclgc.a; \ fi c gc libffi atomic make[2]: Entering directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/gc' make[3]: Entering directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/gc' depbase=`echo dyn_load.lo | sed 's|[^/]*$|.deps/&|;s|\.lo$||'`;\ /data/data/com.termux/files/usr/bin/bash ./libtool --tag=CC --mode=compile gcc -fPIC -DHAVE_CONFIG_H -I./include -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/include -I./libatomic_ops/src -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/libatomic_ops/src -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/ecl -fexceptions -Wall -Wextra -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -fno-strict-aliasing -MT dyn_load.lo -MD -MP -MF $depbase.Tpo -c -o dyn_load.lo /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/dyn_load.c &&\ mv -f $depbase.Tpo $depbase.Plo libtool: compile: gcc -fPIC -DHAVE_CONFIG_H -I./include -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/include -I./libatomic_ops/src -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/libatomic_ops/src -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/ecl -fexceptions -Wall -Wextra -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -fno-strict-aliasing -MT dyn_load.lo -MD -MP -MF .deps/dyn_load.Tpo -c /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/dyn_load.c -o dyn_load.o /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/dyn_load.c:116:14: error: redefinition of 'link_map' struct link_map { ^ /data/data/com.termux/files/usr/include/link.h:57:8: note: previous definition is here struct link_map { ^ /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/bdwgc/dyn_load.c:123:14: error: redefinition of 'r_debug' struct r_debug { ^ /data/data/com.termux/files/usr/include/link.h:66:8: note: previous definition is here struct r_debug { ^ 2 errors generated. make[3]: *** [Makefile:1527: dyn_load.lo] Error 1 make[3]: Leaving directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/gc' make[2]: *** [Makefile:1710: install-recursive] Error 1 make[2]: Leaving directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build/gc' make[1]: *** [Makefile:123: libeclgc.a] Error 2 make[1]: Leaving directory '/data/data/com.termux/files/home/Maxima/ecl-16.1.2/build' make: *** [Makefile:70: all] Error 2 So, then I check that those two definitions (link_map and r_debug) in dyn_load.c are compatible with the system ones in link.h and comment them out. Then I restart make and it goes on successfully for quite a while until failing here: libtool: compile: gcc -fPIC -DHAVE_CONFIG_H -I. -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi -I. -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/include -Iinclude -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/src -I. -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/include -Iinclude -I/data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/src -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -MT src/arm/sysv.lo -MD -MP -MF src/arm/.deps/sysv.Tpo -c /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/src/arm/sysv.S -o src/arm/sysv.o /data/data/com.termux/files/home/Maxima/ecl-16.1.2/src/libffi/src/arm/sysv.S:399:2: error: invalid instruction stmeqia r2, {r0, r1} And this is where I get stuck because I don't know ARM instruction set. I am a Linux kernel developer (or was, many years ago) and know C and a bit of asm for x86 architecture, but not ARM. Any ideas? Btw, the reason I am trying to compile ECL for Termux is because the next step would be to compile Maxima. I know that there is already Maxima for Android but it is a GUI version and so not very convenient for the real work. Real scientific work with Maxima can only be done in a text-based terminal version (and plotting is irrelevant as it is much more convenient to be done with python's matplotlib anyway which works perfectly under Termux). Kind regards, Tigran

1 0

Ecl fails to compile under visual studio enterprise 2015
by lucaregini＠yahoo.it 01 Sep '16

01 Sep '16

Hi All,I have attempted unsuccesfully to compile Ecl under VS 2015 enterprise.I have simply run the nmake command from a VS2015 x86 command prompt with the makefile left untouched.This is what I am getting: ../ecl/ecl.h(33): warning C4005: 'va_copy': macro redefinition../ecl/config.h(450): warning C4005: 'isnan': macro redefinition ../../src/c/file.d(5324): error C2039: '_cnt': is not a member of '_iobuf' Any clue?Regards,Luca

3 2

Problems with quicklisp under windows
by lucaregini＠yahoo.it 01 Sep '16

01 Sep '16

I have downloaded and installed the prebuild version of ECL 16.1.2 for windows. The installation folder has been set to C:\ecl. When I try to run (require 'ecl-quicklisp) I am getting the following errors: > (require 'ecl-quicklisp) ;;; Loading #P"C:/ECL/ecl-quicklisp.fas" Condition of type: SIMPLE-ERROR LOAD: Could not load file #P"C:/ECL/ecl_quicklisp.fas" (Error: "The operation completed successfully. ") Regards,L

2 1

quicklisp without gcc
by Peter Münster 16 Aug '16

16 Aug '16

Hello, I would like to use quicklisp on a mips target without gcc. Thanks to the howto¹ by Attila Lendvai, I've installed ecl successfully on the target (an Asus router), but installing quicklisp fails: --8<---------------cut here---------------start------------->8--- ; Fetching #<url "http://beta.quicklisp.org/asdf/2.26/asdf.lisp"> ; 194.07KB ================================================== 198,729 bytes in 0.19 seconds (1016.08KB/sec) Condition of type: FILE-ERROR Filesystem error with pathname #P"SYS:CMP.NEWEST". Either 1) the file does not exist, or 2) we are not allowed to access the file, or 3) the pathname points to a broken symbolic link. Available restarts: 1. (RESTART-TOPLEVEL) Go back to Top-Level REPL. Broken at QL-SETUP::ASDF-FASL-PATHNAME. In: #<process TOP-LEVEL>. File: #P"/home/peter/quicklisp/setup.lisp" (Position #0) --8<---------------cut here---------------end--------------->8--- How could this problem be solved please? TIA for any hints, -- Peter ¹ https://www.mail-archive.com/ecl-devel@common-lisp.net/msg00033.html

2 9

Sleeping process not reported as sleeping
by Elias Pipping 03 Aug '16

03 Aug '16

Dear list, I’m trying to find out how different lisp compilers handle external processes(*). As a part of that, I’ve created a short piece of code that launches an external process, sends it SIGSTOP, asks its about its well-being, and allows its to go about its business again by sending SIGCONT. I would expect that ext:external-process-status consequently reports (1) :running before SIGSTOP is sent (2) then :stopped (3) then :running again once SIGCONT was received (4) and finally :exited. Indeed, that is what `ps` would do if you ran it on the command line (so I’ve added that to the example for comparison). Here’s the output of my script: external status: [S] (expected: [S]) internal status: RUNNING (expected: running) external status: [T] (expected: [T]) internal status: RUNNING (expected: stopped) external status: [S] (expected: [S]) internal status: RUNNING (expected: running) external status: [ ] (expected: [] or [Z]) internal status: EXITED (expected: exited) My expectations aren’t met in (2) and (3): Even though according to https://common-lisp.net/project/ecl/manual/rn01re63.html the status of a process can be :stopped, and the process is clearly stopped, it is not reported as such. So I’d like to ask: Is this a bug or intentional? Elias Pipping (*) I’ve already sent very similar messages to openmcl-devel and sbcl-devel. PS: Here’s the script that I used (the aforementioned messages used an earlier version): ;; careful with cmucl. it doesn't actually sleep when external processes ;; are around https://gitlab.common-lisp.net/cmucl/cmucl/issues/26 #+clozure (use-package :ccl) #+sbcl (use-package :sb-ext) #+cmu (use-package :ext) #+clozure (setf (fdefinition 'process-output) #'external-process-output-stream) #+ecl (setf (fdefinition 'process-output) #'ext:external-process-output) #+ecl (setf (fdefinition 'run-program) #'(lambda (&rest rest) (nth-value 2 (apply #'ext:run-program rest)))) (defconstant +sigstop+ #+clozure (symbol-value (read-from-string "#$SIGSTOP")) #+cmu (unix:unix-signal-number :sigstop) #+ecl ext:+sigstop+ #+sbcl (progn (require :sb-posix) (symbol-value (find-symbol (symbol-name :sigstop) (find-package :sb-posix))))) (defconstant +sigtstp+ #+clozure (symbol-value (read-from-string "#$SIGTSTP")) #+cmu (unix:unix-signal-number :sigtstp) #+ecl ext:+sigtstp+ #+sbcl (progn (require :sb-posix) (symbol-value (find-symbol (symbol-name :sigtstp) (find-package :sb-posix))))) (defconstant +sigcont+ #+clozure (symbol-value (read-from-string "#$SIGCONT")) #+cmu (unix:unix-signal-number :sigcont) #+ecl ext:+sigcont+ #+sbcl (progn (require :sb-posix) (symbol-value (find-symbol (symbol-name :sigcont) (find-package :sb-posix))))) (defun internal-status (process) #+clozure (external-process-status process) #+(or sbcl cmu) (process-status process) #+ecl (ext:external-process-status process)) (defun external-kill (pid signal) (run-program "/usr/bin/env" (list "kill" (format nil "-~a" signal) (format nil "~a" pid)))) ;; ecl does not support writing to a string stream (defun external-status (pid) (let* ((arg-list (list "ps" "-h" "-p" (format nil "~a" pid) "-o" "state")) (process (run-program "/usr/bin/env" arg-list :output :stream)) (output (process-output process)) ; we expect a single letter (target (make-string 1))) (read-sequence target output) target)) (defun get-pid (process) #+clozure (ccl::external-process-pid process) #+ecl (ext:external-process-pid process) #+(or sbcl cmu) (process-pid process)) (let* ((p (run-program "/usr/bin/env" '("sleep" "3") :wait nil)) (pid (get-pid p))) (format t "external status: [~a] (expected: [S])~%" (external-status pid)) (format t "internal status: ~a (expected: running)~%" (internal-status p)) (external-kill pid +sigstop+) (sleep 1) (format t "external status: [~a] (expected: [T])~%" (external-status pid)) (format t "internal status: ~a (expected: stopped)~%" (internal-status p)) (external-kill pid +sigcont+) (sleep 1) (format t "external status: [~a] (expected: [S])~%" (external-status pid)) (format t "internal status: ~a (expected: running)~%" (internal-status p)) (sleep 3) (format t "external status: [~a] (expected: [] or [Z])~%" (external-status pid)) (format t "internal status: ~a (expected: exited)~%" (internal-status p)))

1 0

Printing a custom representation of hash table at the repl
by Diogo Franco 08 Jul '16

08 Jul '16

Hello, ecl does not specialize the print-object method on hash-tables: > (find-method #'print-object '() '(hash-table t)) > Debugger received error of type: SIMPLE-ERROR > There is no method on the generic function PRINT-OBJECT that agrees on > qualifiers NIL and specializers (HASH-TABLE T) After reading the hyperspec carefully, I think this is ok, it only requires it on standard-object and structure-object. However, i still thought that specializing on hash-table would work, but it doesn't: >> (defmethod print-object ((obj hash-table) stream) (princ "its working" > stream)) > #<standard-method PRINT-OBJECT (#<The BUILT-IN-CLASS HASH-TABLE> #<The > BUILT-IN-CLASS T>)> > >> (make-hash-table) > #<hash-table 000000000493ee40> Shouldn't we still dispatch the call to this method? And if not, what's the best way in ecl to customize the printable representation of a hash-table? I've tried: > > (set-pprint-dispatch 'hash-table (lambda (s obj) (princ "its working" > s))) > NIL > > (make-hash-table) > its working But this sometimes gives an error: > Debugger received error of type: SIMPLE-ERROR > Tried to modified a read-only pprint dispatch table: > #<pprint-dispatch-table 0000000003375210> > Error flushed. Thanks!

3 2