Logo ROOT   6.13/01
Reference Guide
rootalias.C File Reference

Detailed Description

Defines aliases:

//______________________________________________________________________________
void edit(char *file)
{
char s[64], *e;
if (!strcmp(gSystem->GetName(), "WinNT")) {
if ((e = getenv("EDITOR")))
sprintf(s, "start %s %s", e, file);
else
sprintf(s, "start notepad %s", file);
} else {
if ((e = getenv("EDITOR")))
sprintf(s, "%s %s", e, file);
else
sprintf(s, "xterm -e vi %s &", file);
}
}
//______________________________________________________________________________
void ls(char *path=0)
{
char s[256];
strcpy(s, (!strcmp(gSystem->GetName(), "WinNT")) ? "dir /w " : "ls ");
if (path) strcat(s,path);
}
//______________________________________________________________________________
void dir(char *path=0)
{
char s[256];
strcpy(s,(!strcmp(gSystem->GetName(), "WinNT")) ? "dir " : "ls -l ");
if (path) strcat(s,path);
}
//______________________________________________________________________________
const char *pwd()
{
}
//______________________________________________________________________________
const char *cd(char *path=0)
{
if (path)
return pwd();
}
TCanvas *bench = 0;
//______________________________________________________________________________
void bexec2(char *macro)
{
printf("in bexec dir=%s\n",pwd());
if (gROOT->IsBatch()) printf("Processing benchmark: %s\n",macro);
TPaveText *summary = (TPaveText*)bench->GetPrimitive("TPave");
TText *tmacro = summary->GetLineWith(macro);
if (tmacro) tmacro->SetTextColor(4);
bench->Modified(); bench->Update();
gROOT->Macro(macro);
TPaveText *summary2 = (TPaveText*)bench->GetPrimitive("TPave");
TText *tmacro2 = summary2->GetLineWith(macro);
if (tmacro2) tmacro2->SetTextColor(2);
bench->Modified(); bench->Update();
}
Author
Rene Brun

Definition in file rootalias.C.