changeset 1704:e5b992746eba octave-forge

Fix test for 'inline function'
author pkienzle
date Wed, 08 Sep 2004 14:07:22 +0000
parents f09eab8bea5a
children 2ffc6e4e8102
files main/image/qtdecomp.m
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/main/image/qtdecomp.m	Wed Sep 08 13:58:38 2004 +0000
+++ b/main/image/qtdecomp.m	Wed Sep 08 14:07:22 2004 +0000
@@ -124,8 +124,8 @@
       ## restrictive and don't need it at all.
     endif
     
-  elseif (strcmp(typeinfo(p1),"function handle") || \
-	  (isstr(p1) && strncmp(p1, "inline_func", 11)))
+  elseif strcmp(typeinfo(p1),"function handle") ...
+  	  || strcmp(typeinfo(p1),"inline function")
     ## function handles seem to return true to isscalar
     fun=p1;
     decision_method=2;
@@ -300,6 +300,9 @@
 
 %
 % $Log$
+% Revision 1.5  2004/09/08 14:07:22  pkienzle
+% Fix test for 'inline function'
+%
 % Revision 1.4  2004/08/11 19:52:41  jmones
 % qtsetblk added
 %