rename functions in cmp.singeli
This commit is contained in:
parent
06e2dc47a9
commit
83afa4ba99
@ -97,8 +97,8 @@ fn bitAA{bitop}(dst:*u64, wr:*void, xr:*void, len:ux) : void = {
|
|||||||
@forNZ (dst, w in *u64~~wr, x in *u64~~xr over cdiv{len,64}) dst = bitop{w,x}
|
@forNZ (dst, w in *u64~~wr, x in *u64~~xr over cdiv{len,64}) dst = bitop{w,x}
|
||||||
}
|
}
|
||||||
|
|
||||||
fn not(dst:*u64, x:*u64, len:ux) : void = { am:=cdiv{len,64}; emit{void, 'bit_negatePtr', dst, x, am} }
|
fn bit_not(dst:*u64, x:*u64, len:ux) : void = { am:=cdiv{len,64}; emit{void, 'bit_negatePtr', dst, x, am} }
|
||||||
fn cpy(dst:*u64, x:*u64, len:ux) : void = { am:=cdiv{len,64}; emit{void, 'memcpy', dst, x, am*8} }
|
fn bit_cpy(dst:*u64, x:*u64, len:ux) : void = { am:=cdiv{len,64}; emit{void, 'memcpy', dst, x, am*8} }
|
||||||
|
|
||||||
fn bitAS{op}(dst:*u64, wr:*void, x:u64, len:ux) : void = { # show{'bitAS'}
|
fn bitAS{op}(dst:*u64, wr:*void, x:u64, len:ux) : void = { # show{'bitAS'}
|
||||||
xf:f64 = interp_f64{x}
|
xf:f64 = interp_f64{x}
|
||||||
@ -112,8 +112,8 @@ fn bitAS{op}(dst:*u64, wr:*void, x:u64, len:ux) : void = { # show{'bitAS'}
|
|||||||
fillbits{dst, len, r0}
|
fillbits{dst, len, r0}
|
||||||
return{}
|
return{}
|
||||||
}
|
}
|
||||||
if (r0) call{not, dst, *u64~~wr, len}
|
if (r0) call{bit_not, dst, *u64~~wr, len}
|
||||||
else call{cpy, dst, *u64~~wr, len}
|
else call{bit_cpy, dst, *u64~~wr, len}
|
||||||
}
|
}
|
||||||
|
|
||||||
def table{aa, F, w, G_bit, G_vec} = {
|
def table{aa, F, w, G_bit, G_vec} = {
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user