Renaud Casenave-Péré
53de3d0cf6
regroup opengl version and window creation and event polling in the viewport file. To further clean up the files layout, move input.lisp to engine folder gl-utils is now used for some simple macros
31 lines
834 B
Common Lisp
31 lines
834 B
Common Lisp
#|
|
|
This file is a part of stoe project.
|
|
Copyright (c) 2015 Renaud Casenave-Péré (renaud@casenave-pere.fr)
|
|
|#
|
|
|
|
(uiop:define-package :stoe/engine/render
|
|
(:use :cl :maths :shader
|
|
:stoe/core/utils
|
|
:stoe/core/modules
|
|
:stoe/engine/viewport
|
|
:stoe/engine/scene))
|
|
(in-package :stoe/engine/render)
|
|
|
|
(defun initialize (&optional argv)
|
|
"Initialize the render module.
|
|
Create an opengl context attached to a window."
|
|
(format t "Initialize Render module~%")
|
|
(viewport-initialize argv)
|
|
(compile-all-shaders))
|
|
|
|
(defun finalize ()
|
|
"Finalize the render module.
|
|
Destroy the opengl context and the related resources."
|
|
(format t "Finalize Render module~%")
|
|
(viewport-finalize))
|
|
|
|
(defun update (delta-time)
|
|
(declare (ignore delta-time))
|
|
(during-one-frame))
|
|
|
|
(defmodule stoe/engine/render)
|