Revert "* Bug #11996 fixed - Extend eye() to hypermatrix." 63/13263/1
Vincent COUVERT [Thu, 28 Nov 2013 14:43:45 +0000 (15:43 +0100)]
This reverts commit ad8236ca5e2af3a06d1e8ae079788fd4b88ac6bc.

Change-Id: Icdc8477423d8b95c7957f68bc23730d5e58aa1bc

scilab/CHANGES_5.5.X
scilab/modules/elementary_functions/sci_gateway/fortran/sci_f_eye.f
scilab/modules/overloading/macros/%hm_eye.sci [deleted file]
scilab/modules/overloading/tests/nonreg_tests/bug_11996.dia.ref [deleted file]
scilab/modules/overloading/tests/nonreg_tests/bug_11996.tst [deleted file]

index 7c73e18..54037e8 100644 (file)
@@ -137,8 +137,6 @@ Scilab Bug Fixes
 
 * Bug #11680 fixed - GUI functions in Scilab 5.4.X were much slower than in Scilab 5.3.3.
 
-* Bug #11996 fixed - eye extended to hypermatrix.
-
 * Bug #12334 fixed - Mark color in legend was invalid.
 
 * Bug #12485 fixed - xchange returned bad values with log scale.
index 0520870..0e939e8 100644 (file)
@@ -24,8 +24,7 @@ c
          return
       endif
       if(rhs.gt.2) then
-         call setfunnam(ids(1,pt+1),'%hm_eye',7)
-         fun=-1
+         call error(42)
          return
       endif
 
diff --git a/scilab/modules/overloading/macros/%hm_eye.sci b/scilab/modules/overloading/macros/%hm_eye.sci
deleted file mode 100644 (file)
index 9dcb1bd..0000000
+++ /dev/null
@@ -1,21 +0,0 @@
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2013 - Scilab Enterprises - Charlotte HECQUET
-//
-// This file must be used under the terms of the CeCILL.
-// This source file is licensed as described in the file COPYING, which
-// you should have received as part of this distribution.  The terms
-// are also available at
-// http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
-
-function M=%hm_eye(varargin)
-    nv=size(varargin);
-    for k=1:nv
-        if (type(varargin(k)) <> 1 & type(varargin(k)) <> 8) | size(varargin(k), "*") <> 1 then
-            error(msprintf(_("%s: Wrong type for input argument #%d: An integer value expected.\n"), "eye", k))
-        end
-        dims(k)=int(varargin(k));
-    end
-
-    A=[1, dims(3:$)'];
-    M = matrix(repmat(eye(dims(1), dims(2)), A), dims);
-endfunction
diff --git a/scilab/modules/overloading/tests/nonreg_tests/bug_11996.dia.ref b/scilab/modules/overloading/tests/nonreg_tests/bug_11996.dia.ref
deleted file mode 100644 (file)
index 1c53fa7..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2013 - Scilab Enterprises - Charlotte HECQUET
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-// <-- Non-regression test for bug 11996 -->
-//
-// <-- Bugzilla URL -->
-// http://bugzilla.scilab.org/show_bug.cgi?id=11996
-//
-// <-- Short Description -->
-// Extend eye() to hypermatrix
-ref(:,:,1,1) = eye(6,6);
-ref(:,:,2,2) = eye(6,6);
-ref(:,:,2,1) = eye(6,6);
-ref(:,:,1,2) = eye(6,6);
-assert_checkequal(eye(6,6,2,2), ref);
diff --git a/scilab/modules/overloading/tests/nonreg_tests/bug_11996.tst b/scilab/modules/overloading/tests/nonreg_tests/bug_11996.tst
deleted file mode 100644 (file)
index f3b26cc..0000000
+++ /dev/null
@@ -1,20 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2013 - Scilab Enterprises - Charlotte HECQUET
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-
-// <-- Non-regression test for bug 11996 -->
-//
-// <-- Bugzilla URL -->
-// http://bugzilla.scilab.org/show_bug.cgi?id=11996
-//
-// <-- Short Description -->
-// Extend eye() to hypermatrix
-
-ref(:,:,1,1) = eye(6,6);
-ref(:,:,2,2) = eye(6,6);
-ref(:,:,2,1) = eye(6,6);
-ref(:,:,1,2) = eye(6,6);
-assert_checkequal(eye(6,6,2,2), ref);