Karsten Poeck

Results 76 comments of Karsten Poeck

this seems to be correct ```lisp (progn (defvar *key-store* nil) (defvar *test-weak-table* (make-hash-table :test #'eq :weakness :key)) (dotimes (x 5) (let ((sym (cons x x))) (pushnew sym *key-store*) (setf (gethash...

I know that this does not help, but the gsll error has nothing to do with ffi, it is because of `(EDITOR-HINTS.NAMED-READTABLES:IN-READTABLE :ANTIK)` not properly working.

Concretely since `(get-dispatch-macro-character #\# #\+ (NAMED-READTABLES:find-readtable :antik))` returns nil, which it shouldn't

this is because of antik-master-df14cb8c-git/input-output/readtable.lisp the definition of antik should be ```lisp (named-readtables:defreadtable :antik (:merge :standard) #-(or ccl clasp) (:macro-char #\# :dispatch)) ````

`(:macro-char #\# :dispatch)` -> `(make-dispatch-macro-character #\# nil )` that calls: ```c++ T_sp Readtable_O::make_dispatch_macro_character_(Character_sp ch, T_sp non_terminating_p) { _OF(); this->set_macro_character_(ch, _sym_dispatch_macro_character, non_terminating_p); this->DispatchMacroCharacters_->setf_gethash(ch, HashTableEql_O::create_default()); return _lisp->_true(); } ```` that seems to...

for whats it worth, ecl and ccl and clisp all do what clasp does and return nil for the last form

As a tiny start, we already export from ext the following (in init.lisp ) * getpid * argc * argv * rmdir * mkstemp * weak-pointer-value * make-weak-pointer * weak-pointer-valid...

the not so nice thing is, that the error happens at load time, not at compile-time

As far as I understand this is a design limitation and will not be changed. Lets revisit when drmeister has the next go a compile-file-parallel