[Octave-cvsupdate] SF.net SVN: octave:[7836] trunk/octave-forge/main/control/devel

[<par...@us...>]

Revision: 7836
          http://octave.svn.sourceforge.net/octave/?rev=7836&view=rev
Author:   paramaniac
Date:     2010-10-10 10:21:50 +0000 (Sun, 10 Oct 2010)

Log Message:
-----------
control: remove unused argument

Modified Paths:
--------------
    trunk/octave-forge/main/control/devel/@frd/__set__.m
    trunk/octave-forge/main/control/devel/@frd/frd.m
    trunk/octave-forge/main/control/devel/__adjust_frd_data__.m

Modified: trunk/octave-forge/main/control/devel/@frd/__set__.m
===================================================================
--- trunk/octave-forge/main/control/devel/@frd/__set__.m	2010-10-10 10:08:25 UTC (rev 7835)
+++ trunk/octave-forge/main/control/devel/@frd/__set__.m	2010-10-10 10:21:50 UTC (rev 7836)
@@ -26,12 +26,12 @@
 
   switch (prop)  # {<internal name>, <user name>}
     case {"h", "r", "resp", "response"}
-      val = __adjust_frd_data__ (val, sys.w, 0);
+      val = __adjust_frd_data__ (val, sys.w);
       __frd_dim__ (val, sys.w);
       sys.H = val;
 
     case {"w", "f", "freq", "frequency"}
-      [jnk, val] = __adjust_frd_data__ (sys.H, val, 0);  ## TODO: use [~, val] for octave 3.4
+      [jnk, val] = __adjust_frd_data__ (sys.H, val);  ## TODO: use [~, val] for octave 3.4
       __frd_dim__ (sys.H, val);
       sys.w = val;
 

Modified: trunk/octave-forge/main/control/devel/@frd/frd.m
===================================================================
--- trunk/octave-forge/main/control/devel/@frd/frd.m	2010-10-10 10:08:25 UTC (rev 7835)
+++ trunk/octave-forge/main/control/devel/@frd/frd.m	2010-10-10 10:21:50 UTC (rev 7836)
@@ -85,7 +85,7 @@
 
   endswitch
 
-  [H, w, tsam] = __adjust_frd_data__ (H, w, tsam);
+  [H, w] = __adjust_frd_data__ (H, w);
 
   [p, m] = __frd_dim__ (H, w);
 

Modified: trunk/octave-forge/main/control/devel/__adjust_frd_data__.m
===================================================================
--- trunk/octave-forge/main/control/devel/__adjust_frd_data__.m	2010-10-10 10:08:25 UTC (rev 7835)
+++ trunk/octave-forge/main/control/devel/__adjust_frd_data__.m	2010-10-10 10:21:50 UTC (rev 7836)
@@ -23,7 +23,7 @@
 ## Created: October 2010
 ## Version: 0.1
 
-function [H, w, tsam] = __adjust_frd_data__ (H, w, tsam);
+function [H, w] = __adjust_frd_data__ (H, w);
 
   w = reshape (w, [], 1);
   lw = length (w);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.