Path: utzoo!attcan!uunet!aplcen!haven!adm!news
From: IN307%DHAFEU11.BITNET@cunyvm.cuny.edu ( Peter Sawatzki)
Newsgroups: comp.lang.pascal
Subject: Re: Wish List for TP6.0
Message-ID: <24615@adm.BRL.MIL>
Date: 26 Sep 90 14:17:31 GMT
Sender: news@adm.BRL.MIL
Lines: 31

Assembly code within TP6.0 ?
Why don't you use the TPA package from Richard W. Prescott ?
It works for TP4.0, 5.0 and 5.5 and modifies the compiler at
runtime to "know" the keyword "Assemble". Example:

Procedure PopAx;
Assemble
  Pop Ax
End;

Example 2:
Var b: Word;    (global)

Procedure Xyz;
Var
  a: Word;      (local)
Begin
  a:= 3;
  Assemble
    Mov Ax,a                ;local
    Cmp Ax,3
    Jne label1
    PAS Halt(10);            (a Pascal statement!!!)
label1:
    Mov b,Ax                 ;global
End;


 :::::::::::::::::::::::::::::::::::::::::
: Peter Sawatzki  <IN307DHAFEU11.BITNET> :
 :::::::::::::::::::::::::::::::::::::::::