Get rid of useless class_alias() builtin function.
The build was successful.
Details
The build was successful.
Details
This commit is contained in:
parent
1bf5c3a8a2
commit
3530e6ea09
57
engine/vm.c
57
engine/vm.c
|
@ -6024,62 +6024,6 @@ static int vm_builtin_interface_exists(ph7_context *pCtx, int nArg, ph7_value **
|
||||||
ph7_result_bool(pCtx, res);
|
ph7_result_bool(pCtx, res);
|
||||||
return PH7_OK;
|
return PH7_OK;
|
||||||
}
|
}
|
||||||
/*
|
|
||||||
* bool class_alias([string $original[,string $alias ]])
|
|
||||||
* Creates an alias for a class.
|
|
||||||
* Parameters
|
|
||||||
* original
|
|
||||||
* The original class.
|
|
||||||
* alias
|
|
||||||
* The alias name for the class.
|
|
||||||
* Return
|
|
||||||
* Returns TRUE on success or FALSE on failure.
|
|
||||||
*/
|
|
||||||
static int vm_builtin_class_alias(ph7_context *pCtx, int nArg, ph7_value **apArg) {
|
|
||||||
const char *zOld, *zNew;
|
|
||||||
int nOldLen, nNewLen;
|
|
||||||
SyHashEntry *pEntry;
|
|
||||||
ph7_class *pClass;
|
|
||||||
char *zDup;
|
|
||||||
sxi32 rc;
|
|
||||||
if(nArg < 2) {
|
|
||||||
/* Missing arguments,return FALSE */
|
|
||||||
ph7_result_bool(pCtx, 0);
|
|
||||||
return PH7_OK;
|
|
||||||
}
|
|
||||||
/* Extract old class name */
|
|
||||||
zOld = ph7_value_to_string(apArg[0], &nOldLen);
|
|
||||||
/* Extract alias name */
|
|
||||||
zNew = ph7_value_to_string(apArg[1], &nNewLen);
|
|
||||||
if(nNewLen < 1) {
|
|
||||||
/* Invalid alias name,return FALSE */
|
|
||||||
ph7_result_bool(pCtx, 0);
|
|
||||||
return PH7_OK;
|
|
||||||
}
|
|
||||||
/* Perform a hash lookup */
|
|
||||||
pEntry = SyHashGet(&pCtx->pVm->hClass, (const void *)zOld, (sxu32)nOldLen);
|
|
||||||
if(pEntry == 0) {
|
|
||||||
/* No such class,return FALSE */
|
|
||||||
ph7_result_bool(pCtx, 0);
|
|
||||||
return PH7_OK;
|
|
||||||
}
|
|
||||||
/* Point to the class */
|
|
||||||
pClass = (ph7_class *)pEntry->pUserData;
|
|
||||||
/* Duplicate alias name */
|
|
||||||
zDup = SyMemBackendStrDup(&pCtx->pVm->sAllocator, zNew, (sxu32)nNewLen);
|
|
||||||
if(zDup == 0) {
|
|
||||||
/* Out of memory,return FALSE */
|
|
||||||
ph7_result_bool(pCtx, 0);
|
|
||||||
return PH7_OK;
|
|
||||||
}
|
|
||||||
/* Create the alias */
|
|
||||||
rc = SyHashInsert(&pCtx->pVm->hClass, (const void *)zDup, (sxu32)nNewLen, pClass);
|
|
||||||
if(rc != SXRET_OK) {
|
|
||||||
SyMemBackendFree(&pCtx->pVm->sAllocator, zDup);
|
|
||||||
}
|
|
||||||
ph7_result_bool(pCtx, rc == SXRET_OK);
|
|
||||||
return PH7_OK;
|
|
||||||
}
|
|
||||||
/*
|
/*
|
||||||
* array get_declared_classes(void)
|
* array get_declared_classes(void)
|
||||||
* Returns an array with the name of the defined classes
|
* Returns an array with the name of the defined classes
|
||||||
|
@ -9889,7 +9833,6 @@ static const ph7_builtin_func aVmFunc[] = {
|
||||||
/* Constants management */
|
/* Constants management */
|
||||||
{ "get_defined_constants", vm_builtin_get_defined_constants },
|
{ "get_defined_constants", vm_builtin_get_defined_constants },
|
||||||
/* Class/Object functions */
|
/* Class/Object functions */
|
||||||
{ "class_alias", vm_builtin_class_alias },
|
|
||||||
{ "class_exists", vm_builtin_class_exists },
|
{ "class_exists", vm_builtin_class_exists },
|
||||||
{ "property_exists", vm_builtin_property_exists },
|
{ "property_exists", vm_builtin_property_exists },
|
||||||
{ "method_exists", vm_builtin_method_exists },
|
{ "method_exists", vm_builtin_method_exists },
|
||||||
|
|
Loading…
Reference in New Issue