Merge pull request #71 from Oldes/OpenGL

FEAT: OpenGL - WGL, GLX and EGL interfaces
red · Sep 15, 2017 · fe9fdf5 · fe9fdf5
2 parents 2c83df6 + a4f022a
commit fe9fdf5
Show file tree

Hide file tree

Showing 23 changed files with 6,105 additions and 662 deletions.
diff --git a/Library/GLFW/glfw3.reds b/Library/GLFW/glfw3.reds
diff --git a/Library/OpenGL/examples/gl3-triangle-2.reds b/Library/OpenGL/examples/gl3-triangle-2.reds
@@ -29,7 +29,7 @@ GL-context
 #include %../gl3-common.reds ;imports common GL3 functions
 
 ;background color:
-glClearColor as float32! 0.0  as float32! 0.0 as float32! 0.6 as float32! 0.0
+glClearColor .0 .0 .6 .0
 
 VertexArrayID: 0
 glGenVertexArrays 1 :VertexArrayID

diff --git a/Library/OpenGL/examples/gl3-triangle-3.reds b/Library/OpenGL/examples/gl3-triangle-3.reds
@@ -22,14 +22,14 @@ glfwWindowHint GLFW_CONTEXT_VERSION_MINOR 3 ;
 glfwWindowHint GLFW_OPENGL_FORWARD_COMPAT GL_TRUE ;To make MacOS happy; should not be needed
 glfwWindowHint GLFW_OPENGL_PROFILE GLFW_OPENGL_CORE_PROFILE ;We don't want the old OpenGL 
 
-GL-window "GL3 triangle 2 - moving" 800 600
+GL-window "GL3 triangle 3 - moving (GPU)" 800 600
 
 GL-context
 
 #include %../gl3-common.reds ;imports common GL3 functions
 
 ;background color:
-glClearColor as float32! 0.0  as float32! 0.0 as float32! 0.6 as float32! 0.0
+glClearColor .0 .0 .6 .0
 
 VertexArrayID: 0
 glGenVertexArrays 1 :VertexArrayID
@@ -90,7 +90,7 @@ glUseProgram programID
 elapsedTimeUniform: glGetUniformLocation programID "time"
 loopDurationUnf:    glGetUniformLocation programID "loopDuration"
 
-glUniform1f loopDurationUnf as float32! 5.0
+glUniform1f loopDurationUnf 5.0
 
 glUseProgram 0
 

diff --git a/Library/OpenGL/examples/gl3-triangle-4.reds b/Library/OpenGL/examples/gl3-triangle-4.reds
@@ -22,14 +22,14 @@ glfwWindowHint GLFW_CONTEXT_VERSION_MINOR 3 ;
 glfwWindowHint GLFW_OPENGL_FORWARD_COMPAT GL_TRUE ;To make MacOS happy; should not be needed
 glfwWindowHint GLFW_OPENGL_PROFILE GLFW_OPENGL_CORE_PROFILE ;We don't want the old OpenGL 
 
-GL-window "GL3 triangle 2 - moving" 800 600
+GL-window "GL3 triangle 4 - moving + color" 800 600
 
 GL-context
 
 #include %../gl3-common.reds ;imports common GL3 functions
 
 ;background color:
-glClearColor as float32! 0.0  as float32! 0.0 as float32! 0.6 as float32! 0.0
+glClearColor .0 .0 .6 .0
 
 VertexArrayID: 0
 glGenVertexArrays 1 :VertexArrayID
@@ -104,8 +104,8 @@ elapsedTimeUniform: glGetUniformLocation programID "time"
 loopDurationUnf:    glGetUniformLocation programID "loopDuration"
 fragLoopDurUnf:     glGetUniformLocation programID "fragLoopDuration"
 
-glUniform1f loopDurationUnf as float32! 5.0
-glUniform1f fragLoopDurUnf  as float32! 2.5
+glUniform1f loopDurationUnf 5.0
+glUniform1f fragLoopDurUnf  2.5
 
 glUseProgram 0
 

diff --git a/Library/OpenGL/examples/gl3-triangle.reds b/Library/OpenGL/examples/gl3-triangle.reds
@@ -33,7 +33,7 @@ GL-context
 #include %../gl3-common.reds ;imports common GL3 functions
 
 ;background color:
-glClearColor as float32! 0.0  as float32! 0.0 as float32! 0.6 as float32! 0.0
+glClearColor .0 .0 .6 .0
 
 VertexArrayID: 0
 glGenVertexArrays 1 :VertexArrayID