(EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
  (DEFINE-MODULE BAN
    (:NICKNAMES #:MODULARIZE.INT.BAN)
    (:EXPORT #:*IMPLEMENTATION* #:IMPLEMENTATION)
    (:EXPORT #:IMPLEMENTED #:JAIL #:LIST #:JAIL-TIME #:RELEASE))
  (MODULARIZE-INTERFACES::EXPAND-INTERFACE "BAN")
  (LET ((#:INTERFACE839 (FIND-PACKAGE "BAN")))
    (SETF (MODULE-STORAGE #:INTERFACE839
                          'MODULARIZE-INTERFACES::INTERFACE-DEFINITION)
            '((DEFINE-HOOK-SWITCH IMPLEMENTED UNIMPLEMENTED NIL)
              (DEFUN JAIL (IP &KEY DURATION)) (DEFUN LIST ())
              (DEFUN JAIL-TIME (&OPTIONAL (IP (REMOTE *REQUEST*))))
              (DEFUN RELEASE (IP))))
    (FUNCALL
     (SETF (MODULE-STORAGE #:INTERFACE839
                           'MODULARIZE-INTERFACES::INTERFACE-RESET)
             #'(LAMBDA ()
                 (MODULARIZE-INTERFACES::EXPAND-COMPONENTS "BAN"
                   (DEFINE-HOOK-SWITCH IMPLEMENTED UNIMPLEMENTED NIL)
                   (DEFUN JAIL (IP &KEY DURATION))
                   (DEFUN LIST ())
                   (DEFUN JAIL-TIME (&OPTIONAL (IP (REMOTE *REQUEST*))))
                   (DEFUN RELEASE (IP))))))
    #:INTERFACE839))