HOLDS — 문자열을 화상 숫자 문자열 앞에 추가
HOLDS — 문자열을 화상 숫자 문자열 앞에 추가
HOLDS는 addr에 있는 u 길이의 문자열을 화상 숫자 출력 문자열의 시작 부분에 추가하는 코어 단어예요.
본문
구현 (Implementation)
: HOLDS ( addr u -- )
BEGIN DUP WHILE 1- 2DUP + C@ HOLD REPEAT 2DROP ;
테스트 (Testing)
T{ 0. <# S" Test" HOLDS #> S" Test" COMPARE -> 0 }T