918 

   918 

   919     // doesn't seem to print >256 chars

   919     // doesn't seem to print >256 chars

   920     AddFileLogRaw(PChar(glGetString(GL_EXTENSIONS)));

   920     AddFileLogRaw(PChar(glGetString(GL_EXTENSIONS)));

   921 {$ELSE}

   921 {$ELSE}

   922     AddFileLog('  \----- Extensions: ');

   922     AddFileLog('  \----- Extensions: ');

   923     // fetch extentions and store them in string

   924     // fetch extentions and store them in string

   924     tmpstr := StrPas(PChar(glGetString(GL_EXTENSIONS)));

   925     tmpstr := StrPas(PChar(glGetString(GL_EXTENSIONS)));

   925     tmpn := WordCount(tmpstr, [' ']);

   926     tmpn := WordCount(tmpstr, [' ']);

   926     tmpint := 1;

   927     tmpint := 1;

   927 

   928