--- ray/src/rt/fprism.c	2004/03/30 16:13:01	2.7
+++ ray/src/rt/fprism.c	2013/08/07 05:10:09	2.9
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char	RCSid[] = "$Id: fprism.c,v 2.7 2004/03/30 16:13:01 schorsch Exp $";
+static const char	RCSid[] = "$Id: fprism.c,v 2.9 2013/08/07 05:10:09 greg Exp $";
 #endif
 /* Ce programme calcule les directions et les energies des rayons lumineux
    resultant du passage d'un rayon au travers d'un vitrage prismatique
@@ -8,6 +8,7 @@ static const char	RCSid[] = "$Id: fprism.c,v 2.7 2004/
 
 #include "standard.h"
 
+#include "ray.h"
 #include "calcomp.h"
 #include "func.h"
 
@@ -775,7 +776,7 @@ l_get_val(
  int val, dir, i, trouve, curseur;
  int nb;
  double valeur;
- TRAYON *rayt, raynull;
+ TRAYON *rayt=NULL, raynull;
  
  if (prismclock < 0 || prismclock < eclock) setprism();
  if (bidon == BADVAL) {