Home
last modified time | relevance | path

Searched refs:drop (Results 1 – 25 of 172) sorted by relevance

1234567

/titanic_51/usr/src/common/ficl/softcore/
H A Dsoftcore.fr9 : empty ( xn..x1 -- ) depth 0 ?do drop loop ;
39 2drop
51 : convert char+ 65535 >number drop ; \ cribbed from DPANS A.6.2.0970
56 : nip ( y x -- x ) swap drop ;
66 drop else spaces
73 drop else spaces
83 drop else spaces
91 -rot <# #s #> rot over - dup 0< if drop else spaces then type space ;
93 : d>s ( d -- n ) drop ;
103 rot 2drop
[all...]
H A Dclasses.fr1 S" FICL_WANT_OOP" ENVIRONMENT? drop [if]
18 drop 2@ ;
20 drop 2! ;
26 : get drop c@ ;
27 : set drop c! ;
33 : get drop w@ ;
34 : set drop w! ;
40 : get drop q@ ;
41 : set drop q! ;
48 : get drop
[all...]
H A Difbrack.fr29 2drop 1+ \ ( level )
32 2drop 1- dup if 1+ endif
34 ?[then] if 2drop 1- else 2drop endif
37 repeat 2drop \ level
39 drop
H A Dficlclass.fr1 S" FICL_WANT_OOP" ENVIRONMENT? drop [if]
52 : push drop >search ;
53 : pop 2drop previous ;
54 : set-current drop set-current ;
55 : get-name drop wid-get-name ;
62 0= until 2drop cr
77 : init 2drop ;
78 : ? 2drop
/titanic_51/usr/src/boot/sys/boot/forth/
H A Dversion.4th48 ?number drop versionX ! -1
49 then drop
51 ?number drop versionY ! -1
52 then drop
56 drop
59 drop str_loader_version
63 2drop
65 drop exit \ see logo-tribute.4th
67 drop str_loader_version
70 2drop
[all...]
H A Dpnp.4th60 pnpdevices drop
67 0 over @ pnph.enumerate @ ccall drop
86 drop
91 over c@ over c@ <> if drop drop false exit then
109 r> drop
115 \ drop drop
124 r> drop
125 drop
[all...]
H A Dsupport.4th94 create here 0 , ['] drop , 0
203 : getenv? getenv -1 = if false else drop true then ;
207 2 pick 0= if 2drop 2drop true exit then
208 dup 0= if 2drop 2drop false exit then
212 over 13 = or over 44 = or swap drop
216 2over 2over drop over compare-insensitive 0= if
217 2 pick over = if 2drop 2drop tru
[all...]
H A Dmenu.4th147 drop
154 drop false exit
156 2drop
167 drop
175 rot drop ( n c-addr/u -- c-addr/u )
252 swap drop ( c bool -- bool ) \ return boolean
266 drop ( cruft )
275 drop ( cruft ) s" "
278 2drop FALSE ( skip below conditional )
283 drop ( geten
[all...]
H A Dmenu-commands.4th58 drop ( n n c-addr -- n n ) \ unused
79 drop ( n c-addr -- n ) \ unused
98 drop ( c-addr/u c-addr -- c-addr/u ) \ unused
101 2drop ( c-addr/u -- ) \ unused
114 swap drop ( c-addr flag -- flag )
153 swap drop ( c-addr flag -- flag )
192 swap drop ( c-addr flag -- flag )
217 debug_state @ toggle_menuitem drop
245 swap drop ( c-addr flag -- flag )
266 kmdb_state @ toggle_menuitem drop
[all...]
H A Dbeadm.4th31 rot drop ( n c-addr/u -- c-addr/u )
72 value_buffer .len @ r@ > if r> drop value_buffer .len @ >r then
105 drop
113 drop free-memory
124 2drop \ drop be_name
140 2drop
148 dup 0> if ( strchr '/' != NULL ) - else drop then
197 2drop
208 drop fre
[all...]
H A Dloader.4th68 drop
74 drop
80 drop
99 drop
104 drop
117 2drop
143 drop
150 drop
157 drop
164 drop
[all...]
H A Dbeastie.4th52 else drop then
55 else drop then
63 drop ( xt = 0 ) \ cruft
65 dup 0= if 2drop else drop then \ getenv result unused
72 2drop ( c-addr/u -- ) \ getenv result unused
81 else drop then
97 else drop then
102 drop
H A Dcheck-password.4th57 drop \ Remove stack-cruft
70 then then then then drop
87 repeat 2drop drop
111 drop \ Clean up stack cruft
120 dup 0< if drop 0 dup readlen ! then \ Don't go negative
128 drop \ last key pressed
139 dup readmax > if drop readmax then
146 2drop read-reset
147 else drop the
[all...]
H A Dbrand.4th48 else drop then
51 else drop then
58 drop ( xt = 0 ) \ cruft
60 dup 0= if 2drop else drop then \ getenv result unused
63 2drop ( c-addr/u -- ) \ getenv result unused
72 else drop then
H A Dmenusets.4th48 s" cmdbuf" getenv swap drop ( -- u1 ) \ get string length
64 drop ( c-addr2 u2 -1 -- c-addr2 u2 )
65 2drop ( c-addr2 u2 -- )
69 2drop ( c-addr2 u2 c-addr1 u1 -- c-addr2 u2 )
118 s" cmdbuf" getenv swap drop ( -- u1 ) \ get string length
134 drop ( c-addr2 u2 -1 -- c-addr2 u2 )
135 2drop ( c-addr2 u2 -- )
139 2drop ( c-addr2 u2 c-addr1 u1 -- c-addr2 u2 )
215 s" cmdbuf" getenv swap drop ( -- u1 ) \ get string length
231 drop (
[all...]
/titanic_51/usr/src/boot/lib/libz/
H A Dinftrees.c45 unsigned drop; /* code bits to drop for sub-table */ local
152 with length len. That code is converted to an index by dropping drop
153 bits off of the bottom. For codes where len is less than drop + curr,
154 those top drop + curr - len bits are incremented through all values to
160 new sub-table should be started. drop is zero when the root table is
161 being filled, and drop is root when sub-tables are being filled.
205 drop = 0; /* current bits to drop from code for index */
218 here.bits = (unsigned char)(len - drop);
[all...]
/titanic_51/usr/src/contrib/zlib/
H A Dinftrees.c41 unsigned drop; /* code bits to drop for sub-table */ in inflate_table() local
148 with length len. That code is converted to an index by dropping drop in inflate_table()
149 bits off of the bottom. For codes where len is less than drop + curr, in inflate_table()
150 those top drop + curr - len bits are incremented through all values to in inflate_table()
156 new sub-table should be started. drop is zero when the root table is in inflate_table()
157 being filled, and drop is root when sub-tables are being filled. in inflate_table()
199 drop = 0; /* current bits to drop from code for index */ in inflate_table()
212 here.bits = (unsigned char)(len - drop); in inflate_table()
[all...]
/titanic_51/usr/src/lib/libdtrace/common/
H A Ddt_handle.c313 dtrace_dropdata_t drop; in dt_handle_cpudrop() local
319 bzero(&drop, sizeof (drop)); in dt_handle_cpudrop()
320 drop.dtdda_handle = dtp; in dt_handle_cpudrop()
321 drop.dtdda_cpu = cpu; in dt_handle_cpudrop()
322 drop.dtdda_kind = what; in dt_handle_cpudrop()
323 drop.dtdda_drops = howmany; in dt_handle_cpudrop()
324 drop.dtdda_msg = str; in dt_handle_cpudrop()
342 if ((*dtp->dt_drophdlr)(&drop, dtp->dt_droparg) == DTRACE_HANDLE_ABORT) in dt_handle_cpudrop()
356 "dynamic variable drop" },
392 dtrace_dropdata_t drop; dt_handle_status() local
[all...]
/titanic_51/usr/src/lib/efcode/fcode_test/
H A Dloop.fth47 " loop (1)" 0 h# 10 0 do drop i loop h# f = .passed?
49 " leave (1)" h# 10 0 do i 5 = if 1 leave drop 0 then loop .passed?
52 : loop1 do drop i loop h# f = .passed? ;
54 : loop3 do i 3 = if drop i leave 0 then loop ;
55 : loop7 do i 4 = if drop i unloop exit then loop ;
62 " loop by 2" 0 h# 10 0 do drop i 2 +loop h# e = .passed?
63 " loop down by 2" 0 -2 h# 10 do drop i -2 +loop h# -2 = .passed?
66 : loop4 0 h# 10 0 do drop i 2 +loop h# e = .passed? ;
67 : loop5 0 -2 h# 10 do drop i -2 +loop -2 = .passed? ;
76 " loop.7" h# 10 -37 8 bounds do drop
[all...]
H A Dstack.fth28 " drop" 1 0 drop .passed?
29 " swap" 1 2 1 swap drop = .passed?
41 " 2drop" 1 1 0 0 2drop and .passed?
42 " 2over" 1 2 0 0 2over 2swap 2drop rot = -rot = = .passed?
53 : bail-test ( -- ) r> drop ;
54 : bail ( -- ) 1 bail-test drop 0 ;
H A Dcase.fth37 " case.1" 0 case1 drop " zero" comp invert .passed?
38 " case.2" 1 case1 drop " one" comp invert .passed?
39 " case.3" 2 case1 drop " two" comp invert .passed?
40 " case.4" 3 case1 drop " 3" comp invert .passed?
41 " case.5" 4 case1 drop " 4" comp invert .passed?
/titanic_51/usr/src/lib/libdtrace_jni/java/src/org/opensolaris/os/dtrace/
H A DDropEvent.java45 private Drop drop; field in DropEvent
51 * @throws NullPointerException if the given drop is {@code null}
57 drop = dataDrop; in DropEvent()
64 if (drop == null) { in validate()
65 throw new NullPointerException("drop is null"); in validate()
70 * Gets the drop information generated by DTrace.
72 * @return non-null drop information generated by DTrace
77 return drop; in getDrop()
112 buf.append(", drop = "); in toString()
113 buf.append(drop); in toString()
[all...]
H A DDrop.java59 Drop drop = (Drop)oldInstance;
61 "new", new Object[] { drop.getCPU(),
62 drop.getKind().name(), drop.getCount(),
63 drop.getTotal(), drop.getDefaultMessage() });
74 * Indicates what kind of buffer space experienced the data drop
83 /** Dynamic drop */
85 /** Dynamic drop due to rinsing */
87 /** Dynamic drop du
[all...]
/titanic_51/usr/src/psm/stand/bootblks/zfs/common/
H A Dzfs.fth46 2drop 2drop -1 ( lt )
48 2drop 1 ( gt )
50 2drop -1 ( lt )
72 until drop ( adr )
130 r> 2drop ( dend dst )
146 2drop ( dend dst r: src )
160 2drop 2drop r> drop ( )
[all...]
/titanic_51/usr/src/psm/stand/bootblks/common/
H A Dboot.fth101 then >r 2drop ( r: ih )
128 decode-string 2swap 2drop ( archivepath$ )
161 2drop ( size virt )
169 2drop nip 32meg ( virt 32meg )
184 r> 2drop 2drop ( )
190 r> 3drop ( )
203 3drop true exit ( failed )
227 drop
269 repeat 2drop ( nam
[all...]

1234567