[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gcl-devel] Re: GCL 2.7.0 compiler bug
From: |
Camm Maguire |
Subject: |
[Gcl-devel] Re: GCL 2.7.0 compiler bug |
Date: |
13 Apr 2006 19:39:26 -0400 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.2 |
Greetings, and thanks! Should be fixed now.
Take care,
Matt Kaufmann <address@hidden> writes:
> Hi, Camm --
>
> Below is an example that shows a compiler bug in GCL 2.7.0. (I confirmed this
> using both /p/bin/xgn and /p/bin/xg here at UT CS, which I believe you can
> access.) If you replace the expression (if flg t nil) by just flg, the bug
> goes away.
>
> (defun test ()
> (let ((flg t))
> (catch 'my-tag
> (progn (throw 'my-tag nil)
> (setq flg nil)))
> (if flg t nil)))
>
> (test) ; returns t, as expected
>
> (compile 'test)
>
> (test) ; returns nil, NOT as expected
>
> Thanks --
> -- Matt
>
>
>
--
Camm Maguire address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah
- [Gcl-devel] Re: GCL 2.7.0 compiler bug,
Camm Maguire <=