anchor.diff:                     :internal-format in-format
                      :generate-mipmaps-p generate-mipmaps-p
                      :width width
  -                   :height height)))
  +                   :height height
  +                   :magnification-filter magnification-filter
  +                   :minification-filter minification-filter)))
   
   
   (define-system-function make-2d-texture graphics-system
  -    (image texture-format &key (generate-mipmaps-p t))
  +    (image texture-format &key
  +           (generate-mipmaps-p t)
  +           (magnification-filter :linear)
  +           (minification-filter :linear))
     (%make-2d-texture 'texture-2d image texture-format
  -                    :generate-mipmaps-p generate-mipmaps-p))
  +                    :generate-mipmaps-p generate-mipmaps-p
  +                    :magnification-filter magnification-filter
  +                    :minification-filter minification-filter))
   
   
   (defun %assign-texture-mipmap-level (image texture level-target level)
  
positive.code:             (gl:generate-mipmap target)
              (gl:tex-parameter target :texture-min-filter :nearest-mipmap-linear))
            (progn
              (gl:tex-parameter target :texture-min-filter :linear)
              (gl:tex-parameter target :texture-max-level (setf (%texture-max-level-of this) 0)))))))
  
  
  (defun %make-2d-texture (class image texture-format &key (generate-mipmaps-p t))
    (let ((ex-format (%pixel-format->external-format (ge.rsc:image-pixel-format image)))
          (in-format (%texture-format->internal-format texture-format))
          (width (ge.rsc:image-width image))
  
negative.code:       (gl:pixel-store :unpack-alignment 1)
        (gl:tex-image-2d target 0 internal-format width height 0 external-format
                         :unsigned-byte (foreign-pointer-of data) :raw t)
        (gl:tex-parameter target :texture-mag-filter magnification-filter)
        (gl:tex-parameter target :texture-base-level 0)
        (if generate-mipmaps-p
            (progn
  