diff --git a/src/GLProgram.cc b/src/GLProgram.cc
index 53c498e..0412506 100644
--- a/src/GLProgram.cc
+++ b/src/GLProgram.cc
@@ -1,7 +1,5 @@
 #include "GLProgram.h"
 #include "GLShader.h"
-#include "ruby.h"
-#include "gl3w.h"
 
 typedef struct
 {
@@ -103,6 +101,13 @@ void GLProgram_Init()
     rb_define_method(ruby_class, "link", (VALUE(*)(...))GLProgram_link, 0);
 }
 
+GLuint GLProgram_GetID(VALUE program)
+{
+    GLProgram * glprogram;
+    Data_Get_Struct(program, GLProgram, glprogram);
+    return glprogram->id;
+}
+
 #if 0
 GLint GLProgram::get_uniform(const std::string & uniform_name)
 {
diff --git a/src/GLProgram.h b/src/GLProgram.h
index 6b2c438..226cc3d 100644
--- a/src/GLProgram.h
+++ b/src/GLProgram.h
@@ -1,6 +1,10 @@
 #ifndef GLPROGRAM_H
 #define GLPROGRAM_H
 
+#include "ruby.h"
+#include "gl3w.h"
+
 void GLProgram_Init();
+GLuint GLProgram_GetID(VALUE program);
 
 #endif