Index: mttroot/mtt/bin/trans/make_ode2odes
==================================================================
--- mttroot/mtt/bin/trans/make_ode2odes
+++ mttroot/mtt/bin/trans/make_ode2odes
@@ -7,10 +7,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.54  2001/03/27 01:14:27  geraint
+## Improved determination of Octave version.
+##
 ## Revision 1.53  2001/03/21 03:24:59  geraint
 ## Calculate inputs before outputs (.cc).
 ##
 ## Revision 1.52  2001/03/19 02:28:52  geraint
 ## Branch merge: merging-ode2odes-exe back to MAIN.
@@ -318,18 +321,21 @@
 # get octave version
 case `$MATRIX --version | awk -F\. '{print $2}'` in
     0) # stable
 	vector_value=vector_value
 	feval_header=toplev.h
+	save_ascii_data_function=save_ascii_data
 	;;
     1) # development
 	vector_value=column_vector_value
 	feval_header=parse.h
+	save_ascii_data_function=save_ascii_data_for_plotting
 	;;
     *)
 	vector_value=column_vector_value
 	feval_header=parse.h
+	save_ascii_data_function=save_ascii_data_for_plotting
 	;;
 esac
 
 cat <<EOF  > $filename
 #include <octave/oct.h>
@@ -649,11 +655,11 @@
   static int row;
 
   if (dump_data)
     {
        Matrix written_data = data.extract (0, 0, row-1, data.cols ()-1);
-       save_ascii_data_for_plotting (file, written_data, "MTT_data");
+       $save_ascii_data_function (file, written_data, "MTT_data");
        return;
     }
 
   const int nx = x.length (), ny = y.length ();
   register int col = 0;
@@ -671,11 +677,11 @@
   row++;
 
   if (nrows == row)
     {
 #ifdef STANDALONE
-      save_ascii_data_for_plotting (file, data, "MTT_data");
+      $save_ascii_data_function (file, data, "MTT_data");
 //    cout << data << endl;
 #else // ! STANDALONE
   set_global_value ("MTT_data", data);
 #endif
     }