anchor.diff:    ;; version/date if they don't put it back in .specs
     (unless *glext-version*
       (error "glext version not found in .spec files")
  -    (setf *glext-version* 55))
  +    (setf *glext-version* 72))
     (when (string= *glext-last-updated* "<unknown>")
       (error "glext update date not found in .spec files")
       (setf *glext-last-updated* "2009-09-11")))
  
positive.code:     ("ScissorIndexedv" . "scissor-indexed-v")
      ("VDPAUFiniNV" . "vdpau-fini-nv")
      ("CreateSyncFromCLeventARB" . "create-sync-from-cl-event-arb")
  ))
  
  (defparameter *whole-words*
  
negative.code:   (loop for line = (read-line stream nil nil)
          while line
          do (multiple-value-bind (match regs)
                 #++(scan-to-strings "^passthru:\\s+.*last updated ([^\\s]+)\\s*"
                                  line)
                 (scan-to-strings "^# \\$Revision:.*\\$Date:\\s+(.*)\\s\\$$"
                                  line)
               (when match (setf *glext-last-updated* (aref regs 0))))
          (multiple-value-bind (match regs)
  