# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1363335450 14400
# Node ID 62791b1f06cb31f985cc5e9443e2a2811d0e5290
# Parent  0723ea02dcdbffa958de813dec978f024340eea5
* ax_blas_f77_func.m4: Correct expression to generate 2^32.

diff -r 0723ea02dcdb -r 62791b1f06cb m4/ax_blas_f77_func.m4
--- a/m4/ax_blas_f77_func.m4	Fri Mar 15 04:14:09 2013 -0400
+++ b/m4/ax_blas_f77_func.m4	Fri Mar 15 04:17:30 2013 -0400
@@ -150,9 +150,9 @@
       real s,a(1),b(1),sdot
       a(1) = 1.0
       b(1) = 1.0
-c Generate -2**33 + 1, if possible
+c Generate -2**32 + 1, if possible
       n = 2
-      n = -4 * (n ** 30)
+      n = -4 ** (n ** 30)
       n = n + 1
       if (n >= 0) goto 1
 c This means we're on 64-bit integers. Check whether the BLAS is, too.