Mercurial > octave-nkf

changeset 447:370fabbab42b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-06-03 20:40:42 by jwe]
author jwe
date Fri, 03 Jun 1994 20:40:42 +0000
parents d60d1658ea12
children 24ef480d8571
files scripts/general/rem.m
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/rem.m	Fri Jun 03 20:32:43 1994 +0000
+++ b/scripts/general/rem.m	Fri Jun 03 20:40:42 1994 +0000
@@ -1,4 +1,4 @@
-# Copyright (C) 1993 John W. Eaton
+# Copyright (C) 1993, 1994 John W. Eaton
 # 
 # This file is part of Octave.
 # 
@@ -26,8 +26,8 @@
     error ("usage: rem (x, y)");
   endif
 
-  if (any (size (x) != size (y)))
-    error ("rem: argument sizes must agree")
+  if (any (size (x) != size (y)) && ! (is_scalar (x) || is_scalar (y)))
+    error ("rem: argument sizes must agree");
   endif
 
 # Matlab allows complex arguments, but as far as I can tell, that's a