izaya
/
collapseos
şunun yansıması https://github.com/hsoft/collapseos.git


			
				
					
						
						
							
							: SLEN      ( a -- n )
    DUP     ( astart aend )
    BEGIN
    DUP C@ 0 = IF -^ EXIT THEN
    1 +
    AGAIN
;