I’ve been fighting with the fglCallLists function
in Compaq Visual Fortran using QuickWin. Below is some test code that I’ve been experimenting with.
subroutine oglUtilRenderText(str, len)
use dfopngl
use dfwin
use dflib
implicit none
character*() str
integer4 len
call fwglUseFontBitmaps(
GetDC(GetHWndQQ(QWIN$FRAMEWINDOW)),
0, 255, 1000)
call fglListBase(1000)
call fglPushMatrix()
call fglCallLists(len, GL_UNSIGNED_BYTE, str)
call fglPopMatrix()
return
end
The compiler error I am getting is: Error: The type of the actual argument differs from the type of the dummy argument. [STR]
I’ve tried everything I can think of in place of “str” (e.g., hardcoded arguments like… ‘Hello’ 'Hello’C “Hello” "Hello"C). I’ve also tried various types of fortran arrays.
Any suggestions?
Thanks,
-ed