Changeset 1224 in Sophya for trunk/SophyaPI/PIext/nomgadapter.cc

Timestamp:

Oct 11, 2000, 7:26:43 PM (25 years ago)

Author:

ercodmgr

Message:

Ajout de cxxexecutor (Execution C++ en ligne ds piapp) - CMV+Reza 11/10/2000

File:

• trunk/SophyaPI/PIext/nomgadapter.cc (modified) (1 diff)

trunk/SophyaPI/PIext/nomgadapter.cc

@@ -143 +143 @@
 }
 
-/* --Methode-- */
-string NObjMgrAdapter::DecodeTypeIdName(string linuxtype)
-// seulement pour Linux qui ne code pas correctement
-{
-#if defined(Linux)  || defined(linux)
-  string type("");
-  const char* str = linuxtype.c_str();
-  int lstr = (int) strlen(str);
-  if(lstr<=0) return string("Linux Decoding error: lstr<=0");
-
-  // Le dernier caractere donne le type
-  lstr--;
-  if     (str[lstr]=='v') type = "void";
-  else if(str[lstr]=='b') type = "bool";
-  else if(str[lstr]=='c') type = "char";
-  else if(str[lstr]=='s') type = "short";
-  else if(str[lstr]=='i') type = "int";
-  else if(str[lstr]=='l') type = "long";
-  else if(str[lstr]=='x') type = "long long";
-  else if(str[lstr]=='f') type = "float";
-  else if(str[lstr]=='d') type = "double";
-  else if(str[lstr]=='r') type = "long double";
-  else return string("Linux Decoding error: bad last char");
-  if(lstr==0) return type;
-
-  // Les caracteres precedents donnent: signed, unsigned, *, & ou const.
-  // Mais si on a un Z, alors c'est un complexe (code ...t7complex1Z...)
-  for(int i=0; i<(int)strlen(str); i++) {
-    lstr--;
-    if     (str[lstr]=='U') type = "unsigned " + type;
-    else if(str[lstr]=='S') type = "signed " + type;
-    else if(str[lstr]=='P') type = type + "*";
-    else if(str[lstr]=='R') type = type + "&";
-    else if(str[lstr]=='C') type = "const " + type;
-    else if(str[lstr]=='Z') {  // Complexe
-      type = "complex<" + type + ">";
-      for(int j=0;j<(int)strlen(str);j++) {
-        if     (str[j]=='P') type = type + "*";
-        else if(str[j]=='R') type = type + "&";
-        else if(str[j]=='C') type = "const " + type;
-        else if(str[j]=='t') break;
-        else return string("Linux Decoding error: bad char 1,2 for Z");
-      }
-      break;
-    }
-    else return string("Linux Decoding error: bad last-1,last-2 char");
-    if(lstr==0) break;
-  }
-
-return type;
-#else
-return linuxtype;
-#endif
-}