Greetings, and thanks! Should be fixed now. Take care,
Matt Kaufmann <[EMAIL PROTECTED]> 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 [EMAIL PROTECTED] ========================================================================== "The earth is but one country, and mankind its citizens." -- Baha'u'llah _______________________________________________ Gcl-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/gcl-devel
