version 1.71, 2001/01/30 14:40:07
|
version 1.72, 2001/02/04 22:37:12
|
Line 350 $1fffffff constant lcount-mask
|
Line 350 $1fffffff constant lcount-mask
|
(name>x) tuck (x>int) ( w xt ) |
(name>x) tuck (x>int) ( w xt ) |
swap immediate-mask and flag-sign ; |
swap immediate-mask and flag-sign ; |
|
|
const Create ??? 0 , 3 c, char ? c, char ? c, char ? c, |
const Create ??? 0 , 3 , char ? c, char ? c, char ? c, |
\ ??? is used by dovar:, must be created/:dovar |
\ ??? is used by dovar:, must be created/:dovar |
|
|
[IFDEF] forthstart |
[IFDEF] forthstart |