| version 1.110, Wed Sep 5 14:25:48 2001 UTC | version 1.111, Thu Sep 6 08:14:16 2001 UTC | ||
|---|---|---|---|
|
|
||
| THEN | THEN | ||
| @nb ; | @nb ; | ||
| \ FIXME why disabled?! | |||
| : label-from-ghostnameXX ( ghost -- addr len ) | : label-from-ghostnameXX ( ghost -- addr len ) | ||
| \ same as (label-from-ghostname) but caches generated names | \ same as (label-from-ghostname) but caches generated names | ||
| dup >asm-name @ ?dup IF nip count EXIT THEN | dup >asm-name @ ?dup IF nip count EXIT THEN |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |