20 #include "TDataType.h"
94 buf.Form(
"%s[%d]",GetName(),
fIndex1);
134 case kDouble32_t:
fValue =
"0";
break;
144 case kUInt_t:
fValue.Form(
"%u", *((UInt_t*)addr));
break;
145 case kInt_t:
fValue.Form(
"%d", *((Int_t*)addr));
break;
146 case kULong_t:
fValue.Form(
"%lu", *((ULong_t*)addr));
break;
147 case kLong_t:
fValue.Form(
"%ld", *((Long_t*)addr));
break;
148 case kULong64_t:
fValue.Form(
"%llu", *((ULong64_t*)addr));
break;
149 case kLong64_t:
fValue.Form(
"%lld", *((Long64_t*)addr));
break;
150 case kUShort_t:
fValue.Form(
"%hu", *((UShort_t*)addr));
break;
151 case kShort_t:
fValue.Form(
"%hd", *((Short_t*)addr));
break;
152 case kUChar_t:
fValue.Form(
"%u", *((UChar_t*)addr));
break;
153 case kChar_t:
fValue.Form(
"%d", *((Char_t*)addr));
break;
154 case kBool_t:
fValue.Form(
"%d", *((Bool_t*)addr));
break;
155 case kFloat_t:
fValue.Form(
"%.7g", *((Float_t*)addr));
break;
156 case kDouble_t:
fValue.Form(
"%.16g", *((Double_t*)addr));
break;
157 case kDouble32_t:
fValue.Form(
"%.16g", *((Double32_t*)addr));
break;
160 TObject** f = (TObject**) addr;
170 const char* value =
fValue.Data();
172 case kUInt_t: *((UInt_t*)addr) = atoi(value);
break;
173 case kInt_t: *((Int_t*)addr) = atoi(value);
break;
174 case kULong_t: *((ULong_t*)addr) = atoi(value);
break;
175 case kLong_t: *((Long_t*)addr) = atoi(value);
break;
176 case kULong64_t: *((ULong64_t*)addr) = atoi(value);
break;
177 case kLong64_t: *((Long64_t*)addr) = atoi(value);
break;
178 case kUShort_t: *((UShort_t*)addr) = atoi(value);
break;
179 case kShort_t: *((Short_t*)addr) = atoi(value);
break;
180 case kUChar_t: *((UChar_t*)addr) = atoi(value);
break;
181 case kChar_t: *((Char_t*)addr) = atoi(value);
break;
183 if (!strcmp(value,
"true"))
184 *((Bool_t*)addr) = kTRUE;
185 else if (!strcmp(value,
"false"))
186 *((Bool_t*)addr) = kFALSE;
188 *((Bool_t*)addr) = atoi(value);
190 case kFloat_t: *((Float_t*)addr) = atof(value);
break;
191 case kDouble_t: *((Double_t*)addr) = atof(value);
break;
192 case kDouble32_t: *((Double32_t*)addr) = atof(value);
break;
193 case kTString_t: *((TString*)addr) = value;
break;
195 TObject** f = (TObject**)addr;
205 if ((buffer!=0) && (buflen<=0))
return 0;
211 if (
fIndex2<0) name += TString::Format(
"%s[%d]", GetName(),
fIndex1);
else
212 name += TString::Format(
"%s[%d][%d]", GetName(),
fIndex1,
fIndex2);
217 name += TString::Format(
"Obj:%p Class:%s",
fObject,
fObject->ClassName());
219 name += ((
fValue ==
"0") ?
"kFALSE" :
"kTRUE");
223 if ((GetTitle() != 0) && (strlen(GetTitle())>0)) { name +=
" // "; name += GetTitle(); }
228 TROOT::IndentLevel();
231 size = name.Length();
232 if(size>buflen) size = buflen;
233 strncpy(buffer, name.Data(), size);
virtual void Clear(Option_t *opt="")
const char * GetFullName(TString &buf)
void SetObject(TObject *obj, Bool_t owner)
Int_t PrintMember(Text_t *buffer=0, Int_t buflen=0) const
Bool_t CheckArrayIndexes(Int_t ndim, Int_t indx1, Int_t indx2)
void SetValue(char *addr)
virtual ~TGo4ParameterMember()
virtual void Print(Option_t *dummy="") const
void GetValue(char *addr)
void SetArrayIndexes(Int_t ndim=0, Int_t indx1=-1, Int_t indx2=-1)