How to write to Self from assembler in record constructor?

[deadbeef]

How can I load a const into an XMM register?
This either loads garbage or causes SIGSEGV.

Code: Pascal  [Select][+][-]

1. const
2.   SOME_BITS: UInt32 = $80000000;
3.   asm
4.     movss XMM0, [SOME_BITS]
5.   end;
6.  

[avk]

...
So lazarus uses the XMM registers for float arguments, is there a bit more info on this?
...

FPC just follows the Win64 ABI.

How can I load a const into an XMM register?
...

maybe

Code: Pascal  [Select][+][-]

1.   asm
2.     movss XMM0, [rip+SOME_BITS]
3.   end;
4.  

[PascalDragon]

No, EBX is not the default for the register calling convention. The registers used are EAX, EDX and ECX (in that order) as is mentioned here as well.

You did not understand me. Those registers are free to use (scratch). EBX is NOT free to use since it holds self. (At least in Delphi 32 bit, tested with D7)

Is this really passed as parameter or is it merely using EBX inside a method to hold Self? Cause the Delphi documentation itself writes this:

The register convention uses up to three CPU registers to pass parameters, while the other conventions pass all parameters on the stack.

And the mentioned registers there are EAX, EDX and ECX (and not EBX) as mentioned in the C++ Builder equivalent of the documentation (C++ Builder __fastcall is equivalent to Delphi register):

Use the __fastcall modifier to declare functions that expect parameters to be passed in registers. The first three parameters are passed (from left to right) in EAX, EDX, and ECX, if they fit in the register. The registers are not used if the parameter is a floating-point or struct type.

[Seenkao]

https://www.freepascal.org/docs-html/prog/progsu128.html#x145-1460003.2.1

[ASerge]

I'm trying to get some code I wrote for Delphi running but I can't figure out how to write the data into Self from the record constructor.
So how do I get my XMM0 written to the Data array with a single instruction?

as a workaround add:

Code: Pascal  [Select][+][-]

1. var
2.   Self: TXPoint absolute Self;

before asm.

[deadbeef]

@ASerge: This looks so redundant but works great.