Removed double definition.

x11/glop-x11.lisp

@@ -16,19 +16,6 @@
 
 (setf gl-get-proc-address #'glop-glx:glx-get-proc-address)
 
-;;; Execute BODY with floating-point traps disabled. This seems to be
-;;; necessary on (at least) Linux/x86-64 where SIGFPEs are signalled
-;;; when creating making a GLX context active.
-#+(and sbcl x86-64)
-(defmacro without-fp-traps (&body body)
- `(sb-int:with-float-traps-masked (:invalid :divide-by-zero)
- ,@body))
-
-;;; Do nothing on Lisps that don't need traps disabled.
-#-(and sbcl x86-64)
-(defmacro without-fp-traps (&body body)
- `(progn ,@body))
-
 (defstruct (x11-window (:include window))
   display      ;; X display ptr
   screen       ;; X screen number