steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ryu: accept some lint vocab suggestions

freebsd-work
Alexander Iljin 2019-01-03 23:41:28 +01:00 committed by John Benediktsson
parent 47c3f7d56d
commit b26fa1b318
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/ryu/ryu.factor
View File

@ -208,7 +208,7 @@ PRIVATE>
] if
] when
] [ ! e2 < 0
e2 neg DOUBLE_LOG10_5_NUMERATOR * DOUBLE_LOG10_5_DENOMINATOR /i 1 - 0 max :> q
e2 neg DOUBLE_LOG10_5_NUMERATOR * DOUBLE_LOG10_5_DENOMINATOR /i 1 [-] :> q
q e2 + e10!
e2 neg q - :> i
i double-pow-5-bits DOUBLE_POW5_BITCOUNT - :> k
@ -221,7 +221,7 @@ PRIVATE>
] [ 1 - ] if ! vp!
] [
q 63 < [
q 1 - 2^ 1 - mv bitand zero? vrIsTrailingZeros!
q 1 - on-bits mv bitand zero? vrIsTrailingZeros!
] when
] if
] if