Parent Directory | Revision Log | Patch
revision 1.1 by pfdietz, Sat Oct 19 14:53:38 2002 UTC | revision 1.2 by pfdietz, Tue Mar 4 14:14:31 2003 UTC | |
---|---|---|
# | Line 36 | Line 36 |
36 | x | x |
37 | (return 'good))) | (return 'good))) |
38 | good) | good) |
39 | ||
40 | ;;; No implicit tagbody | |
41 | (deftest progn.8 | |
42 | (block nil | |
43 | (tagbody | |
44 | (progn | |
45 | (go 10) | |
46 | 10 | |
47 | (return 'bad)) | |
48 | 10 | |
49 | (return 'good))) | |
50 | good) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |