opengl/morphos: added GLUTPositionWindow and GLUTReshapeWindow

packages/opengl/src/tinygl.inc

@@ -275,6 +275,12 @@ syscall sysvbase TinyGLBase 760;
 procedure _GLUTMotionFunc(gcl: pointer; f: TGlut2IntCallback);
 syscall sysvbase TinyGLBase 766;
 
+procedure _GLUTPositionWindow(gcl: pointer; x, y: LongInt);
+syscall sysvbase TinyGLBase 790;
+
+procedure _GLUTReshapeWindow(gcl: pointer; width, height: LongInt);
+syscall sysvbase TinyGLBase 796;
+
 function _GLUTGet(gcl: pointer; t: GLenum): LongInt;
 syscall sysvbase TinyGLBase 802;
 
@@ -877,6 +883,16 @@ begin
   _GLUTMotionFunc(tglContext, f);
 end;
 
+procedure GLUTPositionWindow(x, y: Integer); inline;
+begin
+  _GLUTPositionWindow(tglContext, x, y);
+end;
+
+procedure GLUTReshapeWindow(width, height: Integer); inline;
+begin
+  _GLUTReshapeWindow(tglContext, width, height);
+end;
+
 procedure GLUTPassiveMotionFunc(f: TGlut2IntCallback); inline;
 begin
   _GLUTPassiveMotionFunc(tglContext, f);

packages/opengl/src/tinyglh.inc

@@ -161,6 +161,8 @@ procedure GLUTMouseFunc(f: TGlut4IntCallback); inline;
 procedure GLUTSpecialFunc(f: TGlut3IntCallback); inline;
 procedure GLUTReshapeFunc(f: TGlut2IntCallback); inline;
 procedure GLUTMotionFunc(f: TGlut2IntCallback); inline;
+procedure GLUTPositionWindow(x, y: Integer); inline;
+procedure GLUTReshapeWindow(width, height: Integer); inline;
 procedure GLUTPassiveMotionFunc(f: TGlut2IntCallback); inline;
 
 procedure GLUTSwapBuffers; inline;