Lines Matching refs:then

61 				\ Spin the twiddle and then exit this function
69 				then then then then drop
72 			then then
75 			dup bs_key = if exit then
76 			dup enter_key = if exit then
77 			dup ctrl_u = if exit then
78 		then
119 			dup 0< if drop 0 dup readlen ! then \ Don't go negative
120 			0= if 3 spaces read-start @ sr at-xy then \ Twiddle
125 		then then then
138 		dup readmax > if drop readmax then
146 	else drop then
154 		then
155 	else drop then
158 	s" password" getenv -1 = if exit else drop then
168 	s" password" getenv dup readmax > if drop readmax then
173 		then