Lines Matching refs:drop
92 create here 0 , ['] drop , 0
220 : getenv? getenv -1 = if false else drop true then ;
227 ['] strdup catch if 2drop exit then
242 2drop
247 2drop
252 drop
266 caddr free drop
271 2 pick 0= if 2drop 2drop true exit then
272 dup 0= if 2drop 2drop false exit then
276 over 13 = or over 44 = or swap drop
280 2over 2over drop over compare-insensitive 0= if
281 2 pick over = if 2drop 2drop true exit then
284 swap drop if 2drop 2drop true exit then
287 over 13 = or over 44 = or swap drop
292 2drop 2drop false
298 else drop false then
300 \ swap drop 0>
301 \ else drop false then
304 \ swap drop 0>
305 \ else drop false then
454 dup 0= if 2drop exit then
458 drop
603 r> drop
713 name_buffer .len @ over <= if 2drop false exit then
752 2drop free drop
951 drop
974 compare 0= if drop drop r> exit then ( found it )
984 drop drop drop drop
1085 dup 0= if true to any_conf_read? drop exit then
1086 >r 2drop r>
1089 print_syntax_error drop exit
1093 print_line drop exit
1096 ." Warning: error reading file " print_current_file cr drop exit
1100 drop exit
1130 fd @ s' nextboot_enable="NO" ' fwrite ( fd buf len -- nwritten ) drop
1141 drop
1143 ['] peek_file catch if 2drop then
1150 ['] rewrite_nextboot_file catch if 2drop then
1229 drop
1242 drop
1286 -1 = if drop else free abort" Freeing error" then
1290 2drop
1301 2swap 2drop
1360 2drop 2drop
1362 r> drop
1387 drop
1392 drop
1433 drop
1452 newmodulepath drop free-memory
1453 oldmodulepath drop free-memory
1459 path newmodulepath drop swap move
1460 newmodulepath drop path nip
1468 newmodulepath drop free-memory
1475 newmodulepath drop free-memory
1476 oldmodulepath drop free-memory
1513 dup 0= if exit else drop then
1525 dup -1 = if drop 0 else 1 then
1553 drop
1565 drop
1583 0 ?do 2drop loop
1615 r> drop
1639 0 argv[] drop c@ [char] - <> if
1653 drop free if EFREE throw then
1670 drop ( empty string )
1679 drop