fix and test glIsProgram