Create an object at a given address: Difference between revisions
Content added Content deleted
(=={{header|Pascal}} added) |
|||
Line 396: | Line 396: | ||
0 1 2 3 4 5 6 7 |
0 1 2 3 4 5 6 7 |
||
506097522914230528</pre> |
506097522914230528</pre> |
||
=={{header|Phix}}== |
|||
Phix does not support creation of a "language object" at a specific address, but you can peek and poke bytes, words, dwords and qwords |
|||
to any address, as long as doing so does not trigger a hardware exception. You could also use inline assembly, if that helps any. |
|||
<lang Phix>poke(0x80,or_bits(peek(0x80),0x40)) |
|||
#ilASM{ mov al,[0x80] |
|||
or al,0x40 |
|||
mov [0x80],al}</lang> |
|||
=={{header|PicoLisp}}== |
=={{header|PicoLisp}}== |
||
<lang PicoLisp>: (setq IntSpace 12345) # Integer |
<lang PicoLisp>: (setq IntSpace 12345) # Integer |
||
Line 408: | Line 416: | ||
: IntSpace # Show the new value |
: IntSpace # Show the new value |
||
-> 65535</lang> |
-> 65535</lang> |
||
=={{header|PureBasic}}== |
=={{header|PureBasic}}== |
||
<lang PureBasic>; Allocate a 1Mb memory area work within to avoid conflicts, |
<lang PureBasic>; Allocate a 1Mb memory area work within to avoid conflicts, |