🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.pascal
Article #349

Mieszanie asma i pascala

#349
From: Kowal
Date: Sat, 26 Dec 1998 20:54
32 lines
2096 bytes
Mozliwe, ze to nie jest najlesza grupa na ten temat, ale mysle, ze czyta ja
pare osob, ktore wiedza jak mi pomoc.

Chodzi o to, ze niedawno dostlem zrodlo unita, ktorego jedna czesc napisana
byla w asmie, a druga w pascalu. Tak naprawde to czesc pascalowa skladala
sie tylko z kilku procedure XXX; external; i {$L modul.obj}.

Udalo mi sie tez polaczyc te dwa jezyki, ale z jednym wyjatkiem. Chodzi o
to, ze nie wiem jak przekazywac parametry do procedury asemblerowej (ktora
jest zdefiniowane w pliku obj). Ten unit jakos to robil, ale ja tego nie
rozumiem. W czesci interface sa podane parametry, ktore maja zotac prekazane
do procedury, ale w czesci interface juz ich nie ma. Wlaczam wiec zrodlo w
asmie i tu kolejne zaskoczenie: w zrodle procedur nie ma ANI RAZU uzytej
nazwy parametru. Same rejestry. Nie rozumiem tez w jaki sposob zrobione sa
funkcje. Nie ma tam nic co wygladaloby dla mnie na zwrot wartosci.

Domyslam sie, ze zaraz ktos zapyta, po co sie bawic? Przeciez pascal ma
wbudowany asembler.
Ano po to, zeby nie babrac sie z komentami db. Ktore strasznie zasmiecaja
listing. Np. komenda:

mov eax, 12345678h

w asemblerze pascalowym wyglada tak:

db 66h
mov ax, 5678h
dw 1234h

To naprawde utrudnia zrozumienie programu.

Kowal ( kowal2@friko6.onet.pl )
Technical Details
Message-ID: <36854d44.0@news.vogel.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!agh.edu.pl!ict.pwr.wroc.pl!news.task.gda.pl!orion.cst.tpsa.pl!news.tpnet.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!agh.edu.pl!ict.pwr.wroc.pl!news.task.gda.pl!orion.cst.tpsa.pl!news.tpnet.pl!not-for-mail
From: "Kowal" <kowal2@friko6.onet.pl.nospam>
Newsgroups: pl.comp.lang.pascal
Subject: Mieszanie asma i pascala
Lines: 34
X-Newsreader: Microsoft Outlook Express 4.72.3110.5
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Message-ID: <36854d44.0@news.vogel.pl>
Date: Sat, 26 Dec 1998 20:54:21 GMT
NNTP-Posting-Host: 195.116.104.13
X-Complaints-To: abuse@tpsa.pl
X-Trace: news.tpnet.pl 914705661 195.116.104.13 (Sat, 26 Dec 1998 21:54:21 MET DST)
NNTP-Posting-Date: Sat, 26 Dec 1998 21:54:21 MET DST
Organization: TPNET - http://www.tpnet.pl
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit