aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/vm_arm.dasc4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vm_arm.dasc b/src/vm_arm.dasc
index 355a53e6..b9193213 100644
--- a/src/vm_arm.dasc
+++ b/src/vm_arm.dasc
@@ -2210,13 +2210,13 @@ static void build_subroutines(BuildCtx *ctx)
2210 | vcmp.f64 d1, d2 // |x| >= 2^52 or NaN? 2210 | vcmp.f64 d1, d2 // |x| >= 2^52 or NaN?
2211 | vmrs 2211 | vmrs
2212 |.if "func" == "trunc" 2212 |.if "func" == "trunc"
2213 | vadd.f64 d0, d1, d2
2214 | bxpl lr // Return argument unchanged. 2213 | bxpl lr // Return argument unchanged.
2214 | vadd.f64 d0, d1, d2
2215 | vsub.f64 d0, d0, d2 // (|x| + 2^52) - 2^52 2215 | vsub.f64 d0, d0, d2 // (|x| + 2^52) - 2^52
2216 | vldr d2, <9 // +1.0 2216 | vldr d2, <9 // +1.0
2217 | vcmp.f64 d1, d0 // |x| < result: subtract +1.0 2217 | vcmp.f64 d1, d0 // |x| < result: subtract +1.0
2218 | vmrs 2218 | vmrs
2219 | vsubmi.f64 d0, d1, d2 2219 | vsubmi.f64 d0, d0, d2
2220 | cmp CARG2, #0 2220 | cmp CARG2, #0
2221 | vnegmi.f64 d0, d0 // Merge sign bit back in. 2221 | vnegmi.f64 d0, d0 // Merge sign bit back in.
2222 |.else 2222 |.else