;; These modules should be part of Chicken one day.
;; Then we can remove this file and have it auto-generated by chicken-install
(eval '(import (only chicken receive)))
(##sys#register-compiled-module 'srfi-8 (list) '() (list 'receive) (list))

(eval '(import (only chicken define-record-type)))
(##sys#register-compiled-module
  'srfi-9
  (list)
  '()
  (list 'define-record-type)
  (list))

(eval '(import (only chicken error)))
(##sys#register-compiled-module
  'srfi-23
  (list)
  '((error . #%error))
  (list)
  (list))

(eval '(import
         (only s48-modules include-relative)
         scheme
         srfi-1
         srfi-8
         srfi-9
         srfi-23))
(##sys#register-compiled-module
  '_hermes
  (list)
  '((run-with-error-checking . _hermes#run-with-error-checking)
    (make-resender . _hermes#make-resender)
    (get-handler . _hermes#get-handler)
    (messages-handle . _hermes#messages-handle)
    (messages-parent-lookup . _hermes#messages-parent-lookup)
    (messages-direct-lookup . _hermes#messages-direct-lookup)
    (messages-delete! . _hermes#messages-delete!)
    (messages-add! . _hermes#messages-add!)
    (make-messages . _hermes#make-messages)
    (set-messages-parents! . _hermes#set-messages-parents!)
    (messages-parents . _hermes#messages-parents)
    (set-messages-alist! . _hermes#set-messages-alist!)
    (messages-alist . _hermes#messages-alist)
    (messages? . _hermes#messages?)
    (%make-messages . _hermes#%make-messages)
    (assq-set! . _hermes#assq-set!)
    (make-hermes-object . _hermes#make-hermes-object))
  (list)
  (list))