Jose Morales
2022-10-30 10:29:36 UTC
Hi, does anyone know where the source of the gforth words are at in the repository. I'm finding that some of the supplied extensions don't seem to work. I started with random.fs... I've not been successful in compiling any of the provided examples because of missing words dependencies.
Thanks.
Gforth 0.7.3, Copyright (C) 1995-2008 Free Software Foundation, Inc.
Gforth comes with ABSOLUTELY NO WARRANTY; for details type `license'
Type `bye' to exit
ok
ok
ok
Variable seed ok
ok
$10450405 Constant generator ok
ok
: rnd ( -- x ) seed @ generator um* drop 1+ dup seed ! ; ok
: seed-init ( -- ) ntime drop seed +! rnd drop ;
:9: Undefined word
: seed-init ( -- ) >>>ntime<<< drop seed +! rnd drop ;
Thanks.
Gforth 0.7.3, Copyright (C) 1995-2008 Free Software Foundation, Inc.
Gforth comes with ABSOLUTELY NO WARRANTY; for details type `license'
Type `bye' to exit
ok
ok
ok
Variable seed ok
ok
$10450405 Constant generator ok
ok
: rnd ( -- x ) seed @ generator um* drop 1+ dup seed ! ; ok
: seed-init ( -- ) ntime drop seed +! rnd drop ;
:9: Undefined word
: seed-init ( -- ) >>>ntime<<< drop seed +! rnd drop ;