From: Taylor R Campbell <campbell@mumble.net>
Date: Tue, 15 Jan 2019 03:18:32 +0000 (+0000)
Subject: Disable floating-point vector primitives too.
X-Git-Tag: mit-scheme-pucked-10.1.20~11^2~66^2~84
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=e851445e4bdc60ad476239067853846003f3aa40;p=mit-scheme.git

Disable floating-point vector primitives too.

Until we have open-coded floating-point arithmetic.
---

diff --git a/src/compiler/machines/aarch64/machine.scm b/src/compiler/machines/aarch64/machine.scm
index 6548e90d4..0fe2c5156 100644
--- a/src/compiler/machines/aarch64/machine.scm
+++ b/src/compiler/machines/aarch64/machine.scm
@@ -535,6 +535,8 @@ USA.
     DIVIDE-FIXNUM       ;nobody open-codes this
     FIXNUM-LSH          ;open-coding not useful without constant operands
     FLOATING-VECTOR-CONS;nobody open-codes this
+    FLOATING-VECTOR-REF ;no flonum arithmetic yet
+    FLOATING-VECTOR-SET!;no flonum arithmetic yet
     FLONUM-ABS          ;no flonum arithmetic yet
     FLONUM-ACOS         ;not useful to open-code hairy math
     FLONUM-ADD          ;no flonum arithmetic yet