From cmucl-devel at common-lisp.net  Thu Sep 24 13:33:48 2009
From: cmucl-devel at common-lisp.net (cmucl)
Date: Thu, 24 Sep 2009 13:33:48 -0000
Subject: [cmucl-ticket] [cmucl] #33: get-dispatch-macro-character doesn't
 signal errors in compiled code
Message-ID: <052.35af9f76dd6899a0549033a71856fede@common-lisp.net>

#33: get-dispatch-macro-character doesn't signal errors in compiled code
--------------------+-------------------------------------------------------
 Reporter:  rtoy    |       Owner:  somebody
     Type:  defect  |      Status:  new     
 Priority:  minor   |   Milestone:          
Component:  Core    |     Version:  19f     
 Keywords:          |  
--------------------+-------------------------------------------------------
 This example is from the clisp mailing list

 {{{
 * (defun dispatch-macro-char-p (char rt)
   (handler-case (prog1 t
                   (get-dispatch-macro-character char #\x rt))
     (error () nil)))
 DISPATCH-MACRO-CHAR-P
 * (dispatch-macro-char-p #\$ (copy-readtable nil))
 NIL
 * (compile 'dispatch-macro-char-p)
 DISPATCH-MACRO-CHAR-P
 NIL
 NIL
 * (dispatch-macro-char-p #\$ (copy-readtable nil))
 T
 }}}

 I think this is because {{{get-dispatch-macro-character}}} is declared
 to be flushable.  I think that's wrong since
 {{{get-dispatch-macro-character}}} is supposed to signal errors.

-- 
Ticket URL: <http://127.0.0.1:8000/cmucl/ticket/33>
cmucl <http://common-lisp.net/project/cmucl>
cmucl

From cmucl-devel at common-lisp.net  Thu Sep 24 13:37:26 2009
From: cmucl-devel at common-lisp.net (cmucl)
Date: Thu, 24 Sep 2009 13:37:26 -0000
Subject: [cmucl-ticket] [cmucl] #34: get-dispatch-macro-character doesn't
 signal errors in compiled code
Message-ID: <052.d6c58ac87a0a6e9f4fe3c2cad0268104@common-lisp.net>

#34: get-dispatch-macro-character doesn't signal errors in compiled code
--------------------+-------------------------------------------------------
 Reporter:  rtoy    |       Owner:  somebody
     Type:  defect  |      Status:  new     
 Priority:  minor   |   Milestone:          
Component:  Core    |     Version:  19f     
 Keywords:          |  
--------------------+-------------------------------------------------------
 This example is from the clisp mailing list

 {{{
 * (defun dispatch-macro-char-p (char rt)
   (handler-case (prog1 t
                   (get-dispatch-macro-character char #\x rt))
     (error () nil)))
 DISPATCH-MACRO-CHAR-P
 * (dispatch-macro-char-p #\$ (copy-readtable nil))
 NIL
 * (compile 'dispatch-macro-char-p)
 DISPATCH-MACRO-CHAR-P
 NIL
 NIL
 * (dispatch-macro-char-p #\$ (copy-readtable nil))
 T
 }}}

 I think this is because {{{get-dispatch-macro-character}}} is declared
 to be flushable.  I think that's wrong since
 {{{get-dispatch-macro-character}}} is supposed to signal errors.

-- 
Ticket URL: <http://127.0.0.1:8000/cmucl/ticket/34>
cmucl <http://common-lisp.net/project/cmucl>
cmucl

From cmucl-devel at common-lisp.net  Thu Sep 24 13:38:08 2009
From: cmucl-devel at common-lisp.net (cmucl)
Date: Thu, 24 Sep 2009 13:38:08 -0000
Subject: [cmucl-ticket] [cmucl] #34: get-dispatch-macro-character
 doesn't signal errors in compiled code
In-Reply-To: <052.d6c58ac87a0a6e9f4fe3c2cad0268104@common-lisp.net>
References: <052.d6c58ac87a0a6e9f4fe3c2cad0268104@common-lisp.net>
Message-ID: <061.c7a5513b0986b225db95558f217ac3e4@common-lisp.net>

#34: get-dispatch-macro-character doesn't signal errors in compiled code
------------------------+---------------------------------------------------
  Reporter:  rtoy       |       Owner:  somebody
      Type:  defect     |      Status:  closed  
  Priority:  minor      |   Milestone:          
 Component:  Core       |     Version:  19f     
Resolution:  duplicate  |    Keywords:          
------------------------+---------------------------------------------------
Changes (by rtoy):

  * status:  new => closed
  * resolution:  => duplicate


-- 
Ticket URL: <http://127.0.0.1:8000/cmucl/ticket/34#comment:1>
cmucl <http://common-lisp.net/project/cmucl>
cmucl

From cmucl-devel at common-lisp.net  Mon Sep 28 21:28:39 2009
From: cmucl-devel at common-lisp.net (cmucl)
Date: Mon, 28 Sep 2009 21:28:39 -0000
Subject: [cmucl-ticket] [cmucl] #33: get-dispatch-macro-character
 doesn't signal errors in compiled code
In-Reply-To: <052.35af9f76dd6899a0549033a71856fede@common-lisp.net>
References: <052.35af9f76dd6899a0549033a71856fede@common-lisp.net>
Message-ID: <061.2b655d54b16b8755cfc29c647e7e959b@common-lisp.net>

#33: get-dispatch-macro-character doesn't signal errors in compiled code
---------------------+------------------------------------------------------
  Reporter:  rtoy    |       Owner:  somebody
      Type:  defect  |      Status:  closed  
  Priority:  minor   |   Milestone:          
 Component:  Core    |     Version:  19f     
Resolution:  fixed   |    Keywords:          
---------------------+------------------------------------------------------
Changes (by rtoy):

  * status:  new => closed
  * resolution:  => fixed


Comment:

 Fixed.  Should be available in the next snapshot (2009-11).

-- 
Ticket URL: <http://common-lisp.net:8000/cmucl/ticket/33#comment:1>
cmucl <http://common-lisp.net/project/cmucl>
cmucl