X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fdump.lisp;h=5f007a34fe17b57b7444a9149d4cd5ca532a33f5;hb=f33fdd489e9012e5064d35ca7edc7d4bc3c4a0c2;hp=04f6be77c7b5061c7ad9fea6ddd4e7613e078e5a;hpb=1c15a39341688bbca470c9187717d6370316b5c0;p=sbcl.git

diff --git a/src/compiler/dump.lisp b/src/compiler/dump.lisp
index 04f6be7..5f007a3 100644
--- a/src/compiler/dump.lisp
+++ b/src/compiler/dump.lisp
@@ -610,10 +610,6 @@
      (dump-complex-double-float (realpart x) (imagpart x) file))
     #!+long-float
     ((complex long-float)
-     ;; (There's no easy way to mix #!+LONG-FLOAT and #-SB-XC-HOST
-     ;; conditionalization at read time, so we do this SB-XC-HOST
-     ;; conditional at runtime instead.)
-     #+sb-xc-host (error "can't dump COMPLEX-LONG-FLOAT in cross-compiler")
      (dump-fop 'fop-complex-long-float file)
      (dump-long-float (realpart x) file)
      (dump-long-float (imagpart x) file))