Fix using wrong OpenGL functions on shader compilation error

Author: cschreib

CMakeLists.txt

@@ -294,7 +294,6 @@ if(CMAKE_SYSTEM_NAME MATCHES "Emscripten")
     # target_compile_options(lxgui PUBLIC "SHELL:-s INITIAL_MEMORY=200MB")
 
     target_link_options(lxgui PUBLIC "SHELL:-s DISABLE_EXCEPTION_CATCHING=0")
-    target_link_options(lxgui PUBLIC "SHELL:-s MAX_WEBGL_VERSION=3")
     # Debugging options that can be added:
     # target_link_options(lxgui PUBLIC "SHELL:-s ASSERTIONS=2")
     # target_link_options(lxgui PUBLIC "SHELL:-s SAFE_HEAP=1")

impl/gui/gl/CMakeLists.txt

@@ -35,6 +35,7 @@ else()
     target_link_options(lxgui-gui-gl PUBLIC "SHELL:-s USE_LIBPNG=1")
     target_link_options(lxgui-gui-gl PUBLIC "SHELL:-s USE_FREETYPE=1")
     target_link_options(lxgui-gui-gl PUBLIC "SHELL:-s MIN_WEBGL_VERSION=2")
+    target_link_options(lxgui-gui-gl PUBLIC "SHELL:-s MAX_WEBGL_VERSION=2")
 endif()
 
 file(GLOB files ${PROJECT_SOURCE_DIR}/include/lxgui/impl/gui_gl*.hpp)

impl/gui/gl/src/gui_gl_renderer.cpp

@@ -337,15 +337,15 @@ GLuint create_shader(GLenum type, const char* shader_source) {
     glCompileShader(shader);
 
     // Check sucess
-    GLint compiled = 0;
+    GLint compiled = GL_FALSE;
     glGetShaderiv(shader, GL_COMPILE_STATUS, &compiled);
-    if (compiled == 0) {
+    if (compiled == GL_FALSE) {
         GLint info_length = 0;
-        glGetProgramiv(shader, GL_INFO_LOG_LENGTH, &info_length);
+        glGetShaderiv(shader, GL_INFO_LOG_LENGTH, &info_length);
 
         std::vector<char> error_message(std::max(1, info_length), '\0');
         if (info_length > 1) {
-            glGetProgramInfoLog(shader, info_length, NULL, error_message.data());
+            glGetShaderInfoLog(shader, info_length, NULL, error_message.data());
         }
 
         glDeleteShader(shader);

impl/gui/sdl/CMakeLists.txt

@@ -36,6 +36,7 @@ else()
     target_link_options(lxgui-gui-sdl PUBLIC "SHELL:-s SDL2_IMAGE_FORMATS='[\"png\"]'")
     target_link_options(lxgui-gui-sdl PUBLIC "SHELL:-s USE_SDL_TTF=2")
     target_link_options(lxgui-gui-sdl PUBLIC "SHELL:-s MIN_WEBGL_VERSION=1")
+    target_link_options(lxgui-gui-sdl PUBLIC "SHELL:-s MAX_WEBGL_VERSION=2")
 endif()
 
 file(GLOB files ${PROJECT_SOURCE_DIR}/include/lxgui/impl/gui_sdl*.hpp)

impl/input/sdl/CMakeLists.txt

@@ -24,12 +24,9 @@ else()
     target_compile_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL=2")
     target_compile_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL_IMAGE=2")
     target_compile_options(lxgui-input-sdl PUBLIC "SHELL:-s SDL2_IMAGE_FORMATS='[\"png\"]'")
-    target_compile_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL_TTF=2")
     target_link_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL=2")
     target_link_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL_IMAGE=2")
     target_link_options(lxgui-input-sdl PUBLIC "SHELL:-s SDL2_IMAGE_FORMATS='[\"png\"]'")
-    target_link_options(lxgui-input-sdl PUBLIC "SHELL:-s USE_SDL_TTF=2")
-    target_link_options(lxgui-input-sdl PUBLIC "SHELL:-s MIN_WEBGL_VERSION=1")
 endif()
 
 install(FILES ${PROJECT_SOURCE_DIR}/include/lxgui/impl/input_sdl_source.hpp