Changeset 72625c3 in tol

Timestamp:

Oct 5, 2010, 1:48:36 PM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

51f1662

Parents:

7d3cadb

Message:

just traces

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2569 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/lang/language.cpp (modified) (6 diffs)

tol/lang/language.cpp

@@ -1343 +1343 @@
   BText package_version = package_version_;
   BText package;
+//Std(BText("\nTRACE BPackage::Load 1 package_version='")+package_version+"'");
   BOisCreator::AddRequiredPackage(package_version);
   int point = package_version.Find(".",1);
@@ -1348 +1349 @@
   {
     package = package_version.SubString(0,point-1);
+  //Std(BText("\nTRACE BPackage::Load 2.1 package='")+package+"'");
   }
   else
@@ -1357 +1359 @@
     if(!lcv) { return(false); }
     package_version = Text(lcv);
+  //Std(BText("\nTRACE BPackage::Load 2.2.1 package='")+package_version+"'");
+  //Std(BText("\nTRACE BPackage::Load 2.2.2 package_version='")+package_version+"'");
     DESTROY(lcv);
   }
@@ -1363 +1367 @@
   if(ok) { return(pkg); }
   BText path = LocalPath(package_version);
+//Std(BText("\nTRACE BPackage::Load 3 path='")+path+"'");
   BDir dirPath = path;
+//Std(BText("\nTRACE BPackage::Load 3 dirPath='")+dirPath.Name()+"'");
   if(!ok)
   {
     ok=dirPath.Exist();
-    if(!ok) { ok = Install(package_version); }
+  //Std(BText("\nTRACE BPackage::Load 4 ok=")+ok);
+    if(!ok) 
+    { 
+      ok = Install(package_version); 
+    //Std(BText("\nTRACE BPackage::Load 5 ok=")+ok);
+    }
     if(ok)
     {
+    //Std(BText("\nTRACE BPackage::Load 6 "));
       int oldLevel = BGrammar::Level();
       BGrammar::PutLevel(0); 
@@ -1375 +1387 @@
       if(aux && (aux->Grammar()==GraSet()))
       { 
+      //Std(BText("\nTRACE BPackage::Load 7 "));
         BSet& set = Set(aux);
         if((set.Card()==1)&&(set[1]->Grammar()==GraNameBlock()))
         {
+        //Std(BText("\nTRACE BPackage::Load 8 "));
           pkg = set[1];
           pkg->IncNRefs();
@@ -1394 +1408 @@
         }
       }      
+    //Std(BText("\nTRACE BPackage::Load 9 "));
       BGrammar::PutLevel(oldLevel); 
       ok = pkg!=NULL;
+    //Std(BText("\nTRACE BPackage::Load 10 ok=")+ok);
     } 
   }
   BText load = I2("Loaded","Ha sido cargado");
   BText help = ""; 
+//Std(BText("\nTRACE BPackage::Load 11 "));
   if(!ok)
   {
+  //Std(BText("\nTRACE BPackage::Load 12 dirPath='")+dirPath.Name()+"'");
     if(!dirPath.Exist())
     {