Mercurial > octave-nkf

changeset 5767:26f92fb8ba33

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-04-18 15:28:34 by jwe]
author jwe
date Tue, 18 Apr 2006 15:28:34 +0000
parents f3be83cff153
children 412f72146ab5
files libcruft/ChangeLog libcruft/misc/f77-fcn.h
diffstat 2 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/libcruft/ChangeLog	Tue Apr 18 15:18:22 2006 +0000
+++ b/libcruft/ChangeLog	Tue Apr 18 15:28:34 2006 +0000
@@ -1,3 +1,7 @@
+2006-04-18  John W. Eaton  <jwe@octave.org>
+
+	* misc/f77-fcn.h (F77_XFCN): Move decls to beginning of blocks for C.
+
 2006-04-13  John W. Eaton  <jwe@octave.org>
 
 	* misc/quit.h BEGIN_INTERRUPT_IMMEDIATELY_IN_FOREIGN_CODE_1,
--- a/libcruft/misc/f77-fcn.h	Tue Apr 18 15:18:22 2006 +0000
+++ b/libcruft/misc/f77-fcn.h	Tue Apr 18 15:28:34 2006 +0000
@@ -53,8 +53,8 @@
   do \
     { \
       octave_jmp_buf saved_context; \
+      sig_atomic_t saved_octave_interrupt_immediately = octave_interrupt_immediately; \
       f77_exception_encountered = 0; \
-      sig_atomic_t saved_octave_interrupt_immediately = octave_interrupt_immediately; \
       octave_save_current_context (saved_context); \
       if (octave_set_current_context) \
 	{ \