# HG changeset patch
# User jwe
# Date 847165970 0
# Node ID 3db30620918e00d9597b3420915e1c2ba3d93ed7
# Parent  760f56d484caf98c3d18374b20ed603320f5d4bd
[project @ 1996-11-05 03:52:10 by jwe]

diff --git a/liboctave/CmplxQRP.cc b/liboctave/CmplxQRP.cc
--- a/liboctave/CmplxQRP.cc
+++ b/liboctave/CmplxQRP.cc
@@ -145,7 +145,7 @@
 	(*current_liboctave_error_handler) ("unrecoverable error in zungqr");
       else
 	{
-	  q = ComplexMatrix (tmp_data, m, m);
+	  q = A_fact;
 	  q.resize (m, n2);
 	}
     }
diff --git a/liboctave/dbleQRP.cc b/liboctave/dbleQRP.cc
--- a/liboctave/dbleQRP.cc
+++ b/liboctave/dbleQRP.cc
@@ -140,7 +140,7 @@
 	(*current_liboctave_error_handler) ("unrecoverable error in dorgqr");
       else
 	{
-	  q = Matrix (tmp_data, m, m);
+	  q = A_fact;
 	  q.resize (m, n2);
 	}
     }
diff --git a/src/ov.h b/src/ov.h
--- a/src/ov.h
+++ b/src/ov.h
@@ -365,7 +365,7 @@
 
   void print (bool pr_as_read_syntax = false);
 
-  virtual void print (ostream& os, bool pr_as_read_syntax)
+  virtual void print (ostream& os, bool pr_as_read_syntax = false)
     { rep->print (os, pr_as_read_syntax); }
 
   void print_with_name (const string& name, bool print_padding = true);
diff --git a/src/pt-const.h b/src/pt-const.h
--- a/src/pt-const.h
+++ b/src/pt-const.h
@@ -323,7 +323,7 @@
   void decrement (void) { val.decrement (); }
 
   void print (void);
-  void print (ostream& os, bool pr_as_read_syntax)
+  void print (ostream& os, bool pr_as_read_syntax = false)
     { val.print (os, pr_as_read_syntax); }
 
   void print_with_name (const string& name, bool print_padding = true);