mirror of
https://github.com/Ed94/Odin.git
synced 2026-08-03 14:18:47 +00:00
Remove unneeded semicolons from the core library
This commit is contained in:
gingerBill
+118
-118
@@ -16,83 +16,83 @@ Float_Info :: struct {
|
||||
}
|
||||
|
||||
|
||||
_f16_info := Float_Info{10, 5, -15};
|
||||
_f32_info := Float_Info{23, 8, -127};
|
||||
_f64_info := Float_Info{52, 11, -1023};
|
||||
_f16_info := Float_Info{10, 5, -15}
|
||||
_f32_info := Float_Info{23, 8, -127}
|
||||
_f64_info := Float_Info{52, 11, -1023}
|
||||
|
||||
|
||||
generic_ftoa :: proc(buf: []byte, val: f64, fmt: byte, precision, bit_size: int) -> []byte {
|
||||
bits: u64;
|
||||
flt: ^Float_Info;
|
||||
bits: u64
|
||||
flt: ^Float_Info
|
||||
switch bit_size {
|
||||
case 16:
|
||||
bits = u64(transmute(u16)f16(val));
|
||||
flt = &_f16_info;
|
||||
bits = u64(transmute(u16)f16(val))
|
||||
flt = &_f16_info
|
||||
case 32:
|
||||
bits = u64(transmute(u32)f32(val));
|
||||
flt = &_f32_info;
|
||||
bits = u64(transmute(u32)f32(val))
|
||||
flt = &_f32_info
|
||||
case 64:
|
||||
bits = transmute(u64)val;
|
||||
flt = &_f64_info;
|
||||
bits = transmute(u64)val
|
||||
flt = &_f64_info
|
||||
case:
|
||||
panic("strconv: invalid bit_size");
|
||||
panic("strconv: invalid bit_size")
|
||||
}
|
||||
|
||||
neg := bits>>(flt.expbits+flt.mantbits) != 0;
|
||||
exp := int(bits>>flt.mantbits) & (1<<flt.expbits - 1);
|
||||
mant := bits & (u64(1) << flt.mantbits - 1);
|
||||
neg := bits>>(flt.expbits+flt.mantbits) != 0
|
||||
exp := int(bits>>flt.mantbits) & (1<<flt.expbits - 1)
|
||||
mant := bits & (u64(1) << flt.mantbits - 1)
|
||||
|
||||
switch exp {
|
||||
case 1<<flt.expbits - 1:
|
||||
s: string;
|
||||
s: string
|
||||
if mant != 0 {
|
||||
s = "NaN";
|
||||
s = "NaN"
|
||||
} else if neg {
|
||||
s = "-Inf";
|
||||
s = "-Inf"
|
||||
} else {
|
||||
s = "+Inf";
|
||||
s = "+Inf"
|
||||
}
|
||||
n := copy(buf, s);
|
||||
return buf[:n];
|
||||
n := copy(buf, s)
|
||||
return buf[:n]
|
||||
|
||||
case 0: // denormalized
|
||||
exp += 1;
|
||||
exp += 1
|
||||
|
||||
case:
|
||||
mant |= u64(1) << flt.mantbits;
|
||||
mant |= u64(1) << flt.mantbits
|
||||
}
|
||||
|
||||
exp += flt.bias;
|
||||
exp += flt.bias
|
||||
|
||||
d_: decimal.Decimal;
|
||||
d := &d_;
|
||||
decimal.assign(d, mant);
|
||||
decimal.shift(d, exp - int(flt.mantbits));
|
||||
digs: Decimal_Slice;
|
||||
prec := precision;
|
||||
shortest := prec < 0;
|
||||
d_: decimal.Decimal
|
||||
d := &d_
|
||||
decimal.assign(d, mant)
|
||||
decimal.shift(d, exp - int(flt.mantbits))
|
||||
digs: Decimal_Slice
|
||||
prec := precision
|
||||
shortest := prec < 0
|
||||
if shortest {
|
||||
round_shortest(d, mant, exp, flt);
|
||||
digs = Decimal_Slice{digits = d.digits[:], count = d.count, decimal_point = d.decimal_point};
|
||||
round_shortest(d, mant, exp, flt)
|
||||
digs = Decimal_Slice{digits = d.digits[:], count = d.count, decimal_point = d.decimal_point}
|
||||
switch fmt {
|
||||
case 'e', 'E': prec = digs.count-1;
|
||||
case 'f', 'F': prec = max(digs.count-digs.decimal_point, 0);
|
||||
case 'g', 'G': prec = digs.count;
|
||||
case 'e', 'E': prec = digs.count-1
|
||||
case 'f', 'F': prec = max(digs.count-digs.decimal_point, 0)
|
||||
case 'g', 'G': prec = digs.count
|
||||
}
|
||||
} else {
|
||||
switch fmt {
|
||||
case 'e', 'E': decimal.round(d, prec+1);
|
||||
case 'f', 'F': decimal.round(d, d.decimal_point+prec);
|
||||
case 'e', 'E': decimal.round(d, prec+1)
|
||||
case 'f', 'F': decimal.round(d, d.decimal_point+prec)
|
||||
case 'g', 'G':
|
||||
if prec == 0 {
|
||||
prec = 1;
|
||||
prec = 1
|
||||
}
|
||||
decimal.round(d, prec);
|
||||
decimal.round(d, prec)
|
||||
}
|
||||
|
||||
digs = Decimal_Slice{digits = d.digits[:], count = d.count, decimal_point = d.decimal_point};
|
||||
digs = Decimal_Slice{digits = d.digits[:], count = d.count, decimal_point = d.decimal_point}
|
||||
}
|
||||
return format_digits(buf, shortest, neg, digs, prec, fmt);
|
||||
return format_digits(buf, shortest, neg, digs, prec, fmt)
|
||||
}
|
||||
|
||||
|
||||
@@ -101,118 +101,118 @@ format_digits :: proc(buf: []byte, shortest: bool, neg: bool, digs: Decimal_Slic
|
||||
Buffer :: struct {
|
||||
b: []byte,
|
||||
n: int,
|
||||
};
|
||||
}
|
||||
|
||||
to_bytes :: proc(b: Buffer) -> []byte {
|
||||
return b.b[:b.n];
|
||||
return b.b[:b.n]
|
||||
}
|
||||
add_bytes :: proc(buf: ^Buffer, bytes: ..byte) {
|
||||
buf.n += copy(buf.b[buf.n:], bytes);
|
||||
buf.n += copy(buf.b[buf.n:], bytes)
|
||||
}
|
||||
|
||||
b := Buffer{b = buf};
|
||||
prec := precision;
|
||||
b := Buffer{b = buf}
|
||||
prec := precision
|
||||
|
||||
switch fmt {
|
||||
case 'f', 'F':
|
||||
add_bytes(&b, '-' if neg else '+');
|
||||
add_bytes(&b, '-' if neg else '+')
|
||||
|
||||
// integer, padded with zeros when needed
|
||||
if digs.decimal_point > 0 {
|
||||
m := min(digs.count, digs.decimal_point);
|
||||
add_bytes(&b, ..digs.digits[0:m]);
|
||||
m := min(digs.count, digs.decimal_point)
|
||||
add_bytes(&b, ..digs.digits[0:m])
|
||||
for ; m < digs.decimal_point; m += 1 {
|
||||
add_bytes(&b, '0');
|
||||
add_bytes(&b, '0')
|
||||
}
|
||||
} else {
|
||||
add_bytes(&b, '0');
|
||||
add_bytes(&b, '0')
|
||||
}
|
||||
|
||||
|
||||
// fractional part
|
||||
if prec > 0 {
|
||||
add_bytes(&b, '.');
|
||||
add_bytes(&b, '.')
|
||||
for i in 0..<prec {
|
||||
c: byte = '0';
|
||||
c: byte = '0'
|
||||
if j := digs.decimal_point + i; 0 <= j && j < digs.count {
|
||||
c = digs.digits[j];
|
||||
c = digs.digits[j]
|
||||
}
|
||||
add_bytes(&b, c);
|
||||
add_bytes(&b, c)
|
||||
}
|
||||
}
|
||||
return to_bytes(b);
|
||||
return to_bytes(b)
|
||||
|
||||
case 'e', 'E':
|
||||
add_bytes(&b, '-' if neg else '+');
|
||||
add_bytes(&b, '-' if neg else '+')
|
||||
|
||||
ch := byte('0');
|
||||
ch := byte('0')
|
||||
if digs.count != 0 {
|
||||
ch = digs.digits[0];
|
||||
ch = digs.digits[0]
|
||||
}
|
||||
add_bytes(&b, ch);
|
||||
add_bytes(&b, ch)
|
||||
|
||||
if prec > 0 {
|
||||
add_bytes(&b, '.');
|
||||
i := 1;
|
||||
m := min(digs.count, prec+1);
|
||||
add_bytes(&b, '.')
|
||||
i := 1
|
||||
m := min(digs.count, prec+1)
|
||||
if i < m {
|
||||
add_bytes(&b, ..digs.digits[i:m]);
|
||||
i = m;
|
||||
add_bytes(&b, ..digs.digits[i:m])
|
||||
i = m
|
||||
}
|
||||
for ; i <= prec; i += 1 {
|
||||
add_bytes(&b, '0');
|
||||
add_bytes(&b, '0')
|
||||
}
|
||||
}
|
||||
|
||||
add_bytes(&b, fmt);
|
||||
exp := digs.decimal_point-1;
|
||||
add_bytes(&b, fmt)
|
||||
exp := digs.decimal_point-1
|
||||
if digs.count == 0 {
|
||||
// Zero has exponent of 0
|
||||
exp = 0;
|
||||
exp = 0
|
||||
}
|
||||
|
||||
ch = '+';
|
||||
ch = '+'
|
||||
if exp < 0 {
|
||||
ch = '-';
|
||||
exp = -exp;
|
||||
ch = '-'
|
||||
exp = -exp
|
||||
}
|
||||
add_bytes(&b, ch);
|
||||
add_bytes(&b, ch)
|
||||
|
||||
switch {
|
||||
case exp < 10: add_bytes(&b, '0', byte(exp)+'0'); // add prefix 0
|
||||
case exp < 100: add_bytes(&b, byte(exp/10)+'0', byte(exp%10)+'0');
|
||||
case: add_bytes(&b, byte(exp/100)+'0', byte(exp/10)%10+'0', byte(exp%10)+'0');
|
||||
case exp < 10: add_bytes(&b, '0', byte(exp)+'0') // add prefix 0
|
||||
case exp < 100: add_bytes(&b, byte(exp/10)+'0', byte(exp%10)+'0')
|
||||
case: add_bytes(&b, byte(exp/100)+'0', byte(exp/10)%10+'0', byte(exp%10)+'0')
|
||||
}
|
||||
|
||||
return to_bytes(b);
|
||||
return to_bytes(b)
|
||||
|
||||
case 'g', 'G':
|
||||
eprec := prec;
|
||||
eprec := prec
|
||||
if eprec > digs.count && digs.count >= digs.decimal_point {
|
||||
eprec = digs.count;
|
||||
eprec = digs.count
|
||||
}
|
||||
|
||||
if shortest {
|
||||
eprec = 6;
|
||||
eprec = 6
|
||||
}
|
||||
|
||||
exp := digs.decimal_point - 1;
|
||||
exp := digs.decimal_point - 1
|
||||
if exp < -4 || exp >= eprec {
|
||||
if prec > digs.count {
|
||||
prec = digs.count;
|
||||
prec = digs.count
|
||||
}
|
||||
return format_digits(buf, shortest, neg, digs, prec-1, fmt+'e'-'g'); // keep the same case
|
||||
return format_digits(buf, shortest, neg, digs, prec-1, fmt+'e'-'g') // keep the same case
|
||||
}
|
||||
|
||||
if prec > digs.decimal_point {
|
||||
prec = digs.count;
|
||||
prec = digs.count
|
||||
}
|
||||
|
||||
return format_digits(buf, shortest, neg, digs, max(prec-digs.decimal_point, 0), 'f');
|
||||
return format_digits(buf, shortest, neg, digs, max(prec-digs.decimal_point, 0), 'f')
|
||||
|
||||
case:
|
||||
add_bytes(&b, '%', fmt);
|
||||
return to_bytes(b);
|
||||
add_bytes(&b, '%', fmt)
|
||||
return to_bytes(b)
|
||||
}
|
||||
|
||||
|
||||
@@ -220,8 +220,8 @@ format_digits :: proc(buf: []byte, shortest: bool, neg: bool, digs: Decimal_Slic
|
||||
|
||||
round_shortest :: proc(d: ^decimal.Decimal, mant: u64, exp: int, flt: ^Float_Info) {
|
||||
if mant == 0 { // If mantissa is zero, the number is zero
|
||||
d.count = 0;
|
||||
return;
|
||||
d.count = 0
|
||||
return
|
||||
}
|
||||
|
||||
/*
|
||||
@@ -230,56 +230,56 @@ round_shortest :: proc(d: ^decimal.Decimal, mant: u64, exp: int, flt: ^Float_Inf
|
||||
log(2) >~ 0.332
|
||||
332*(dp-nd) >= 100*(exp-mantbits)
|
||||
*/
|
||||
minexp := flt.bias+1;
|
||||
minexp := flt.bias+1
|
||||
if exp > minexp && 332*(d.decimal_point-d.count) >= 100*(exp - int(flt.mantbits)) {
|
||||
// Number is already its shortest
|
||||
return;
|
||||
return
|
||||
}
|
||||
|
||||
upper_: decimal.Decimal; upper := &upper_;
|
||||
decimal.assign(upper, 2*mant - 1);
|
||||
decimal.shift(upper, exp - int(flt.mantbits) - 1);
|
||||
upper_: decimal.Decimal; upper := &upper_
|
||||
decimal.assign(upper, 2*mant - 1)
|
||||
decimal.shift(upper, exp - int(flt.mantbits) - 1)
|
||||
|
||||
mantlo: u64;
|
||||
explo: int;
|
||||
mantlo: u64
|
||||
explo: int
|
||||
if mant > 1<<flt.mantbits || exp == minexp {
|
||||
mantlo = mant-1;
|
||||
explo = exp;
|
||||
mantlo = mant-1
|
||||
explo = exp
|
||||
} else {
|
||||
mantlo = 2*mant - 1;
|
||||
explo = exp-1;
|
||||
mantlo = 2*mant - 1
|
||||
explo = exp-1
|
||||
}
|
||||
lower_: decimal.Decimal; lower := &lower_;
|
||||
decimal.assign(lower, 2*mantlo + 1);
|
||||
decimal.shift(lower, explo - int(flt.mantbits) - 1);
|
||||
lower_: decimal.Decimal; lower := &lower_
|
||||
decimal.assign(lower, 2*mantlo + 1)
|
||||
decimal.shift(lower, explo - int(flt.mantbits) - 1)
|
||||
|
||||
inclusive := mant%2 == 0;
|
||||
inclusive := mant%2 == 0
|
||||
|
||||
for i in 0..<d.count {
|
||||
l: byte = '0'; // lower digit
|
||||
l: byte = '0' // lower digit
|
||||
if i < lower.count {
|
||||
l = lower.digits[i];
|
||||
l = lower.digits[i]
|
||||
}
|
||||
m := d.digits[i]; // middle digit
|
||||
u: byte = '0'; // upper digit
|
||||
m := d.digits[i] // middle digit
|
||||
u: byte = '0' // upper digit
|
||||
if i < upper.count {
|
||||
u = upper.digits[i];
|
||||
u = upper.digits[i]
|
||||
}
|
||||
|
||||
ok_round_down := l != m || inclusive && i+1 == lower.count;
|
||||
ok_round_up := m != u && (inclusive || m+1 < u || i+1 < upper.count);
|
||||
ok_round_down := l != m || inclusive && i+1 == lower.count
|
||||
ok_round_up := m != u && (inclusive || m+1 < u || i+1 < upper.count)
|
||||
|
||||
if ok_round_down && ok_round_up {
|
||||
decimal.round(d, i+1);
|
||||
return;
|
||||
decimal.round(d, i+1)
|
||||
return
|
||||
}
|
||||
if ok_round_down {
|
||||
decimal.round_down(d, i+1);
|
||||
return;
|
||||
decimal.round_down(d, i+1)
|
||||
return
|
||||
}
|
||||
if ok_round_up {
|
||||
decimal.round_up(d, i+1);
|
||||
return;
|
||||
decimal.round_up(d, i+1)
|
||||
return
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user