From 59460d1a4877f8b07cc91e045f07eb2c02bb8771 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Mon, 11 Feb 2008 19:47:27 +0100 Subject: Do not rely on the GC to remove entries of a weak hash table. This patch finally makes Objective-CL not crash consistently on CLISP. darcs-hash:20d392bc8e5203efd20e3c57224c2b1338ecb8d9 --- Lisp/method-invocation.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Lisp/method-invocation.lisp') diff --git a/Lisp/method-invocation.lisp b/Lisp/method-invocation.lisp index 4653960..879996d 100644 --- a/Lisp/method-invocation.lisp +++ b/Lisp/method-invocation.lisp @@ -332,7 +332,7 @@ easier to use with __apply__. ;; an Objective-C object. In the latter case, ;; INITIALIZE-INSTANCE does the memory management for ;; us. - (error (make-condition 'exception :pointer error-cell))) + (error (make-pointer-wrapper 'exception :pointer error-cell))) (case return-type ((id objective-c-class exception selector) (let ((*skip-retaining* -- cgit v1.2.3