Vlákno názorů k článku Programovací jazyk Forth a zásobníkové procesory (6) od Gimel - Zatim jsem neprisel na to jak z toho...

Zatim jsem neprisel na to jak z toho ven, ale od urciteho cisla vyse pocita faktorial chybne.

4 factorial cr . cr
12
ok

coz neni zrovna spravne cislo.

Pri kompilaci faktorialu poprve mi "rve" v okamziku rekurzivniho volani factorial, ze toto slovo nezna. To jsem vyresil nadefinovanim prazdneho slova faktorial a opetovnym prekladem...
Pokud factorial prelozim vicekrat, udela chybu pozdeji. Po dvojim (vlastne uz trojim) prelozeni dela chybu az u 6ky. Takhle ta rekurze fungovat nebude. Jak to resit korektne?
Pouzivam Gforth.

Diky moc za odpoved i za vas serial.

Standardne treba na rekurziu pouzit slovo RECURSE. Ale su vynimky: Napriklad pri pouziti kompilatoru 4tH funguje definicia faktorialu presne tak ako ju popisuje pan Tisnovsky.

Tu je priklad ako to funguje standardne:

( Rekurzia vo FORTHe )
: fac
dup 0= 
if
  drop 1
else
  \ dup 1- fac *     \ toto funguje s kompilatorom 4tH
  dup 1- recurse * \ standardny pristup: RECURSE
then
;

11 0 do
 i . ." ! = " i fac . cr
loop