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

Native thread
by Fabrizio Fabbri 31 Mar '16

31 Mar '16

Hi all, quick question. I’ve got my embedded ecl on a multi thread windows service. Before doing anything I call cl_boot. Then multiple request coming in served by different thread. At this point I call ecl_import_current_thread and the evaluate some lisp code with cl_safe_eval with Cnil as environment. After I call ecl_release_current_thread. Please note that those are native thread not created with gc wrapper. Are those evaluation happen in different lisp processes? Kindest regards F.

1 0

ECL on very small chips?
by Andreas Thiele 29 Mar '16

29 Mar '16

Hello, can I use ECL to write software for a chip without OS? In my case I'd like to write software for NXP1769 which is ARM Cortex M3, 64kB Ram, 512kB Flash. Andreas

7 11

ASDF 3.1.7 has been released
by Robert P. Goldman 23 Mar '16

23 Mar '16

ASDF 3.1.7 is a bugfix release, enhancing the 3.1.x ASDF series. To the best of our knowledge, it only fixes bugs, and should thus be a low-risk upgrade for inclusion in implementations. Thanks, as ever, to Faré for many fixes, and to other bug reporters and patch-suppliers. See the Changelog (below) for a summary of changes. Bug fix and portability release: * Fix compilation on Genera. * Fix UIOP:FILE-EXISTS-P for dotfiles on CCL. * Fix infinite loop in source registry configuration that can occur when there are cycles in the filesystem (typically caused by symlinks) on some CL implementations. * Miscellaneous bug fixes. * Documentation improvements. * Restore original Makefile. -- Robert P. Goldman <rpgoldman(a)sift.net> Wed, 23 Mar 2016 09:34:14 -0500

1 0

Re: [Maxima-discuss] testsuite in ecl
by Dan Gildea 16 Mar '16

16 Mar '16

Is this a bug in ecl? % cat test.lisp (defvar v1 nil) (defun run-test () (let ((share_t) (fst 'a)) (format t "fst ~S~%" fst) (multiple-value-bind (v1 fst) (case share_t ((nil) (values v1 fst))) (format t "fst ~S~%" fst)))) % ecl ECL (Embeddable Common-Lisp) 16.1.2 (git:UNKNOWN) Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya Copyright (C) 1993 Giuseppe Attardi Copyright (C) 2000 Juan J. Garcia-Ripoll Copyright (C) 2015 Daniel Kochmanski ECL is free software, and you are welcome to redistribute it under certain conditions; see file 'Copyright' for details. Type :h for Help. Top level in: #<process TOP-LEVEL>. > (compile-file "test.lisp") ;;; Loading #P"/u/gildea/lib/ecl-16.1.2/cmp.fas" ;;; ;;; Compiling test.lisp. ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; Compiling (DEFVAR V1 ...). ;;; Compiling (DEFUN RUN-TEST ...). ;;; End of Pass 1. ;;; Emitting code for RUN-TEST. ;;; Finished compiling test.lisp. ;;; #P"/tmp/test.fas" NIL NIL > (load "test.fas") ;;; Loading "/tmp/test.fas" #P"/tmp/test.fas" > (run-test) fst A fst NIL NIL > (run-test) fst A fst A NIL > On Tue, March 15, 2016 at 12:15AM, Robert Dodier wrote: > On 2016-03-14, Dan Gildea <dgildea(a)users.sourceforge.net> wrote: > > > The testsuite is not working at all for me with ecl. > > It seems to be a problem with the multiple-value-bind in run-testsuite. > > When I try run_testsuite(), every test fails with "Caused an error > break". > > After load(mload), then run_testsuite() works OK. This makes me think > it's a difference between compiled and interpreted code -- i.e. a bug in > ECL's compiler. > > I'm working with ECL 16.1.2 at the moment. At some point in the > not-too-distant past, run_testsuite() did work. I don't know if the > current behavior is a result of a change in ECL or in Maxima. > I guess that MULTIPLE-VALUE-BIND is a recent change in src/mload.lisp so > maybe it is now tickling a bug that existed before. Dunno for sure. > > best > > Robert Dodier

2 1

Re: Some thread/GC questions
by Juraj Variny 10 Mar '16

10 Mar '16

> > > On Wednesday 09 March 2016 09:07:38 you wrote: > >> Hello, > >> > >> Juraj Variny writes: > >> > Hello, > >> > > >> > can you please tell me how to: > >> > > >> > 1. Initialize lisp environment in a thread that was already created by > >> > C/C++ app? Is it possible for it to share existing lisp environment? > >> > >> There is an example in examples/embed directory (file hello.c). What do > >> you mean by sharing an existing lisp environment? cl_boot creates an > >> environment for this instance. > > > > Say I have main thread, where cl_boot was called, with some lisp > environment. > > Then I call cl_boot in some other pre-existing thread, would it be able > to > > access lisp environment of the main thread, evaluate symbols defined > there, > > call functions etc? This is what I meant with shared environment. > > It is enought to call cl_boot once. Calling it a second time won't do > any harm, but the cl_boot isn't thread-safe, so don't call it twice at > the same time from different threads. > > After calling cl_boot once you should be able to work with lisp from any > thread. This "working with lisp from any thread" I have tried, and got segfaults and corruption immediately. Seems that ecl_env_ptr is thread-local variable and should be properly initialized for every thread where lisp is used.

2 1

EclAndroid-0.0.1 on Android 6.0 ?
by Helmut Jarausch 09 Mar '16

09 Mar '16

Has anybody tried EclAndroid-0.0.1 on Android 6.0 ? Here on my Galaxy S5 with rooted Android 6.01 it crashes during start up. Many thanks for some info, Helmut

2 1

Some thread/GC questions
by Juraj Variny 09 Mar '16

09 Mar '16

Hello, can you please tell me how to: 1. Initialize lisp environment in a thread that was already created by C/C++ app? Is it possible for it to share existing lisp environment? 2. Is accessing and modification of the shared lisp environment from a new thread made by (mp:process-run-function) threadsafe? For example I am running swank this way, is this a safe practice? 3. In the environment where only ECL is garbage collected: Calling ecl_base_string_pointer_safe(si_copy_to_simple_base_string(obj)) means that resulting C string will be eventually garbage collected? 4. Likewise (ffi:c-inline () () :cstring "...") returns the value via ecl_cstring_to_base_string_or_nil() which causes trouble when C side deallocates it, I presume? Regards, Juraj

2 3

ecl-16.1.2: new maxima testsuite failure
by Andrey G. Grozin 02 Mar '16

02 Mar '16

maxima-5.37.3 built with ecl-16.0.0 runs its testsuite without unexpected errors. When buils with ecl-16.1.2, it fails in Running tests in rtest8: ********************** Problem 104 *************** Input: ev(e5, au = 0, omega = 2) Result: - u quad_qawf(%e , u, 0, 2, sin, epsabs = 1.0e-10, limit = 32, maxp1 = 100, limlst = 10) This differed from the expected result: [0.4000000000000001, 2.216570948815925e-11, 175, 0] 162/163 tests passed Andrey

3 9

compiling ecl android on MacOSX
by Pascal J. Bourguignon 01 Mar '16

01 Mar '16

Hello, We cannot compile ecl for android on MacOSX, because *nm* is used by gmp configure instead of $PLATFORM_PREFIX/bin/arm-linux-androideabi-nm With NM=$PLATFORM_PREFIX/bin/arm-linux-androideabi-nm in ecl/src/configure:5630, it passes: checking how to define a 32-bit word... .long but I'm not sure it's correct to hard wire this NM in ecl/src/configure; isn't it generated from autoconf? Well, configure passes, but then: ;;; Invoking external command: ;;; arm-linux-androideabi-gcc -I. -I/Users/pjb/src/android/ecl/build/ -DECL_API -I/Users/pjb/src/android/ecl/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -DANDROID -DPLATFORM_ANDROID -DUSE_GET_STACKBASE_FOR_MAIN -DIGNORE_DYNAMIC_LOADING -DAO_REQUIRE_CAS -g -O2 -fPIC -D_THREAD_SAFE -Dandroid -I/Users/pjb/src/android/ecl/src/c -c lsp/predlib.c -o lsp/predlib.o In file included from ./ecl/ecl.h:82:0, from ./ecl/ecl-cmp.h:29, from lsp/predlib.c:3: lsp/predlib.c: In function 'si_long_float_p': lsp/predlib.c:1067:42: error: 't_longfloat' undeclared (first use in this function) value0 = ecl_make_bool(type_of(v1x) == t_longfloat); ^ ./ecl/object.h:126:28: note: in definition of macro 'ecl_make_bool' #define ecl_make_bool(x) ((x)? ECL_T : ECL_NIL) ^ lsp/predlib.c:1067:42: note: each undeclared identifier is reported only once for each function it appears in value0 = ecl_make_bool(type_of(v1x) == t_longfloat); ^ ./ecl/object.h:126:28: note: in definition of macro 'ecl_make_bool' #define ecl_make_bool(x) ((x)? ECL_T : ECL_NIL) ^ lsp/predlib.c: In function 'cl_coerce': lsp/predlib.c:2194:14: warning: assignment makes pointer from integer without a cast [enabled by default] value0 = ecl_make_long_float(ecl_to_long_double(v12c__value)); ^ It seems :long-float is put on *feature* when it should not. It should also be noted that Android is transitionning to 64-bit too, (and iOS already only accepts applications in the AppStore only if they include 64-bit binaries). https://source.android.com/source/64-bit-builds.html -- __Pascal J. Bourguignon__ http://www.informatimago.com/

2 3