#file #line directives

This commit is contained in:
Ginger Bill
2016-09-15 00:53:00 +01:00
parent bd365e5176
commit b6cb4f4d14
7 changed files with 113 additions and 73 deletions
+19 -19
View File
@@ -27,23 +27,23 @@ TEXTURE_MIN_FILTER :: 0x2801
TEXTURE_WRAP_S :: 0x2802
TEXTURE_WRAP_T :: 0x2803
clear :: proc(mask: u32) #foreign "glClear"
clear_color :: proc(r, g, b, a: f32) #foreign "glClearColor"
begin :: proc(mode: i32) #foreign "glBegin"
end :: proc() #foreign "glEnd"
color3f :: proc(r, g, b: f32) #foreign "glColor3f"
color4f :: proc(r, g, b, a: f32) #foreign "glColor4f"
vertex2f :: proc(x, y: f32) #foreign "glVertex2f"
vertex3f :: proc(x, y, z: f32) #foreign "glVertex3f"
tex_coord2f :: proc(u, v: f32) #foreign "glTexCoord2f"
load_identity :: proc() #foreign "glLoadIdentity"
ortho :: proc(left, right, bottom, top, near, far: f64) #foreign "glOrtho"
blend_func :: proc(sfactor, dfactor: i32) #foreign "glBlendFunc"
enable :: proc(cap: i32) #foreign "glEnable"
disable :: proc(cap: i32) #foreign "glDisable"
gen_textures :: proc(count: i32, result: ^u32) #foreign "glGenTextures"
tex_parameteri :: proc(target, pname, param: i32) #foreign "glTexParameteri"
tex_parameterf :: proc(target: i32, pname: i32, param: f32) #foreign "glTexParameterf"
bind_texture :: proc(target: i32, texture: u32) #foreign "glBindTexture"
tex_image2d :: proc(target, level, internal_format, width, height, border, format, _type: i32, pixels: rawptr) #foreign "glTexImage2D"
Clear :: proc(mask: u32) #foreign "glClear"
ClearColor :: proc(r, g, b, a: f32) #foreign "glClearColor"
Begin :: proc(mode: i32) #foreign "glBegin"
End :: proc() #foreign "glEnd"
Color3f :: proc(r, g, b: f32) #foreign "glColor3f"
Color4f :: proc(r, g, b, a: f32) #foreign "glColor4f"
Vertex2f :: proc(x, y: f32) #foreign "glVertex2f"
Vertex3f :: proc(x, y, z: f32) #foreign "glVertex3f"
TexCoord2f :: proc(u, v: f32) #foreign "glTexCoord2f"
LoadIdentity :: proc() #foreign "glLoadIdentity"
Ortho :: proc(left, right, bottom, top, near, far: f64) #foreign "glOrtho"
BlendFunc :: proc(sfactor, dfactor: i32) #foreign "glBlendFunc"
Enable :: proc(cap: i32) #foreign "glEnable"
Disable :: proc(cap: i32) #foreign "glDisable"
GenTextures :: proc(count: i32, result: ^u32) #foreign "glGenTextures"
TexParameteri :: proc(target, pname, param: i32) #foreign "glTexParameteri"
TexParameterf :: proc(target: i32, pname: i32, param: f32) #foreign "glTexParameterf"
BindTexture :: proc(target: i32, texture: u32) #foreign "glBindTexture"
TexImage2D :: proc(target, level, internal_format, width, height, border, format, _type: i32, pixels: rawptr) #foreign "glTexImage2D"