changeset 3742:078fde449ebc

[project @ 2000-11-29 22:58:52 by jwe]
author jwe
date Wed, 29 Nov 2000 22:58:53 +0000
parents b65077dfa1b1
children 35daf9714b9a
files liboctave/Array-idx.h liboctave/Array2-idx.h liboctave/ChangeLog src/ChangeLog src/mkdefs
diffstat 5 files changed, 15 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/Array-idx.h	Wed Nov 29 16:30:03 2000 +0000
+++ b/liboctave/Array-idx.h	Wed Nov 29 22:58:53 2000 +0000
@@ -196,7 +196,7 @@
 	{
 	  int max_idx = lhs_idx.max () + 1;
 	  if (max_idx > lhs_len)
-	    lhs.resize (max_idx, 0.0);
+	    lhs.resize (max_idx, static_cast<LT> (0));
 	}
 
       if (rhs_len == n)
--- a/liboctave/Array2-idx.h	Wed Nov 29 16:30:03 2000 +0000
+++ b/liboctave/Array2-idx.h	Wed Nov 29 22:58:53 2000 +0000
@@ -493,7 +493,7 @@
 	  int new_nr = max_row_idx > lhs_nr ? max_row_idx : lhs_nr; \
 	  int new_nc = max_col_idx > lhs_nc ? max_col_idx : lhs_nc; \
  \
-	  lhs.resize (new_nr, new_nc, 0.0); \
+	  lhs.resize (new_nr, new_nc, static_cast<LT> (0)); \
 	} \
     } \
   while (0)
--- a/liboctave/ChangeLog	Wed Nov 29 16:30:03 2000 +0000
+++ b/liboctave/ChangeLog	Wed Nov 29 22:58:53 2000 +0000
@@ -1,3 +1,8 @@
+2000-11-29  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* Array-idx.h (assign): When resizing, cast fill value to LT.
+	* Array2-idx.h (MAYBE_RESIZE_LHS): Likewise.
+
 2000-11-28  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* MArray-defs.h: Protect against multiple inclusion.
--- a/src/ChangeLog	Wed Nov 29 16:30:03 2000 +0000
+++ b/src/ChangeLog	Wed Nov 29 22:58:53 2000 +0000
@@ -1,5 +1,8 @@
 2000-11-29  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* mkdefs: Read and print one line at a time, so we can force
+	patterns to match only at the beginning of a line.
+
 	* defun-int.h (UNDERSCORIFY): Omit `##' in macro definition since
 	they are not needed to paste strings together and picky compilers
 	choke on them.
--- a/src/mkdefs	Wed Nov 29 16:30:03 2000 +0000
+++ b/src/mkdefs	Wed Nov 29 22:58:53 2000 +0000
@@ -2,11 +2,13 @@
 
 sed -n -e '/^ *BEGIN_INSTALL_BUILTIN/{
   : loop
-  N
+  s/BEGIN_INSTALL_BUILTIN//
+  s/^#[ \t][ \t]*[0-9][0-9]*.*$//
   /END_INSTALL_BUILTIN/b done
+  p
+  n
   b loop
   : done
-  s/BEGIN_INSTALL_BUILTIN//
   s/END_INSTALL_BUILTIN//
   p
-}'
\ No newline at end of file
+}'