glut_w32s.tem 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051
  1. {
  2. $Id$
  3. Translation of the GLUT headers for FreePascal
  4. Copyright (C) 1999 Sebastian Guenther
  5. Version for static linking in Win32 environment by Alexander Stohr.
  6. Latest change: 1999-11-13
  7. Further information:
  8. GLUT is a powerful toolkit for programming multiplatform OpenGL
  9. applications. It was designed by Mark J. Kilgard while working for SGI,
  10. he is now working for nVidia.
  11. }
  12. { this translation of the c header files is done by Sebastian Guenther 1999 }
  13. { version for static linking for Win32 platforms done by Alexander Stohr 1999 }
  14. {$MODE delphi}
  15. {You have to enable Macros (compiler switch "-Sm") for compiling this unit!
  16. This is necessary for supporting different platforms with different calling
  17. conventions via a single unit.}
  18. unit GLUT; { version which does statically linking }
  19. interface
  20. uses GL;
  21. {x$DEFINE GLUT_GAME} {enable if you need game mode sub api}
  22. {$IFDEF Win32}
  23. {$DEFINE glut_dll := external 'glut32.dll'}
  24. {$DEFINE glut_callback := cdecl}
  25. {$DEFINE extdecl := }
  26. {$ELSE}
  27. {$MESSAGE Unsupported platform.}
  28. {$ENDIF}
  29. %GLUTDeclsIF
  30. %GLUTProcsPS
  31. implementation
  32. {begin{of init}
  33. end.