Custom Query (1030 matches)

I have the following error:

? (rem (expt 2 43112609) 1000000000000000)
> Error: DIVISION-BY-ZERO detected
> While executing: CCL::%FLOOR-99, in process listener(1).

and

? (rem (expt 2 43112609) 400000000000000500)
> Error: DIVISION-BY-ZERO detected
> While executing: CCL::%FLOOR-99, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > (rem (expt 2 43112609) 400000000000000500)
exception in foreign context
Exception occurred while executing foreign code
 at mark_root + 45
? for help
[31584] OpenMCL kernel debugger: b
current thread: tcr = 0xb7c57aa0, native thread ID = 0x7b60, interrupts enabled


Bogus  frame b7af2950
[31584] OpenMCL kernel debugger: l
%ebx (arg_z) = -302950275
%esi (arg_y) = #<header ? #x0805F7E7>
------
%edi (fn) = -1776
------
zsh: segmentation fault  ./lx86cl

I have the same environment as in the ticket:338

with-readtable-iterator is a macro proposed as a de-facto standard extension to Common Lisp by Tobias Rittweiler. It is currently implemented in the with-readtable-iterator branch of Git repository git://repo.or.cz/sbcl/tcr.git (​gitweb).

The macro allows efficient iteration over the reader macros provided in a particular readtable, more than can be provided with ANSI-standard functionality, especially given very large values of char-code-limit. Tobias's named-readtable (​Darcs) for SBCL and Clozure CL, which implements Allegro-like named readtables, uses with-readtable-iterator to merge macros provided by multiple readtables into a single readtable.

Attached is a patch made against r10880 that implements this macro and exports it from CCL. The `with-readtable-iterator' macro body itself is borrowed from Tobias's SBCL implementation.

CCL from trunk crashes on linux-x8632 (2.6.24 kernel, glibc-2.7, Pentim 4 prescott CPU). Here is backtrace:

(#xB7E3CF94) #x1402AD9D : #<Function (:INTERNAL REVIVE-SHARED-LIBRARIES) #x1402AD36> + 103
(#xB7E3CFB0) #x140283FD : #<Function %WALK-SHARED-LIBRARIES #x1402835E> + 159
(#xB7E3CFC4) #x1402A9CD : #<Function REVIVE-SHARED-LIBRARIES #x1402A81E> + 431
(#xB7E3CFE0) #x1402B725 : #<Function REFRESH-EXTERNAL-ENTRYPOINTS #x1402B61E> + 263
(#xB7E3CFE8) #x1480A5ED : #<Function RESTORE-LISP-POINTERS #x1480A5A6> + 71

Registers:

%eax = 0x00000000
%ecx = 0x00000000
%edx = 0x1490F83E
%ebx = 0xFFFF84B0
%esp = 0xB7DE0F78
%ebp = 0xB7DE0F94
%esi = 0xFFFF84B0
%edi = 0x14026E96
%eip = 0x1402737C

%ebx (arg_z) = -7892
%esi (arg_y) = -7892
------
%edi (fn) = #<Function SONAME-PTR-FROM-LINK-MAP #x14026E96>
------
%ecx (temp0) = 0
%edx (temp1) = #<MACPTR #xB7FC8940>