[OpenBIOS] r563 - ofw/wifi

Author: lwalter
Date: 2007-08-17 21:23:21 +0200 (Fri, 17 Aug 2007)
New Revision: 563

Modified:
   ofw/wifi/eapol.fth
Log:
Mask out bit 7 when deriving common rates

Modified: ofw/wifi/eapol.fth
===================================================================
--- ofw/wifi/eapol.fth	2007-08-17 18:59:06 UTC (rev 562)
+++ ofw/wifi/eapol.fth	2007-08-17 19:23:21 UTC (rev 563)
@@ -579,8 +579,8 @@

0 value cr-idx					\ Index into common-rates
 : supported-rate?  ( r -- true | false )
-   false swap #rates 0  ?do
-      supported-rates i + c@ over =  if  nip true swap leave  then
+   h# 7f and false swap #rates 0  ?do
+      supported-rates i + c@ h# 7f and over =  if  nip true swap leave  then
    loop  drop
 ;
 : add-common-rates  ( adr len -- )