Forth, za one sa razlčitim rasporedom vijuga...

[mveselic]

@mveselic

Maki, očigledno testiraš koliko pažljivo čitamo (znam te ortak :-). Evo ja sam bio pažljiv na času.

U objašnjenju 2.3 zar ne bi trebalo da bude ovako:

variable counter

: count-- ( -- )
counter @ 0> if 1 counter -! then ;

U prevodu na običan govorni jezik: formiraj varijabliu >counter<,
potom napravi novu reč >count--<.

Reč-funkcija >count--< sastojaće se od sledećih događaja: dohvati vrednost varijable counter ( counter @< ),
uporedi njenu pročitanu vrednost sa 0 i ako je vrednost veća od 0 ( 0> if) onda  vrednost varijable (  counter )  umanji za 1 i storiraj ( 1 counter -! ), then zaključuje uslov if.


Postoji slična "anomalija" i u if-else.

Ili možda grešim ipak pošto mnogo godina to nisam ni pipnuo?

Pozdrav Maki

U pravu si Macola.
Nisam testirao nista u pitanju je greska.
Trebalo bi da stoji -1 counter +!
Mislim da je definicija -! nepotrebna i nikada je nisam koristio niti sam na nju naisao.

M.