Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2025-01-13 08:01:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add comments to bitscan-forward

Browse source
This commit is contained in:
Koichi Nakamura 2021-05-05 23:09:26 +09:00
parent b67d488a58
commit d07e23eb00
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/bitscan.fs
View file

@ -32,7 +32,9 @@ create bsf-modulo-131-table
\ Find the index of the least significant 1 bit \ Find the index of the least significant 1 bit
\ If u == 0, returns -1 \ If u == 0, returns -1
: bitscan-forward ( u -- u ) : bitscan-forward ( u -- u )
dup negate and 131 mod cells bsf-modulo-131-table + @ dup negate and \ LS1B isolation
131 mod \ perfect hashing
cells bsf-modulo-131-table + @
; export ; export
create msb-index-table create msb-index-table