Fix SuSe build from Nelson

[sxemacs] / src / ent / ent-gaussian.c

diff --git a/src/ent/ent-gaussian.c b/src/ent/ent-gaussian.c
index ea8e8ef..be9dc14 100644 (file)
--- a/src/ent/ent-gaussian.c
+++ b/src/ent/ent-gaussian.c
@@ -26,6 +26,9 @@ along with this program.  If not, see <http://www.gnu.org/licenses/>. */
 #include "lisp.h"
 #include "sysproc.h"    /* For qxe_getpid */
 
+#include "ent.h"
+#include "ent-float.h"
+#include "ent-mpfr.h"
 #include "ent-gaussian.h"
 #ifdef HAVE_MPC
 #include "ent-mpc.h"
@@ -135,7 +138,7 @@ Bufbyte *bigg_to_string(bigg g, int base)
        Bufbyte *intg_str;
        Bufbyte *imag_str;
        int intg_len, imag_len;
-        int sign, neg;
+       int sign, neg;
 
        intg_str = (Bufbyte*)bigz_to_string(bigg_re(g), base);
        imag_str = (Bufbyte*)bigz_to_string(bigg_im(g), base);
@@ -205,7 +208,7 @@ void bigg_set_bigz_bigz(bigg g, bigz z1, bigz z2)
 
 /* void bigc_set_bigg(bigc c, bigg g)
  * {
- *     bigc_set_bigfr_bigfr(bigg_re(g), z1);
+ *     bigc_set_bigfr_bigfr(bigg_re(g), z1);
  * }
  */
 
@@ -454,7 +457,7 @@ Lisp_Object read_bigg_string(char *cp)
                /* jump over a leading minus */
                cp++;
        }
-               
+
        while ((*cp >= '0' && *cp <= '9'))
                cp++;