Lines Matching refs:quiesce
14 100 CONSTANT quiesce-xt#
16 \ The array with the quiesce execution tokens:
17 CREATE quiesce-xts quiesce-xt# cells allot
18 quiesce-xts quiesce-xt# cells erase
20 0 VALUE quiesce-done?
23 \ Add a token to the quiesce execution token array:
24 : add-quiesce-xt ( xt -- )
25 quiesce-xt# 0 DO
26 quiesce-xts I cells + ( xt arrayptr )
39 ." Warning: quiesce xt list is full." cr
43 \ The quiesce call asserts that the firmware and all hardware
46 : quiesce ( -- )
47 quiesce-done? IF EXIT THEN
48 true to quiesce-done?
49 quiesce-xt# 0 DO
50 quiesce-xts I cells + ( arrayptr )