XProfan & 64-Bit

[Frabbing]

Zitat von p. specht

Durch Nutzung der API lässt sich die Sache stark vereinfachen:
Folgendes "Hello 64bit-World!"-Programm von der JWasm-Seite, (meine Quelle hier), lässt sich mit JWASM erfolgreich compilieren und anschließend mit link.exe aus dem masm64-Paket linken (bei mir nur, solange das in dessen \BIN Verzeichnis geschieht):

Mit JWasm 64 Bit kannst du doch ganz normal invoke benutzen. Ein Auszug von mir:

      invoke OpenClipboard,NULL
      .if rax
        invoke EmptyClipboard
        invoke GlobalAlloc,GMEM_MOVEABLE or GMEM_ZEROINIT,SIZEOF gesamt
        .if rax
          mov hglb, rax
          invoke GlobalLock,hglb
          invoke lstrcat,rax,addr gesamt
          invoke GlobalUnlock,hglb
          invoke SetClipboardData,CF_TEXT,hglb
          .if eax!=0
            invoke MessageBox,0, addr meldung,addr infos,MB_OK
          .endif
        .endif
        invoke CloseClipboard
      .endif

Quäl dich nicht unnötig.

[ts-soft]

@ p. specht
Die Änderungen bezüglich der Register betrifft ja nur ASM-Programmierer, in
Hochsprachen wie XProfan juckt uns das nicht. Wichtiger wäre z.B. die
Sache mit dem Alignment der Stukturen, weil da müssen sehr viele Angepaßt
werden.

[p. specht]

@frank: Aha, danke für die Profi-Abkürzungen! JWasm scheint da einfacher zu handhaben als masm64 - allerdings frage ich mich, ob man damit echte 64bit-DLLs erstellen kann (angesichts der obgenannten Prolog/Epilog etc etc Notwendigkeiten)?
@ts: Naja, wenn wir je ein XProfan64 sehen werden, werden einige auch wieder direkte API-Aufrufe machen wollen - zugegeben, das geht mich nun wirklich nix an. Mir gings eigentlich nur um ein allgemeines Verständnis, was daran eigentlich so besonders sein soll.

P.S.: Das Hello 64bit-World-Programm gibts auch für Konsole:

;ml64  Consol_1.asm /link /subsystem:console /entry:main
includelib ..\lib\kernel32.lib   ; we use the lib that comes with sdk/wdk

extrn __imp_GetStdHandle:proc
extrn __imp_WriteFile:proc

.CODE
main PROC
   mov rax, 00646c726f572034h   ; dlroW 4
   push rax
   mov rax, 3678206f6c6c6548h   ; 6x olleH
   push rax
   mov rbx, rsp   
   sub rsp, 8
   mov rdi, rsp

   sub rsp, 020h
   mov rcx, -11        ; STD_OUTPUT
   call qword ptr __imp_GetStdHandle
   mov rcx, rax
   mov  r9, rdi
   mov r8d, 16
   
   mov rdx, rbx
   call qword ptr __imp_WriteFile
   add rsp, 38h
   ret
main ENDP
END

[RGH]

Wie gut, dass es auch FreePascal gibt, und das sogar für 64 Bit! Die bisherige 64-Bit-TestVersion ist in FreePascal kompiliert!

Gruß
Roland

[Frabbing]

@frank: Aha, danke für die Profi-Abkürzungen! JWasm scheint da einfacher zu handhaben als masm64 - allerdings frage ich mich, ob man damit echte 64bit-DLLs erstellen kann (angesichts der obgenannten Prolog/Epilog etc etc Notwendigkeiten)?

Natürlich, kein Problem. Bei dem JWasm-Quellcodes findest du auch ein Grundgerüst dafür.

[Frabbing]

Zitat von RGH

Wie gut, dass es auch FreePascal gibt, und das sogar für 64 Bit! Die bisherige 64-Bit-TestVersion ist in FreePascal kompiliert!

Gruß
Roland

War die nicht 30% langsamer?

[p. specht]

Vielleicht ist ja das Pascal selbst langsamer? "The Free Pascal Compiler now can generate byte code for a Java Virtual Machine." - wenn so ein Ding erst mal Zwischencode erzeugen muß, ...

P.S.: Gerade wieder über Agner Fogg´s Seite gestolpert - immer wieder lesenswert!

[H.Brill]

Den 64-Bit Interpreter habe ich auch schon mal
getestet. Danke an Roland.
Sieht soweit schon mal gut aus.
Schön wäre es noch, wenn man den aus einer
IDE aus aufrufen könnte.
Oder klappt das, wenn man eine 64-Bit Anwendung
aus einer 32 Bit Anwendung aufruft ?
Dann könnte man ja den Quellcode von
xProfed verwenden.

[RGH]

Hallo,

ja, man kann auch 64-Bit-Exebn aus einem 32-Bit-Programm aufrufen, aber runder läuft es natürlich aus einer 64-Bit-IDE. TS-SOFT hat eine erstellt, die ich auch für meine Tests nutze:

X-ProfPad 32|64 (Entwicklungsumgebung von ts-soft)

Gruß
Roland

[H.Brill]

Danke, werde mal die IDE von ts-soft austesten.

[Frabbing]

Wie groß wird bei einem 64-Bit-XProfan eigentlich z.B. eine Variable "handle%" sein? 16 oder 64 Bit groß?

[ts-soft]

Zitat von Frabbing

Wie groß wird bei einem 64-Bit-XProfan eigentlich z.B. eine Variable "handle%" sein? 16 oder 64 Bit groß?

Wie der Variablentyp heißen wird, weiß ich natürlich nicht, aber ein
Handle, genauso wie ein Pointer, kann nur 64-Bittig sein, da kann
Roland wohl nichts dran ändern

[Frabbing]

"hande%" ist augenblicklich (intern) 32 Bit groß, obwohl es eine 16-Bit-Variable ist. Da liegt der Verdacht nahe, dass ein Integer in einer 64-Bit-Exe dann 64 Bit groß wäre, was andere Sprachen ja auch so handhaben. Wird es so sein, Roland?

[Frabbing]

Roland?

[Volkmar]

Was führt Dich zu der Annahme, daß handle% eine 16-Bit-Variable sei? Das war mal so unter 16 Bit und die ersten 32-Bit-Profanversionen hatten das so weiter beibehalten. Inzwischen ist handle% = handle&, also beides 32-bit.

var handle% = 2147483638
WhileLoop 16
  Inc handle%
  Print handle%
EndWhile
WaitInput

Würde bei einer 16-Bit-Variablen was ganz Anderes auf den Schirm bringen. Interessant ist wohl eher, ob ein Handle in der Variablen handle% dann noch funktioniert oder ob da Codeanpassungen notwendig sind.

Gruß Volkmar