mirror of
https://github.com/ebeem/guile-swayer.git
synced 2024-11-16 07:47:32 +01:00
27 lines
653 B
Scheme
27 lines
653 B
Scheme
|
;;; Commentary:
|
||
|
|
|
||
|
|
;;; Code:
|
||
|
|
|
||
|
|
(define-module (swayipc)
|
||
|
|
#:use-module (swayipc connection)
|
||
|
|
#:use-module (swayipc dispatcher)
|
||
|
|
#:use-module (swayipc events)
|
||
|
|
#:use-module (swayipc info)
|
||
|
|
#:use-module (swayipc records))
|
||
|
|
|
||
|
|
(define-syntax re-export-modules
|
||
|
|
(syntax-rules ()
|
||
|
|
((_ (mod ...) ...)
|
||
|
|
(begin
|
||
|
|
(module-use! (module-public-interface (current-module))
|
||
|
|
(resolve-interface '(mod ...)))
|
||
|
|
...))))
|
||
|
|
|
||
|
|
(re-export-modules (swayipc connection)
|
||
|
|
(swayipc dispatcher)
|
||
|
|
(swayipc events)
|
||
|
|
(swayipc info)
|
||
|
|
(swayipc records))
|
||
|
|
|
||
|
|
;;; (swayipc) ends here
|