10 lines
378 B
Common Lisp
10 lines
378 B
Common Lisp
;;;; cl-scopes/test/etc/config-core - configuration for `scopes-core` tests
|
|
|
|
(in-package :scopes/test-core)
|
|
|
|
(setf *config* (make-instance 'core:config))
|
|
|
|
(make-instance 'core:service-config :parent *config*
|
|
:name :test-receiver
|
|
:start #'(lambda (cfg) (make-instance 'test-receiver :config cfg))
|
|
:actions '(((:test) check-message)))
|