anchor.diff:        :type double-float)
        (font-matrix
         :allocation :virtual 
  -      :getter "cairo_get_font_matrix"
  +      :getter font-matrix
         :setter "cairo_set_font_matrix"
  -      :accessor font-matrix
  +      :writer (setf font-matrix)
         :type matrix)
        (font-options
         :allocation :virtual 
  -      :getter "cairo_get_font_options"
  +      :getter font-options
         :setter "cairo_set_font_options"
  -      :accessor font-options
  +      :writer (setf font-options)
         :type font-options)
        (font-face
         :allocation :virtual 
  
positive.code:       :setter "cairo_set_font_face"
        :accessor font-face
        :type font-face)
       (operator
        :allocation :virtual 
        :getter "cairo_get_operator"
  
negative.code: ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  
  ;; $Id: cairo.lisp,v 1.19 2007-12-02 14:50:41 espen Exp $
  
  (in-package "CAIRO")
  
  