Pobierz aktualny rozmiar stosu w FORTH

Question

Jak mogę uzyskać liczbę elementów aktualnie przechowywanych w stosie w Forth?

Pytam o to, bo chcę zrobić funkcję, która drukuje wszystkie elementy stosu, coś jak:

: pop_all 0 do . loop ; 
1 5 10 4 5 
5 pop_all 

Ale teraz muszę ręcznie określić rozmiar stosu, kiedy ja to nazywam.

Answer 1

Zawsze można znaleźć liczbę przedmiotów na stosie za pomocą funkcji DEPTH. Zwrócona wartość to liczba elementów na stosie przed zwróceniem numeru.