Lines Matching refs:drop
93 create here 0 , ['] drop , 0
221 : getenv? getenv -1 = if false else drop true then ;
228 ['] strdup catch if 2drop exit then
243 2drop
248 2drop
253 drop
267 caddr free drop
272 2 pick 0= if 2drop 2drop true exit then
273 dup 0= if 2drop 2drop false exit then
277 over 13 = or over 44 = or swap drop
281 2over 2over drop over compare-insensitive 0= if
282 2 pick over = if 2drop 2drop true exit then
285 swap drop if 2drop 2drop true exit then
288 over 13 = or over 44 = or swap drop
293 2drop 2drop false
299 else drop false then
301 \ swap drop 0>
302 \ else drop false then
305 \ swap drop 0>
306 \ else drop false then
455 dup 0= if 2drop exit then
459 drop
604 r> drop
714 name_buffer .len @ over <= if 2drop false exit then
753 2drop free drop
952 drop
975 compare 0= if drop drop r> exit then ( found it )
985 drop drop drop drop
1086 dup 0= if true to any_conf_read? drop exit then
1087 >r 2drop r>
1090 print_syntax_error drop exit
1094 print_line drop exit
1097 ." Warning: error reading file " print_current_file cr drop exit
1101 drop exit
1131 fd @ s' nextboot_enable="NO" ' fwrite ( fd buf len -- nwritten ) drop
1142 drop
1144 ['] peek_file catch if 2drop then
1151 ['] rewrite_nextboot_file catch if 2drop then
1230 drop
1243 drop
1287 -1 = if drop else free abort" Freeing error" then
1291 2drop
1302 2swap 2drop
1361 2drop 2drop
1363 r> drop
1388 drop
1393 drop
1434 drop
1453 newmodulepath drop free-memory
1454 oldmodulepath drop free-memory
1460 path newmodulepath drop swap move
1461 newmodulepath drop path nip
1469 newmodulepath drop free-memory
1476 newmodulepath drop free-memory
1477 oldmodulepath drop free-memory
1514 dup 0= if exit else drop then
1526 dup -1 = if drop 0 else 1 then
1554 drop
1566 drop
1584 0 ?do 2drop loop
1616 r> drop
1640 0 argv[] drop c@ [char] - <> if
1654 drop free if EFREE throw then
1671 drop ( empty string )
1680 drop