RosettaCodeData/Task/Call-a-foreign-language-function/X86-64-Assembly/call-a-foreign-language-function-6.x86-64

14 lines
347 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
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);
}