Front end infrastructure for short vector SIMD packs

[sbcl.git] / src / code / class.lisp

diff --git a/src/code/class.lisp b/src/code/class.lisp
index 19edd29..f6224ec 100644 (file)
--- a/src/code/class.lisp
+++ b/src/code/class.lisp
@@ -1104,6 +1104,9 @@
       :inherits (complex number)
       :codes (#.sb!vm:complex-long-float-widetag)
       :prototype-form (complex 42l0 42l0))
+     #!+sb-simd-pack
+     (simd-pack
+      :translation simd-pack)
      (real :translation real :inherits (number))
      (float
       :translation float