[openfirmware] r1165 - dev/usb2/device
svn at openfirmware.info
svn at openfirmware.info
Thu Apr 30 00:52:13 CEST 2009
Author: wmb
Date: 2009-04-30 00:52:13 +0200 (Thu, 30 Apr 2009)
New Revision: 1165
Modified:
dev/usb2/device/debugport.fth
Log:
USB Debug Device driver: changed ." messages to abort" so they
can be suppressed by a catch. The output device may not be present
when the device is being initialized.
Modified: dev/usb2/device/debugport.fth
===================================================================
--- dev/usb2/device/debugport.fth 2009-04-29 21:55:19 UTC (rev 1164)
+++ dev/usb2/device/debugport.fth 2009-04-29 22:52:13 UTC (rev 1165)
@@ -94,11 +94,9 @@
1 2 dbgp-b! \ Turn off the done bit
0 dbgp-b@ h# 40 and if \ Error
0 dbgp-l@ 7 rshift 7 and
- case
- 1 of ." DBGP USB hardware error" cr endof
- 2 of ." DBGP transacation error" cr endof
- endcase
- abort
+ dup 1 = abort" DBGP USB hardware error"
+ dup 2 = abort" DBGP transacation error
+ 0<> abort" DBGP reserved exception"
then
;
: data-toggle ( -- ) 5 dbgp-b@ h# 88 xor 5 dbgp-b! ;
More information about the openfirmware
mailing list