Minimal Haskell OpenGL Example causes OpenGL Error -


i toying opengl example , ran problem. minimized 1 of mainstream haskell/opengl examples. windows 10, haskell platform (32-bit 8.0.2-a. positive it's -a variant).

import graphics.ui.glut  main :: io () main =   (_progname, _args) <- getargsandinitialize   _window <- createwindow "hello world"   displaycallback $= display   mainloop  display =   let color3f r g b = color $ color3 r g (b :: glfloat)       vertex3f x y z = vertex $ vertex3 x y (z :: glfloat)   clear [colorbuffer]   renderprimitive points $     -- color3f 1 0 0     -- vertex3f 0 0 0     return ()   -- << error on glend() of renderprimtive >>    flush   reporterrors

facts:

  • i've tried default glut32.dll comes haskell platform (ghc 8.0.2) , tried freeglut. using gdebugger, able determine glend command reports error first (called renderprimtive). no body (vertices or color changes), render issues command makes opengl unhappy (, or empty command generates different error).

  • i tried other primitives lines , example program link above (uses quads).

  • the primitives render correctly on screen error. (but desire error checking own screw ups, false positive bad.)

does have idea how go debugging this? thanks!


Comments

Post a Comment

Popular posts from this blog

Is there a better way to structure post methods in Class Based Views -

i'm using class based views in django , never specify url in ajax calls , omit action parameter in form because know these requests go through post method of class based view. notice view - profile page make many requests depending on user updating on page - post method become convoluted , if/else mess example: def post(self, request, *args, **kwargs): # handle user changing available date if request.post.get('availabledate') != none: self.updateavailabledate(request) return jsonresponse({'result':'success'}) if request.post.get('newprojectname') != none: creative_user = creativeuserprofile.objects.get(id = request.user.id) project = project.create_project(creative_user, request.post['newprojectname']) project.save() return jsonresponse({'projectid': project.id }) if request.post.get('projectimage') != none , request.files['file']: proj...
Read more

What is happening when Matlab is starting a "parallel pool"? -

running parallel cpu processes in matlab starts command parpool() according documentation , function: [creates] special job on pool of workers, , [connects] matlab client parallel pool. this function takes bit of time execute, on order of 30 seconds. in other multi-cpu paradigms openmp, parallel execution seems totally transparent -- i've never noticed behavior analogous matlab (granted i'm not experienced parallel programming). so, happening between time parpool() called , when finishes executing? takes long? parallel computing toolbox enables run matlab code in parallel using several different paradigms (e.g. jobs , tasks, parfor , spmd , parfeval , batch processing), , run either locally (parallelised across cores in local machine) or remotely (parallelised across machines in cluster - either 1 own, or 1 in cloud). in of these cases, code run on matlab workers , copies of matlab without interactive desktop. if you're intending run on remo...
Read more

php - Cannot override Laravel Spark authentication with own implementation -

during login process of laravel spark need request token of remote api. api stores exact same users , passwords laravel spark application. therefore need username , non hashed password of user during authentication process. i thought overriding authenticated method solution problem. in routes/web.php override post /login endpoint , pointing endpoint own logincontroller: <?php namespace app\http\controllers\auth; use illuminate\support\facades\log; use illuminate\http\request; use laravel\spark\http\controllers\auth\logincontroller sparklogincontroller; class logincontroller extends sparklogincontroller { /** * create new login controller instance. * * @return void */ public function __construct() { parent::__construct(); } /** * handle successful authentication attempt. * * @param request $request * @param \illuminate\contracts\auth\authenticatable $user * @return response */ public fu...
Read more