"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "Graphics/TriD/OpenGLQ/openglq.pd" between
PDL-2.078.tar.gz and PDL-2.079.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

openglq.pd  (PDL-2.078):openglq.pd  (PDL-2.079)
skipping to change at line 47 skipping to change at line 47
#include <OpenGL/glut.h> #include <OpenGL/glut.h>
#else #else
#include <GL/gl.h> #include <GL/gl.h>
#include <GL/glu.h> #include <GL/glu.h>
#include <GL/glut.h> #include <GL/glut.h>
#include <GL/freeglut.h> #include <GL/freeglut.h>
#endif #endif
/* #include <GL/glx.h> */ /* #include <GL/glx.h> */
'); ');
my @internal = (Doc => 'internal', NoPthreading => 1); my @internal = (Doc => 'internal', NoPthread => 1);
pp_def( pp_def(
'gl_spheres', 'gl_spheres',
GenericTypes => $F, GenericTypes => $F,
Pars => 'coords(tri=3,n);', Pars => 'coords(tri=3,n);',
OtherPars => 'double radius; int slices; int stacks;', OtherPars => 'double radius; int slices; int stacks;',
Code => ' Code => '
float oldcoord0 = 0.0, oldcoord1 = 0.0, oldcoord2 = 0.0; float oldcoord0 = 0.0, oldcoord1 = 0.0, oldcoord2 = 0.0;
glPushMatrix(); glPushMatrix();
loop(n) %{ loop(n) %{
 End of changes. 1 change blocks. 
1 lines changed or deleted 1 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)