From a4757aef677eac2e991db7e72fecc14a68bb1770 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Sun, 16 Apr 2023 15:11:02 +0200 Subject: Rearrange namespace (guile-osc engine) becomes (open-sound-control server-thread) to better match liblo's types. Later on, we could also have the non-threading server. This also makes the port number into a parameter for make-osc-server-thread. --- open-sound-control/api.scm | 28 ++++++++++++++++++++++++++++ open-sound-control/server-thread.scm | 24 ++++++++++++++++++++++++ 2 files changed, 52 insertions(+) create mode 100644 open-sound-control/api.scm create mode 100644 open-sound-control/server-thread.scm (limited to 'open-sound-control') diff --git a/open-sound-control/api.scm b/open-sound-control/api.scm new file mode 100644 index 0000000..abd837c --- /dev/null +++ b/open-sound-control/api.scm @@ -0,0 +1,28 @@ +;; +;; open-sound-control/api.scm +;; +;; Copyright © 2023 Thomas White +;; +;; This file is part of Guile-OSC. +;; +;; Guile-OSC is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . +;; +(define-module (open-sound-control api) + #:export (make-osc-server-thread + add-osc-method)) + + +(if (not (provided? 'guile-osc)) + (load-extension "libguile-osc" + "init_guile_osc")) diff --git a/open-sound-control/server-thread.scm b/open-sound-control/server-thread.scm new file mode 100644 index 0000000..5ff23e2 --- /dev/null +++ b/open-sound-control/server-thread.scm @@ -0,0 +1,24 @@ +;; +;; open-sound-control/server-thread.scm +;; +;; Copyright © 2023 Thomas White +;; +;; This file is part of Guile-OSC. +;; +;; Guile-OSC is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . +;; +(define-module (open-sound-control server-thread) + #:use-module (open-sound-control api) + #:re-export (make-osc-server-thread + add-osc-method)) -- cgit v1.2.3