]> git.uio.no Git - u/mrichter/AliRoot.git/commitdiff
change the formattin in Print()
authorschutz <schutz@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 5 Nov 2002 11:23:37 +0000 (11:23 +0000)
committerschutz <schutz@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 5 Nov 2002 11:23:37 +0000 (11:23 +0000)
EMCAL/AliEMCALClusterizerv1.cxx
EMCAL/AliEMCALDigitizer.cxx
EMCAL/AliEMCALGetter.cxx
EMCAL/AliEMCALSDigitizer.cxx
PHOS/AliPHOSClusterizerv1.cxx
PHOS/AliPHOSDigitizer.cxx
PHOS/AliPHOSReconstructioner.h
PHOS/AliPHOSSDigitizer.cxx

index 827bebf1a64bb1377865a34299d905567f3c96df..9c6bad43087cdbdaaad01d164b91bb690b1f7af9 100644 (file)
@@ -721,10 +721,12 @@ void AliEMCALClusterizerv1::PrintRecPoints(Option_t * option)
   fRecPointsInRun +=  towerRecPoints->GetEntriesFast() ; 
   fRecPointsInRun +=  preshoRecPoints->GetEntriesFast() ; 
 
+  char * tempo = new char[8192]; 
+  
   if(strstr(option,"all")) {
 
     message += "Tower clusters\n" ;
-    message += "Index  Ene(MeV)   Multi  Module     phi     r  theta    Lambda 1   Lambda 2  # of prim  Primaries list\n" ;      
+    message += "Index    Ene(MeV) Multi Module     phi     r   theta  Lambda 1 Lambda 2  # of prim  Primaries list\n" ;      
     
     Int_t index ;
     for (index = 0 ; index < towerRecPoints->GetEntries() ; index++) {
@@ -736,30 +738,14 @@ void AliEMCALClusterizerv1::PrintRecPoints(Option_t * option)
       Int_t * primaries; 
       Int_t nprimaries;
       primaries = rp->GetPrimaries(nprimaries);
-
-      message += rp->GetIndexInList() ; 
-      message += "   " ; 
-      message += rp->GetEnergy() ;
-      message += "      " ; 
-      message += rp->GetMultiplicity() ;
-      message += "      " ; 
-      message += rp->GetEMCALArm() ;
-      message += "     " ;
-      message += globalpos.X() ; 
-      message += "  " ;
-      message += globalpos.Y() ;  
-      message += globalpos.Z() ; 
-      message += "     " ;
-      message += lambda[0] ; 
-      message += "  " ;
-      message += lambda[1] ; 
-      message += "  " ;
-      message += nprimaries ; 
-      message += " :  " ;
+      sprintf(tempo, "\n%6d  %8.2f  %3d     %2d     %4.1f    %4.1f %4.1f %4f  %4f    %2d     : ", 
+             rp->GetIndexInList(), rp->GetEnergy(), rp->GetMultiplicity(), rp->GetEMCALArm(), 
+             globalpos.X(), globalpos.Y(), globalpos.Z(), lambda[0], lambda[1], nprimaries) ; 
+      message += tempo ; 
      
       for (Int_t iprimary=0; iprimary<nprimaries; iprimary++) {
-       message += primaries[iprimary] ; 
-       message += " "  ;
+       sprintf(tempo, "%d ", primaries[iprimary] ) ; 
+       message += tempo ;
       } 
     }
 
@@ -768,7 +754,7 @@ void AliEMCALClusterizerv1::PrintRecPoints(Option_t * option)
     message += "\n-----------------------------------------------------------------------\n" ;
 
     message += "PreShower clusters\n" ;
-    message += " Index  Ene(MeV)   Multi  Module     phi     r  theta    Lambda 1   Lambda 2  # of prim  Primaries list\n" ;      
+    message += "Index    Ene(MeV) Multi Module     phi     r   theta  Lambda 1 Lambda 2  # of prim  Primaries list\n" ;      
     
     for (index = 0 ; index < preshoRecPoints->GetEntries() ; index++) {
       AliEMCALTowerRecPoint * rp = dynamic_cast<AliEMCALTowerRecPoint *>(preshoRecPoints->At(index)) ; 
@@ -779,37 +765,20 @@ void AliEMCALClusterizerv1::PrintRecPoints(Option_t * option)
       Int_t * primaries;
       Int_t nprimaries;
       primaries = rp->GetPrimaries(nprimaries);
-
-      message += rp->GetIndexInList() ; 
-      message += "   " ; 
-      message += rp->GetEnergy() ; 
-      message += "   " ; 
-      message += rp->GetMultiplicity() ;
-      message += "   " ; 
-      message += rp->GetEMCALArm() ;
-      message += "   " ; 
-      message += globalpos.X() ;
-      message += "   " ; 
-      message += globalpos.Y() ;
-      message += "   " ; 
-      message += globalpos.Z() ;
-      message += "   " ; 
-      message += lambda[0] ;
-      message += "   " ; 
-      message += lambda[1] ;
-      message += "   " ; 
-      message += nprimaries ;
-      message += " : " ; 
-    
+      sprintf(tempo, "\n%6d  %8.2f  %3d     %2d     %4.1f    %4.1f %4.1f %4f  %4f    %2d     : ", 
+             rp->GetIndexInList(), rp->GetEnergy(), rp->GetMultiplicity(), rp->GetEMCALArm(), 
+             globalpos.X(), globalpos.Y(), globalpos.Z(), lambda[0], lambda[1], nprimaries) ; 
+      message += tempo ; 
+  
       for (Int_t iprimary=0; iprimary<nprimaries; iprimary++) {
-       message += primaries[iprimary] ; 
-       message += "  " ;
+       sprintf(tempo, "%d ", primaries[iprimary] ) ; 
+       message += tempo ;
       }         
     }
 
     message += "\n-----------------------------------------------------------------------" ;
   }
-
+  delete tempo ; 
   Info("PrintRecPoints", message.Data() ) ; 
   
 }
index a8df872a6527f50f19fae48e377a068c29a1959b..2306003d8f3caf69f05bfa2147591aa3e01ce1bd 100644 (file)
@@ -620,29 +620,26 @@ void AliEMCALDigitizer::PrintDigits(Option_t * option){
   TString message("\n") ; 
   message += "       Number of entries in Digits list " ; 
   message += fDigits->GetEntriesFast() ;
+
   if(strstr(option,"all")){
     
     //loop over digits
     AliEMCALDigit * digit;
-    message += "\nDigit Id Amplitude  Index  Nprim  Primaries list " ;      
+    message += "\n   Id  Amplitude    Time          Index Nprim: Primaries list \n" ;    
     Int_t index ;
+    char * tempo = new char[8192]; 
     for (index = 0 ; index < fDigits->GetEntries() ; index++) {
       digit = (AliEMCALDigit * )  fDigits->At(index) ;
-      message += digit->GetId()  ; 
-      message += " " ; 
-      message += digit->GetAmp() ;
-      message += "  " ;  
-      message += digit->GetIndexInList() ; 
-      message += "  " ;   
-      message += digit->GetNprimary() ; 
-      message += " : " ;
-      
+      sprintf(tempo, "\n%6d  %8d    %6.5e %4d      %2d : ",
+             digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+      message += tempo ; 
       Int_t iprimary;
       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-       message += digit->GetPrimary(iprimary+1) ; 
-       message +=  " ";         
+       sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+       message += tempo ; 
       }
     }   
+    delete tempo ; 
   }
   Info("PrintDigits", message.Data() ) ; 
 }
index 62289be919277788d0a689861e0a0ecbc0eff5b6..3f1272f338d1de4d08dea1182003f62e60e41a92 100644 (file)
@@ -287,32 +287,32 @@ const Bool_t AliEMCALGetter::BranchExists(const TString recName) const
   if(recName == "SDigits"){
     filename=fSDigitsFileName ;
     name = "TreeS0" ;
-    dataname = "PHOS" ;
-    zername = "AliPHOSSDigitizer" ;
+    dataname = "EMCAL" ;
+    zername = "AliEMCALSDigitizer" ;
   }
   else if(recName == "Digits"){
     filename=fDigitsFileName ;
     name = "TreeD0" ;
-    dataname = "PHOS" ;
-    zername = "AliPHOSDigitizer" ;
+    dataname = "EMCAL" ;
+    zername = "AliEMCALDigitizer" ;
   }
   else if(recName =="RecPoints"){
        filename=fRecPointsFileName ;
        name = "TreeR0" ;
-       dataname = "PHOSEmcRP" ;
-       zername = "AliPHOSClusterizer" ;
+       dataname = "EMCALEmcRP" ;
+       zername = "AliEMCALClusterizer" ;
   }
   else if(recName == "TrackSegments"){
     filename=fTrackSegmentsFileName ;
     name = "TreeR0" ;
-    dataname = "PHOSTS" ;
-    zername = "AliPHOSTrackSegmentMaker" ;
+    dataname = "EMCALTS" ;
+    zername = "AliEMCALTrackSegmentMaker" ;
   }     
   else if(recName == "RecParticles"){
     filename= fRecParticlesFileName ;
     name = "TreeR0" ;
-    dataname = "PHOSRP" ;
-    zername = "AliPHOSPID" ;
+    dataname = "EMCALRP" ;
+    zername = "AliEMCALPID" ;
   }
   else
     return kFALSE ;
@@ -1485,7 +1485,7 @@ Int_t AliEMCALGetter::ReadTreeR(const Int_t event)
   // Read the reconstrunction tree gAlice->TreeR()
   // A particularity has been introduced here :
   //  if gime->Event(ievent,"R") is called branches with the current title are read, the current title
-  //   being for example give in AliPHOSPID(fileName, title)
+  //   being for example give in AliEMCALPID(fileName, title)
   //  if gime(Event(ievent, "RA") is called the title of the branches is not checked anymore, "A" stands for any
   // This is a feature needed by PID to be able to reconstruct several times particles (each time a ther title is given)
   // from a given set of TrackSegments (with a given name)
index 4856173a08e80adbcb7daddc2f35be25aa823272..d8df1253cd289352740c70b92fcaf77f29c441cf 100644 (file)
@@ -430,27 +430,22 @@ void AliEMCALSDigitizer::PrintSDigits(Option_t * option){
     
     //loop over digits
     AliEMCALDigit * digit;
-    message += "\nSDigit Id  Amplitude      Time      Index  Nprim  Primaries list \n" ;    
+    message += "\n   Id  Amplitude    Time          Index Nprim: Primaries list \n" ;    
     Int_t index ;
+    char * tempo = new char[8192]; 
     for (index = 0 ; index < sdigits->GetEntries() ; index++) {
       digit = dynamic_cast<AliEMCALDigit *>( sdigits->At(index) ) ;
-       message += digit->GetId() ; 
-       message += "   " ; 
-       message += digit->GetAmp() ; 
-       message += "    "  ; 
-       message += digit->GetTime() ; 
-       message += "    ";
-       message += digit->GetIndexInList() ; 
-       message += "    " ;  
-       message += digit->GetNprimary() ; 
-       message += " : ";
+      sprintf(tempo, "\n%6d  %8d    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+      message += tempo ; 
       
       Int_t iprimary;
       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-       message += digit->GetPrimary(iprimary+1) ; 
-       message += "  ";
+       sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+       message += tempo ; 
       }         
     }
+    delete tempo ;
   }
   Info("PrintSDigits", message.Data() ) ; 
 }
index da3471294d4c9d160d0c9321a2a21bb7a3b07dbc..42311dbfee006462af558be798eff836095ca8f8 100644 (file)
@@ -1026,9 +1026,11 @@ void AliPHOSClusterizerv1::PrintRecPoints(Option_t * option)
   fRecPointsInRun +=  emcRecPoints->GetEntriesFast() ; 
   fRecPointsInRun +=  cpvRecPoints->GetEntriesFast() ; 
   
+  char * tempo = new char[8192]; 
+  
   if(strstr(option,"all")) {
-    message += "EMC clusters " ;
-    message += " Index  Ene(MeV) Multi Module X  Y  Z Lambda 1 Lambda 2  # of prim  Primaries list " ; 
+    message += "\nEMC clusters\n" ;
+    message += "Index    Ene(MeV) Multi Module     X     Y   Z  Lambda 1 Lambda 2  # of prim  Primaries list\n" ;      
     Int_t index ;
     for (index = 0 ; index < emcRecPoints->GetEntries() ; index++) {
       AliPHOSEmcRecPoint * rp = (AliPHOSEmcRecPoint * )emcRecPoints->At(index) ; 
@@ -1038,68 +1040,41 @@ void AliPHOSClusterizerv1::PrintRecPoints(Option_t * option)
       rp->GetElipsAxis(lambda);
       Int_t * primaries; 
       Int_t nprimaries;
-      message += " " ; 
       primaries = rp->GetPrimaries(nprimaries);
-      message += "\n" ; 
-      message += rp->GetIndexInList() ;   
-      message += " " ; 
-      message += rp->GetEnergy();
-      message += " " ; 
-      message += rp->GetMultiplicity() ;  
-      message += " " ; 
-      message += rp->GetPHOSMod() ;
-      message += " " ; 
-      message += locpos.X() ;
-      message += " " ; 
-      message += locpos.Y() ;
-      message += " " ; 
-      message += locpos.Z() ;
-      message += " " ; 
-      message += lambda[0] ;
-      message += " " ; 
-      message += lambda[1] ;
-      message += " " ; 
-      message += nprimaries ;
-      message += " : " ; 
+      sprintf(tempo, "\n%6d  %8.2f  %3d     %2d     %4.1f    %4.1f %4.1f %4f  %4f    %2d     : ", 
+             rp->GetIndexInList(), rp->GetEnergy(), rp->GetMultiplicity(), rp->GetPHOSMod(), 
+             locpos.X(), locpos.Y(), locpos.Z(), lambda[0], lambda[1], nprimaries) ; 
+      message += tempo ; 
       
       for (Int_t iprimary=0; iprimary<nprimaries; iprimary++) {
-       message += primaries[iprimary]  ;
-       message += " " ; 
+       sprintf(tempo, "%d ", primaries[iprimary] ) ; 
+       message += tempo ;
       }
-    }
-    
-    //Now plot CPV recPoints
-    message += "\nCPV clusters Index Multi Module X   Y   Z # of prim  Primaries list \n" ;      
-    for (index = 0 ; index < cpvRecPoints->GetEntries() ; index++) {
-      AliPHOSRecPoint * rp = (AliPHOSRecPoint * )cpvRecPoints->At(index) ; 
-      TVector3  locpos;  
-      rp->GetLocalPosition(locpos);
-  
-      Int_t * primaries; 
-      Int_t nprimaries ; 
-      primaries = rp->GetPrimaries(nprimaries);
-      message += "\n" ; 
-      message += rp->GetIndexInList() ;
-      message += " " ;  
-      message += rp->GetPHOSMod();  
-      message += " " ; 
-      message += locpos.X() ;
-      message += " " ; 
-      message += locpos.Y() ;  
-      message += " " ; 
-      message += locpos.Z() ; 
-      message += " " ; 
-      message +=  nprimaries ; 
-      message += " : " ; 
       
-      primaries = rp->GetPrimaries(nprimaries);
-      for (Int_t iprimary=0; iprimary<nprimaries; iprimary++) {
-       message += primaries[iprimary]  ;
-       message += " " ; 
+      //Now plot CPV recPoints
+      message += "Index    Ene(MeV) Module     X     Y   Z  # of prim  Primaries list\n" ;      
+      for (index = 0 ; index < cpvRecPoints->GetEntries() ; index++) {
+       AliPHOSRecPoint * rp = (AliPHOSRecPoint * )cpvRecPoints->At(index) ; 
+       
+       TVector3  locpos;  
+       rp->GetLocalPosition(locpos);
+       
+       Int_t * primaries; 
+       Int_t nprimaries ; 
+       primaries = rp->GetPrimaries(nprimaries);
+       sprintf(tempo, "\n%6d  %8.2f  %2d     %4.1f    %4.1f %4.1f %2d     : ", 
+               rp->GetIndexInList(), rp->GetEnergy(), rp->GetPHOSMod(), 
+               locpos.X(), locpos.Y(), locpos.Z(), nprimaries) ; 
+       message += tempo ; 
+       primaries = rp->GetPrimaries(nprimaries);
+       for (Int_t iprimary=0; iprimary<nprimaries; iprimary++) {
+         sprintf(tempo, "%d ", primaries[iprimary] ) ; 
+         message += tempo ;
+       }
       }
     }
   }
+  delete tempo ; 
   Info("Print", message.Data() ) ; 
 }
 
index 401441c73e731cba97ff913b7a71b16c70cb4466..b8e40092c9351426f82e5cb04d3476d7b7916d7e 100644 (file)
@@ -681,12 +681,13 @@ void AliPHOSDigitizer::Print(Option_t* option)const
   message += gAlice->GetEvNumber() ;
   message += "\n       Number of entries in Digits list " ;  
   message += digits->GetEntriesFast()  ;  
-  
+  char * tempo = new char[8192]; 
   if(strstr(option,"all")||strstr(option,"EMC")){  
     //loop over digits
     AliPHOSDigit * digit;
     message += "\nEMC digits (with primaries):\n"  ;
-    message += "Digit Id Amplitude Index Nprim  Primaries list\n" ; 
+    message += "\n   Id  Amplitude    Time          Index Nprim: Primaries list \n" ;    
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; (index < digits->GetEntriesFast()) && 
@@ -694,19 +695,13 @@ void AliPHOSDigitizer::Print(Option_t* option)const
       digit = (AliPHOSDigit * )  digits->At(index) ;
       if(digit->GetNprimary() == 0) 
        continue;
-      message += "\n" ; 
-      message += digit->GetId() ; 
-      message += " " ; 
-      message += digit->GetAmp() ;  
-      message += " " ; 
-      message += digit->GetIndexInList() ;      
-      message += " " ; 
-      message += digit->GetNprimary()  ;
-      message += " : " ; 
+      sprintf(tempo, "\n%6d  %8d    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+      message += tempo ; 
       Int_t iprimary;
       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-       message += digit->GetPrimary(iprimary+1)  ;
-       message += " " ; 
+       sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+       message += tempo ; 
       }    
     }
   }
@@ -716,31 +711,25 @@ void AliPHOSDigitizer::Print(Option_t* option)const
     //loop over CPV digits
     AliPHOSDigit * digit;
     message += "\nCPV digits:\n" ;
-    message += "Digit Id Amplitude Index Nprim Primaries list\n" ;
+    message += "\n   Id  Amplitude    Index Nprim: Primaries list \n" ;    
 
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; index < digits->GetEntriesFast(); index++) {
       digit = (AliPHOSDigit * )  digits->At(index) ;
       if(digit->GetId() > maxEmc){
-       message += "\n" ; 
-       message += digit->GetId();  
-       message += " " ; 
-       message += digit->GetAmp() ; 
-       message += " " ; 
-       message += digit->GetIndexInList() ;  
-       message += " " ; 
-       message += digit->GetNprimary() ;
-       message += " : " ; 
-       
+       sprintf(tempo, "\n%6d  %8d    %4d      %2d :",
+               digit->GetId(), digit->GetAmp(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+       message += tempo ; 
        Int_t iprimary;
        for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-         message += digit->GetPrimary(iprimary+1)  ;
-         message += " " ; 
+         sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+         message += tempo ; 
        }    
       }
     }
   }
+  delete tempo ; 
   Info("Print", message.Data() ) ; 
 }
 
index 4c745fdc60d19abdd3920f3848c69092a9221ed9..32e7178155c526ef40d3bc94758a60409800075f 100644 (file)
@@ -59,7 +59,7 @@ public:
 
   AliPHOSReconstructioner & operator = (const AliPHOSReconstructioner & rvalue)  {
     // assignement operator requested by coding convention but not needed
-    Fatal("operator =", "not implemented") ;
+    Fatal("operator =", "not implementeyd") ;
     return *this ; 
   }
   
index 89e5dab9eb430af8af345f326fc295d506c7a286..41077cd89e15701c03ecea70981e25fcec6d8d9b 100644 (file)
@@ -341,13 +341,14 @@ void AliPHOSSDigitizer::PrintSDigits(Option_t * option)
   message += gAlice->GetEvNumber(); 
   message += "\n      Number of entries in SDigits list " ;  
   message += sdigits->GetEntriesFast() ; 
+  char * tempo = new char[8192]; 
   
   if(strstr(option,"all")||strstr(option,"EMC")){
     
     //loop over digits
     AliPHOSDigit * digit;
     message += "\nEMC sdigits\n" ;
-    message += "Digit Id    Amplitude     Index     Nprim  Primaries list\n" ;       
+    message += "\n   Id  Amplitude    Time          Index Nprim: Primaries list \n" ;    
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; (index < sdigits->GetEntriesFast()) && 
@@ -355,13 +356,14 @@ void AliPHOSSDigitizer::PrintSDigits(Option_t * option)
       digit = dynamic_cast<AliPHOSDigit *>( sdigits->At(index) ) ;
       if(digit->GetNprimary() == 0) 
        continue;
-      message += digit->GetId() ; 
-      message += digit->GetAmp() ;
-      message += digit->GetIndexInList() ;
-      message += digit->GetNprimary() ;
+      sprintf(tempo, "\n%6d  %8d    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+      message += tempo ; 
       Int_t iprimary;
-      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++)
-       message += digit->GetPrimary(iprimary+1) ;
+      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
+       sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+       message += tempo ; 
+      }  
     }    
   }
 
@@ -371,29 +373,24 @@ void AliPHOSSDigitizer::PrintSDigits(Option_t * option)
     AliPHOSDigit * digit;
     
     message += "CPV sdigits\n" ;
-    message += "Digit Id Amplitude Index Nprim  Primaries list\n" ;
+    message += "\n   Id  Amplitude    Index Nprim: Primaries list \n" ;    
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; index < sdigits->GetEntriesFast(); index++) {
       digit = dynamic_cast<AliPHOSDigit *>( sdigits->At(index) ) ;
       if(digit->GetId() > maxEmc){
-       message += "\n" ; 
-       message += digit->GetId() ; 
-       message += "   " ; 
-       message += digit->GetAmp() ;
-       message += "   " ; 
-       message += digit->GetIndexInList() ;
-       message += "   " ; 
-       message += digit->GetNprimary() ;
-       message += "   " ; 
+       sprintf(tempo, "\n%6d  %8d    %4d      %2d :",
+               digit->GetId(), digit->GetAmp(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+       message += tempo ; 
        Int_t iprimary;
        for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-         message += digit->GetPrimary(iprimary+1) ;
-         message += "," ; 
+         sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ; 
+         message += tempo ; 
        }
       }    
     }
   }
+  delete tempo ; 
   Info("PrintSDigits", message.Data() ) ;
 }