anchor.diff:             :x8r8g8b8
              :device card)
             (mezzano.gui.compositor:force-redisplay t)))
  +      (setf (slot-value card '%edid)
  +            (ignore-errors (decode-raw-edid (read-raw-edid card))))
         card)))
   
   (pci:define-pci-driver i945 i945-probe
  
positive.code:         (format t "Video BIOS Registers~%")
          (format t "  VGACNTRL          : ~8,'0X~%" (reg +vgacntrl+))))))
  
  (defun i945-probe (pci-device)
    (let ((registers (pci:pci-io-region pci-device 0)))
      (pci:pci-io-region pci-device 1)
  
negative.code:                                :registers registers)))
        (setf *card* card)
        (format t "Detected i945 at ~S~%" pci-device)
        (let ((mode (save-current-mode-parameters card))
              (framebuffer (framebuffer-address card)))
          ;; Take ownership of the compositor framebuffer.
  