home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Microsoft Programmer's Library 1.3
/
Microsoft-Programers-Library-v1.3.iso
/
sampcode
/
masm
/
masm6
/
mixed
/
pasmain.pas
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS/Acorn
UTF-8
Wrap
Pascal/Delphi Source File
|
1990-12-03
|
286 b
|
11 lines
(* Calls assembly module Power2 (defined in PASCAL.ASM)
* To compile:
* PL pasmain.pas pascal.obj
*)
program Asmtest( input, output );
function Power2( a:integer; b:integer ): integer; extern;
begin
writeln( '3 times 2 to the power of 5 is ', Power2( 3, 5 ) );
end.