aft  ( -- )

publication: 24 juin 2022 / mis à jour 10 novembre 2024

Read this page in english

 

Saute à THEN dans une boucle FOR-AFT-THEN-NEXT lors de la première itération.

Exemple:

: test-aft1 ( n -- ) 
  FOR 
    ."  for "     \ first iteration 
    AFT 
      ."  aft "   \ following iterations 
    THEN 
    I .          \ all iterations 
  NEXT ; 
3 test-aft1  
\ display for 3 aft 2 aft 1 aft 0 

Legal: site web personnel sans commerce / personal site without seling