RosettaCodeData/Task/Call-a-foreign-language-function/X86-64-Assembly/call-a-foreign-language-function-6.x86-64
2023-07-01 13:44:08 -04:00

13 lines
347 B
Text

void free( void* ptr );
char * strdup( const char *str1 );
typedef struct WrenVM WrenVM;
const char* wrenGetSlotString(WrenVM* vm, int slot);
void wrenSetSlotString(WrenVM* vm, int slot, const char* text);
void C_strdup(WrenVM* vm) {
const char *s = wrenGetSlotString(vm, 1);
char *t = strdup(s);
wrenSetSlotString(vm, 0, t);
free(t);
}