floss/stoe
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

By default use simple-shader

Browse source
This commit is contained in:
Renaud Casenave-Péré 2015-08-28 22:19:35 +02:00
parent 7c077ebe68
commit a2806bc83a
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
engine/render.lisp
View file

@ -55,7 +55,7 @@ Destroy the opengl context and the related resources."
(setf frames-counter 0))))
(defun render-single-mesh (mesh transform)
(using-program (program 'blue-shader)
(using-program (program 'simple-shader)
(with-locations (model-to-camera camera-to-clip) program
(let ((mtc (m* (view (get-current-camera)) transform))
(ctc (projection (get-current-camera))))