Lines Matching full:swap
93 does> create here swap dup @ allot cell+ @ execute
96 : ;structure swap ! ;
99 : ;constructor postpone ; swap cell+ ! ; immediate
112 0 swap .len !
250 tlen swap - dup
254 taddr swap s" console" setenv
275 swap dup c@ dup 32 = over 9 = or over 10 = or
276 over 13 = or over 44 = or swap drop
277 while 1+ swap 1- repeat
278 swap 2 pick 1- over <
282 2 pick tuck - -rot + swap over c@ dup 32 =
284 swap drop if 2drop 2drop true exit then
286 swap dup c@ dup 32 = over 9 = or over 10 = or
287 over 13 = or over 44 = or swap drop
289 while 1+ swap 1- repeat
290 swap
297 s" comconsole" 2swap contains?
300 \ swap drop 0>
304 \ swap drop 0>
374 over c@ [char] " = if 2 chars - swap char+ swap then
456 2swap strcat
909 swap throw throw
924 swap throw throw
982 2swap type type cr
1028 swap free-memory
1282 dup -1 = if 0 swap exit then
1301 2swap 2drop
1315 swap to a1 ( store address )
1316 1 - a1 @ 1 + swap ( remove match )
1324 over 0 2swap ( addr 0 addr len )
1330 1- swap 1+ swap
1331 2swap 1+ 2swap
1334 1- swap 1+ swap
1336 2swap
1459 path newmodulepath drop swap move
1533 dup -1 = if 0 swap then
1627 2r> 2swap ( old a1 u1 )