Lines Matching full:drop

56 			drop \ Remove stack-cruft
69 				then then then then drop
86 	repeat 2drop drop
110 			drop     \ Clean up stack cruft
119 			dup 0< if drop 0 dup readlen ! then \ Don't go negative
127 		drop \ last key pressed
138 		dup readmax > if drop readmax then
145 		2drop read-reset
146 	else drop then
155 	else drop then
158 	s" password" getenv -1 = if exit else drop then
169 	s" password" getenv dup readmax > if drop readmax then
173 			2drop read-reset exit