--- deliantra/Deliantra-Client/Client.xs	2006/08/13 15:14:17	1.135
+++ deliantra/Deliantra-Client/Client.xs	2006/08/13 16:29:36	1.136
@@ -2011,4 +2011,13 @@
 
 void glCallList (int list)
 
+int glX ()
+	CODE:
+        GLdouble m[4][4];
+        glGetDoublev (GL_MODELVIEW_MATRIX, m);
+        printf ("%f %f %f %f\n", m[0][0], m[0][1], m[0][2], m[0][3]);
+        printf ("%f %f %f %f\n", m[1][0], m[1][1], m[1][2], m[1][3]);
+        printf ("%f %f %f %f\n", m[2][0], m[2][1], m[2][2], m[2][3]);
+        printf ("%f %f %f %f\n", m[3][0], m[3][1], m[3][2], m[3][3]);
+        printf ("\n");