namespace factor {
-/* Fill in a PPC function descriptor */
+// Fill in a PPC function descriptor
void* fill_function_descriptor(void* ptr, void* code) {
void** descriptor = (void**)ptr;
descriptor[0] = code;
return descriptor;
}
-/* Get a field from a PPC function descriptor */
+// Get a field from a PPC function descriptor
void* function_descriptor_field(void* ptr, size_t idx) {
return ptr ? ((void**)ptr)[idx] : ptr;
}
-/* If memory allocation fails, bail out */
+// If memory allocation fails, bail out
vm_char* safe_strdup(const vm_char* str) {
vm_char* ptr = STRDUP(str);
if (!ptr)
return cell;
}
-/* On Windows, memcpy() is in a different DLL and the non-optimizing
-compiler can't find it */
+// On Windows, memcpy() is in a different DLL and the non-optimizing
+// compiler can't find it
VM_C_API void* factor_memcpy(void* dst, void* src, size_t len) {
return memcpy(dst, src, len);
}