31 lines
808 B
Zig
31 lines
808 B
Zig
const common = @import("./common.zig");
|
|
|
|
pub const panic = common.panic;
|
|
|
|
comptime {
|
|
if (common.want_ppc_abi) {
|
|
@export(__subkf3, .{ .name = "__subkf3", .linkage = common.linkage });
|
|
} else if (common.want_sparc_abi) {
|
|
@export(_Qp_sub, .{ .name = "_Qp_sub", .linkage = common.linkage });
|
|
} else {
|
|
@export(__subtf3, .{ .name = "__subtf3", .linkage = common.linkage });
|
|
}
|
|
}
|
|
|
|
pub fn __subtf3(a: f128, b: f128) callconv(.C) f128 {
|
|
return sub(a, b);
|
|
}
|
|
|
|
fn __subkf3(a: f128, b: f128) callconv(.C) f128 {
|
|
return sub(a, b);
|
|
}
|
|
|
|
fn _Qp_sub(c: *f128, a: *const f128, b: *const f128) callconv(.C) void {
|
|
c.* = sub(a.*, b.*);
|
|
}
|
|
|
|
inline fn sub(a: f128, b: f128) f128 {
|
|
const neg_b = @bitCast(f128, @bitCast(u128, b) ^ (@as(u128, 1) << 127));
|
|
return a + neg_b;
|
|
}
|