fix overflowed & float functions

This commit is contained in:
dzaima 2022-09-05 23:23:51 +03:00
parent c0b2164dc8
commit bffe16d6e9

View File

@ -130,8 +130,6 @@ Make ← {𝕊ns:
# array-scalar / scalar-array
ty0 tyName
ty1 @, "i16","i32","f64",@, "c16","c32",@
tyi @, "i8","i16","i32","f64", "i8","i16","i32"
tyc @, "c8","c16","c32",@, "c8","c16","c32"
isc 0, 0, 0, 0, 0, 1, 1, 1
@ -154,13 +152,13 @@ Make ← {𝕊ns:
{ 𝕊 num:
onlyFirst ns.overflowEq 1, ¬numcanOverflow
f1f2 12 {
𝕩@? @𝕩ty1?
𝕩@?
charArr numisc
¬ (charAtm¬numcanOverflow) (onlyFirst 𝕨=2) (¬hasChrArr)charArr?
currRes charAtmcharArrresChr
currRes@?
twnumcharAtmtyityc txnumtyName trnumcurrRestyityc
tw@? tx@? tr@?
twnumcharAtmtyityc txnumtyName tr𝕩currRestyityc
tr@?
siName id, argarr, 𝕨"?ce", '_'¨ twtxtr
𝕨 { 𝕊:
siSrc "'", siName, "'=arithSA{", '0'+ 𝕨@, onlyFirst02, 1, ',', si, ',', '0'+swap, (',' 'u'('c'))¨ twtxtr, '}', nl