X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=hacks%2Fglx%2Fdxf2gl.pl;h=b2d334bdef1c79490a6c2dd9e1a3d967ce1cfd87;hb=488f2fa8fbdbc77e91a70da2962d73af49e6cace;hp=69e9a4c3ef4454e05598f1b27e930383a8bc8528;hpb=40eacb5812ef7c0e3374fb139afbb4f5bc8bbfb5;p=xscreensaver

diff --git a/hacks/glx/dxf2gl.pl b/hacks/glx/dxf2gl.pl
index 69e9a4c3..b2d334bd 100755
--- a/hacks/glx/dxf2gl.pl
+++ b/hacks/glx/dxf2gl.pl
@@ -29,7 +29,7 @@ use diagnostics;
 use strict;
 
 my $progname = $0; $progname =~ s@.*/@@g;
-my $version = q{ $Revision: 1.1 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/;
+my $version = q{ $Revision: 1.2 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/;
 
 my $verbose = 0;
 
@@ -335,7 +335,7 @@ sub generate_c {
   my $code = '';
 
   $code .= "#include \"gllist.h\"\n";
-  $code .= "static float data[]={\n";
+  $code .= "static const float data[]={\n";
 
   my $npoints = ($#points + 1) / 3;
   my $nfaces = $npoints / 3;
@@ -422,9 +422,9 @@ sub generate_c {
 
   $code =~ s/,\n$//s;
   $code .= "\n};\n";
-  $code .= "static struct gllist frame={";
+  $code .= "static const struct gllist frame={";
   $code .= "$format,$primitive,$npoints,data,NULL};\n";
-  $code .= "struct gllist *$token=&frame;\n";
+  $code .= "const struct gllist *$token=&frame;\n";
 
   print STDERR "$progname: $filename: " .
                (($#points+1)/3) . " points, " .