zig

fork of https://codeberg.org/ziglang/zig
Log | Files | Refs | README | LICENSE

blob a4e2f4df (599B) - Raw

      1 const common = @import("./common.zig");
      2 
      3 pub const panic = common.panic;
      4 
      5 comptime {
      6     if (common.want_ppc_abi) {
      7         @export(__subkf3, .{ .name = "__subkf3", .linkage = common.linkage });
      8     } else {
      9         @export(__subtf3, .{ .name = "__subtf3", .linkage = common.linkage });
     10     }
     11 }
     12 
     13 fn __subtf3(a: f128, b: f128) callconv(.C) f128 {
     14     const neg_b = @bitCast(f128, @bitCast(u128, b) ^ (@as(u128, 1) << 127));
     15     return a + neg_b;
     16 }
     17 
     18 fn __subkf3(a: f128, b: f128) callconv(.C) f128 {
     19     const neg_b = @bitCast(f128, @bitCast(u128, b) ^ (@as(u128, 1) << 127));
     20     return a + neg_b;
     21 }