List extraction fixed.
[scilab.git] / scilab / modules / types / sci_gateway / cpp / sci_tlist_or_mlist.hxx
index 0317dd4..b37043a 100644 (file)
@@ -55,38 +55,12 @@ Function::ReturnValue sci_tlist_or_mlist(typed_list &in, int _piRetCount, typed_
         return Function::Error;
     }
 
-    //first string is the tlist type
-    list<wstring> fieldNames;
-    for (int i = 1 ; i < pS->getSize() ; i++)
-    {
-        list<wstring>::iterator it;
-        for (it = fieldNames.begin() ; it != fieldNames.end() ; it++)
-        {
-            if (*it == wstring(pS->get(i)))
-            {
-                char* pstFunName = wide_string_to_UTF8(_pstrFunName);
-                Scierror(999, _("%s : Fields names must be unique"), pstFunName);
-                FREE(pstFunName);
-                return Function::Error;
-            }
-        }
-        fieldNames.push_back(pS->get(i));
-    }
-
     pRetVal = new TorMList();
     for (unsigned int i = 0 ; i < in.size() ; i++)
     {
         pRetVal->append(in[i]);
     }
 
-    //fill empty field with []
-    InternalType* pITEmpty = Double::Empty();
-    while (pRetVal->getSize() < pS->getSize())
-    {
-        pRetVal->append(pITEmpty);
-    }
-    pITEmpty->killMe();
-
     out.push_back(pRetVal);
     return Function::OK;
 }