"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

---