[openfirmware] [commit] r2829 - forth/lib
repository service
svn at openfirmware.info
Mon Jan 16 22:05:22 CET 2012
Author: wmb
Date: Mon Jan 16 22:05:22 2012
New Revision: 2829
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2829
Log:
bitops.fth - added commentary
Modified:
forth/lib/bitops.fth
Modified: forth/lib/bitops.fth
==============================================================================
--- forth/lib/bitops.fth Mon Jan 16 22:05:18 2012 (r2828)
+++ forth/lib/bitops.fth Mon Jan 16 22:05:22 2012 (r2829)
@@ -2,6 +2,8 @@
purpose: bit array operations
hex
+\ bit 0 of the array is bit 7 of byte 0
+
: bitsetup ( bit# array -- adr val bit# )
over 3 >> + tuck c@ h# 80 rot 7 and >>
;
More information about the openfirmware
mailing list