syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Rotations had the wrong sign

This commit is contained in:
Tony Garnock-Jones 2016-10-08 17:34:48 -04:00
parent d1c858a7ae
commit 0f3db4eac6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/syndicate-gl/2d.rkt
View File

@ -214,7 +214,7 @@
(match instr
[`(rotate ,(? number? deg))
(values `(glRotated ,deg 0 0 -1)
(compose-transformation xform (rotation-transformation deg)))]
(compose-transformation xform (rotation-transformation (- deg))))]
[`(scale ,(? number? x) ,(? number? y))
(values `(glScaled ,x ,y 1)
(compose-transformation xform (stretching-transformation x y)))]