scilab/modules/m2sci/macros/kernel/sci_generic.sci

   1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   2 // Copyright (C) 2002-2004 - INRIA - Vincent COUVERT
   3 //
   4 // Copyright (C) 2012 - 2016 - Scilab Enterprises
   5 //
   6 // This file is hereby licensed under the terms of the GNU GPL v2.0,
   7 // pursuant to article 5.3.4 of the CeCILL v.2.1.
   8 // This file was originally licensed under the terms of the CeCILL v2.1,
   9 // and continues to be available under such terms.
  10 // For more information, see the COPYING file which you should have received
  11 // along with this program.
  12
  13 function [tree]=sci_generic(tree)
  14     // M2SCI function
  15     // Generic conversion function for unknown Matlab functions
  16     // Input: tree = Matlab funcall tree
  17     // Output: tree = Scilab equivalent for tree
  18
  19     if typeof(tree)=="operation"
  20         tree.out(1).dims=list(-1,-1)
  21         tree.out(1).type=Type(-1,-1)
  22     else
  23         for i=1:size(tree.lhs)
  24             tree.lhs(i).dims=list(-1,-1)
  25             tree.lhs(i).type=Type(-1,-1)
  26         end
  27     end
  28 endfunction