Minor Singeli simplifications
This commit is contained in:
parent
90863851b7
commit
56944b8985
@ -169,8 +169,7 @@ def homMask{...vs if length{vs}>1} = {
|
|||||||
def RT = ty_u{max{8,k*n}}
|
def RT = ty_u{max{8,k*n}}
|
||||||
def sl{...a} = promote{RT, homMask{...slice{vs,...a}}}
|
def sl{...a} = promote{RT, homMask{...slice{vs,...a}}}
|
||||||
def h = n/2
|
def h = n/2
|
||||||
def a = sl{0,h}
|
(sl{h} << (h * k)) | sl{0,h}
|
||||||
(sl{h} << (h * k)) | a
|
|
||||||
}
|
}
|
||||||
|
|
||||||
if_inline (hasarch{'X86_64'}) {
|
if_inline (hasarch{'X86_64'}) {
|
||||||
|
|||||||
@ -93,7 +93,7 @@ def loaduBitRaw{x:(*u64), i} = {
|
|||||||
loadu{*u64~~((*u8~~x) + (i>>3))} >> (i&7)
|
loadu{*u64~~((*u8~~x) + (i>>3))} >> (i&7)
|
||||||
}
|
}
|
||||||
def loaduBit{x:(*u64), i, n} = {
|
def loaduBit{x:(*u64), i, n} = {
|
||||||
assert{(n<58) | ((n==58 or n==60) & (i%n == 0))}
|
assert{n<58 or ((n==58 or n==60) and (i%n == 0))}
|
||||||
loaduBitRaw{x, i}
|
loaduBitRaw{x, i}
|
||||||
}
|
}
|
||||||
def loaduBitTrunc{x:(*u64), i, n if knum{n}} = truncBits{n, loaduBit{x, i, n}}
|
def loaduBitTrunc{x:(*u64), i, n if knum{n}} = truncBits{n, loaduBit{x, i, n}}
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user