anchor.diff:            (len (array-total-size a)))
         (lambda ()
           (if (< i len)
  -            (values (row-major-aref a (post-incf i)) t)
  +            (values (row-major-aref a (finc i)) t)
               (end-iteration)))))
   
     (:method ((h hash-table))
  
positive.code:     (let ((i 0))
        (lambda ()
          (if (< i (length s))
              (values (elt s (post-incf i)) t)
              (end-iteration)))))
  
    (:method ((a array))
  
negative.code: (uiop:define-package :liter/base
    (:use :cl :iterate)
    (:import-from :serapeum
                  #:define-do-macro
                  #:finc)
    (:export #:get-iterator
             #:make-hash-key-iterator
             #:make-hash-value-iterator
  