On 20 Apr 2012, at 17:27, OBones wrote: > I'm trying to compile the following code under FreePascal 2.6.0 : > > function MyGetCurrentThreadId: DWORD; assembler; > asm > {$IFDEF WIN32} > push ecx > mov ecx,fs:[dword ptr $18]
Use this instead: mov ecx,dword ptr fs:[$18] > {$IFDEF WIN64} > push rcx > mov rcx,gs:[abs qword ptr $30] And this: mov rcx,qword ptr gs:[$30] Jonas _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal