version 1.1, 2017/07/05 18:51:17
|
version 1.5, 2017/07/22 11:30:11
|
Line 8 declareTypeExtension(dup)
|
Line 8 declareTypeExtension(dup)
|
|
|
oObject = (*((structObject **) arg)); |
oObject = (*((structObject **) arg)); |
|
|
if (nullified(nObject = allocation(s_etat_processus, EXT))) |
if (subType(oObject) == APPCONTEXT) |
{ |
{ |
typeSystemError; |
if (nullified(nObject = allocation(s_etat_processus, EXT))) |
} |
{ |
|
typeSystemError; |
|
} |
|
|
initializeObject(nObject, oObject); |
initializeObject(nObject, oObject); |
|
|
if (subType(oObject) == APPCONTEXT) |
|
{ |
|
if (nullified(objectContainer(nObject) = |
if (nullified(objectContainer(nObject) = |
malloc(sizeof(XtAppContext)))) |
malloc(sizeof(XtAppContext)))) |
{ |
{ |
Line 28 declareTypeExtension(dup)
|
Line 28 declareTypeExtension(dup)
|
target((sXtAppContext *) objectContainer(nObject)).context = |
target((sXtAppContext *) objectContainer(nObject)).context = |
target((sXtAppContext *) objectContainer(oObject)).context; |
target((sXtAppContext *) objectContainer(oObject)).context; |
} |
} |
|
else if (subType(oObject) == CALLBACK) |
|
{ |
|
typeError; |
|
} |
else if (subType(oObject) == WIDGET) |
else if (subType(oObject) == WIDGET) |
{ |
{ |
|
if (nullified(nObject = allocation(s_etat_processus, EXT))) |
|
{ |
|
typeSystemError; |
|
} |
|
|
|
initializeObject(nObject, oObject); |
|
|
if (nullified(objectContainer(nObject) = |
if (nullified(objectContainer(nObject) = |
malloc(sizeof(sXtAppContext)))) |
malloc(sizeof(sXtAppContext)))) |
{ |
{ |
Line 44 declareTypeExtension(dup)
|
Line 55 declareTypeExtension(dup)
|
typeError; |
typeError; |
} |
} |
|
|
|
target((struct_objet **) arg) = nObject; |
typeSuccess; |
typeSuccess; |
endTypeExtension |
endTypeExtension |
|
|
Line 56 declareTypeExtension(drop)
|
Line 68 declareTypeExtension(drop)
|
{ |
{ |
free(objectContainer(oObject)); |
free(objectContainer(oObject)); |
} |
} |
|
else if (subType(oObject) == CALLBACK) |
|
{ |
|
free(objectContainer(oObject)); |
|
} |
else if (subType(oObject) == WIDGET) |
else if (subType(oObject) == WIDGET) |
{ |
{ |
free(objectContainer(oObject)); |
free(objectContainer(oObject)); |
Line 85 declareTypeExtension(disp)
|
Line 101 declareTypeExtension(disp)
|
sprintf(s, "XtAppContext $ %016llX", |
sprintf(s, "XtAppContext $ %016llX", |
(long long unsigned int) objectContainer(oObject)); |
(long long unsigned int) objectContainer(oObject)); |
} |
} |
|
else if (subType(oObject) == CALLBACK) |
|
{ |
|
if ((s = malloc(28 * sizeof(unsigned char))) == NULL) |
|
{ |
|
typeSystemError; |
|
} |
|
|
|
sprintf(s, "Callback $ %016llX", |
|
(long long unsigned int) objectContainer(oObject)); |
|
} |
else if (subType(oObject) == WIDGET) |
else if (subType(oObject) == WIDGET) |
{ |
{ |
if ((s = malloc(26 * sizeof(unsigned char))) == NULL) |
if ((s = malloc(26 * sizeof(unsigned char))) == NULL) |