From 0098ddd37f5d1fa2621fbc5f803d23afb7bcb289 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 25 Oct 2014 11:34:20 -0400 Subject: render: Add utils module. * sly/render/utils.scm: New file. * Makefile.am (SOURCES): Add it. --- Makefile.am | 1 + sly/render/utils.scm | 29 +++++++++++++++++++++++++++++ 2 files changed, 30 insertions(+) create mode 100644 sly/render/utils.scm diff --git a/Makefile.am b/Makefile.am index d84c5ac..8d020d0 100644 --- a/Makefile.am +++ b/Makefile.am @@ -53,6 +53,7 @@ SOURCES = \ sly/transition.scm \ sly/window.scm \ sly/joystick.scm \ + sly/render/utils.scm \ sly/render/vertex-array.scm \ sly/render/renderer.scm \ $(WRAPPER_SOURCES) diff --git a/sly/render/utils.scm b/sly/render/utils.scm new file mode 100644 index 0000000..a0748b2 --- /dev/null +++ b/sly/render/utils.scm @@ -0,0 +1,29 @@ +;;; Sly +;;; Copyright (C) 2014 David Thompson +;;; +;;; Sly 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. +;;; +;;; Sly 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 +;;; . + +;;; Commentary: +;; +;; Rendering utilities. +;; +;;; Code: + +(define-module (sly render utils) + #:use-module (oop goops) + #:export (draw)) + +;; Generic method for rendering objects. +(define-generic draw) -- cgit v1.2.3