Mercurial > hg > octave-max

changeset 5171:dc706eb5be9f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-03-01 18:01:54 by jwe]
author jwe
date Tue, 01 Mar 2005 18:01:54 +0000
parents b2322bcf4fba
children 9d9bbda4f00c
files libcruft/ChangeLog libcruft/misc/machar.c
diffstat 2 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/libcruft/ChangeLog
+++ b/libcruft/ChangeLog
@@ -1,3 +1,7 @@
+2005-03-01  John W. Eaton  <jwe@octave.org>
+
+	* misc/machar.c (rmachar): Declare local REAL variables volatile.
+
 2005-02-25  John W. Eaton  <jwe@octave.org>
 
 	* blas/zher.f: New file.
--- a/libcruft/misc/machar.c
+++ b/libcruft/misc/machar.c
@@ -123,8 +123,8 @@
 {
       int i,iz,j,k;
       int mx,itmp,nxres;
-      REAL a,b,beta,betain,one,y,z,zero;
-      REAL betah,t,tmp,tmpa,tmp1,two;
+      volatile REAL a,b,beta,betain,one,y,z,zero;
+      volatile REAL betah,two,t,tmp,tmpa,tmp1;
 
       (*irnd) = 1;
       one = (REAL)(*irnd);