anchor.diff:  
   (deferror make-tex-array-not-match-type2 () (element-type initial-contents)
       "CEPL - make-texture: Trying to make texture with an element-type of ~s,
  -however the initial-contents provided do not seem to be compatible:~%~s"
  +however, the initial-contents provided do not seem to be compatible:~%~s"
     element-type initial-contents)
   
   (deferror image-format->lisp-type-failed () (type-name)
  -    "CEPL - make-texture: to find a conversion from the image-format ~s to a lisp type"
  +    "CEPL - make-texture: to find a conversion from the image-format ~s to a Lisp type"
     type-name)
   
   (deferror lisp-type->image-format-failed () (type-name)
  -    "CEPL - make-texture: to find a suitable conversion from the lisp type ~s to an
  +    "CEPL - make-texture: to find a suitable conversion from the Lisp type ~s to an
   internal texture format"
     type-name)
   
  
positive.code:   (let ((unknown-keys (remove-if (lambda (x) (member x varjo:*stage-types*))
                                   keys)))
      (if unknown-keys
          (format nil "The following stages are not supported, or are incorrectly named ~a"
                  unknown-keys)
          (format nil "The order of the following stages is incorrect:~%~s~%Valid order of stages is ~a"
                  keys varjo:*stage-types*))))
  
  (deferror invalid-compose-gpipe-form () (pipeline-name clauses)
  
negative.code: 
  args: ~s
  
  You have passed a cube-map texture without an attachment number; this
  means you want the fbo to have 6 color attachments which are bound to the
  faces of the cube texture.
  
  Whilst using this feature, the only other legal argument is depth
  attachment info.
  " args)
  
  