| version 1.63, Sat Dec 31 15:29:25 2011 UTC | version 1.64, Mon Jan 16 22:17:32 2012 UTC | ||
|---|---|---|---|
|
|
||
| \ warn if list is not a sublist of locals-list | \ warn if list is not a sublist of locals-list | ||
| locals-list @ sub-list? 0= if | locals-list @ sub-list? 0= if | ||
| \ !! print current position | \ !! print current position | ||
| ." compiler was overly optimistic about locals at a BEGIN" cr | >stderr ." compiler was overly optimistic about locals at a BEGIN" cr | ||
| \ !! print assumption and reality | \ !! print assumption and reality | ||
| then ; | then ; | ||
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |