nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

openGL.errors: Add missing errors.

Browse Source
This commit is contained in:
Rod Kay
2025-04-30 12:19:08 +10:00
parent 710fae02e7
commit ad4d1229d5
2 changed files with 20 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
3-mid/opengl/source/opengl-errors.adb
View File

@@ -21,12 +21,16 @@ is
begin
case the_Error
is
when GL.GL_NO_ERROR => return "no error";
when GL_INVALID_ENUM => return "invalid Enum";
when GL_INVALID_VALUE => return "invalid Value";
when GL_INVALID_OPERATION => return "invalid Operation";
when GL_OUT_OF_MEMORY => return "out of Memory";
when others => return "unknown openGL error detected (Code:" & the_Error'Image & ")";
when GL.GL_NO_ERROR => return "no error";
when GL_INVALID_ENUM => return "invalid Enum";
when GL_INVALID_VALUE => return "invalid Value";
when GL_INVALID_OPERATION => return "invalid Operation";
when GL_STACK_OVERFLOW => return "Stack overflow";
when GL_STACK_UNDERFLOW => return "Stack underflow";
when GL_OUT_OF_MEMORY => return "out of Memory";
when GL_INVALID_FRAMEBUFFER_OPERATION => return "invalid framebuffer Operation";
when GL_CONTEXT_LOST => return "Context lost";
when others => return "unknown openGL error detected (Code:" & the_Error'Image & ")";
end case;
end;
end if;
@@ -36,6 +40,7 @@ is
procedure log (Prefix : in String := "")
is
begin