--- a/liboctave/CmplxQR.cc
+++ b/liboctave/CmplxQR.cc
@@ -1,7 +1,7 @@
 //                                        -*- C++ -*-
 /*
 
-Copyright (C) 1992, 1993, 1994 John W. Eaton
+Copyright (C) 1992, 1993, 1994, 1995 John W. Eaton
 
 This file is part of Octave.
 
@@ -81,15 +81,15 @@
     }
   else
     {
-      int m2;
+      int n2;
       if (qr_type == QR::economy && m > n)
 	{
-	  m2 = n;
+	  n2 = n;
 	  r.resize (n, n, 0.0);
 	}
       else
 	{
-	  m2 = m;
+	  n2 = m;
 	  r.resize (m, n, 0.0);
 	}
 
@@ -107,6 +107,7 @@
 			&lwork, &info);
 
       q = ComplexMatrix (tmp_data, m, m);
+      q.resize (m, n2);
 
       delete [] tau;
       delete [] work;