OpenEuphoria: Forum: Re: ver 4.0 call

Re: ver 4.0 call_back question ?

new topic » goto parent » topic index » view thread » older message » newer message

Posted by jeremy (admin) Jul 01, 2009
963 views

bernie said...

export function strlen(atom str) -- tested 
Asm("strlen_", 
"prolog4eu "& 
"cld "& 
"mov edi, [ebp+8] "& 
"xor eax, eax "& 
"or ecx, -1 "& 
"repne scasb "& 
"not ecx "& 
"dec ecx "& 
"mov eax, ecx "& 
"epilog4eu "& 
"ret 0 ",1,u) 
return f("strlen_",{str}) 
end function