Как в Borland C++ привязать к проекту файл temp.asm
Почему в файле prim.cpp на строке
prim();
это вызов функции асма выдает ошибку
undefined simbol _prim in module primc.cpp
Кто то писал, что надо назвать функцию с (черточкой)_
Но бесполезно, назовешь с _(одной чертой), выдаст ошибку, что не нашел с __(двумя чертами)
Кто то писал, как подключен prim.asm?
Никак, он и так видит файл асма, потому что создает prim.obj
просто функцию объявляешь так:
| Код |
extern "C"
{ void prim (void);}
|
prim.cpp
| Код |
#include <conio.h>
#include <iostream.h>
#include <limits.h>
inline int test(long int a)
{return ((a>>15)+1)&~1;}
int primC(int a, const int b, const int c, const int d)
{ double z = (2.0*a+1.0*b*c)/(d-a);
if (z > SHRT_MIN && z < SHRT_MAX) return z;
else
{ cout << "\n!!!!!!!!!!! Limits of int value !!!!!!!!!!!\n x = "
<< z << endl;
return SHRT_MIN; //-32768
}
}
extern "C"
{ void prim (void);}
int X,a;
void main(void)
{ char ch;
const b=-333;
const c= 1000;
const d=-10;
long int a1;
do {X = 0;
//clrscr();
cout << "\n x=(2*a+b*c)/(d-a); int x,a,b=-333,c=1000,d=-10;" << endl;
do{ cout<<"\n Enter a [-32768..32767], a!= " << d << " ====> ";
cin>> a1;
}while (test(a1) || d - a1 == 0 || test (d-a1));
a = a1;
X = primC(a, b, c, d);
if (X!=SHRT_MIN)
{ cout << " Result (C++) x = " << X << endl;
X = 0;
prim();
cout << " Result (ASM) x = " << X << endl;
}
cout << "\n\nExit? - (y/n)\n";
ch = getch();
} while (!(ch=='y' || ch =='Y'));
}
|
prim.asm
| Код |
title Арифметические выражения
model large,C
; tasm PRIM.ASM /l /ml !!!!!!!!!!!!!!!!!!!!!!!!
; CopyRight by Голубь Н.Г., 1993-1997, 2000
; Пример 6.2.
;x=(2*a + b*c)/(d-a), d<>a !!!
;int x,a,b,c,d;
CODESEG
;============= ГЛОБАЛЬНЫЕ ПЕРЕМЕННЫЕ
Extrn C X:word
Extrn C a:word
;=========== ЛОКАЛЬНЫЕ ПЕРЕМЕННЫЕ - КОНСТАНТЫ
b dw -333
c dw 1000
d dw -10
;===================================================
Public C prim
prim proc far
mov ax,2
Imul a ; <dx>:<ax>=2*a
mov bx,dx ; bx <=== ст.часть (dx)
mov cx,ax ; cx <=== мл.часть (ax)
mov ax,b
Imul c ; <dx>:<ax>=b*c
add ax,cx ; <ax>=<ax>+<cx> (мл.часть)
adc dx,bx ; <dx>=<dx>+<bx> (ст.часть)
mov cx,d
sub cx,a ; <cx>=<cx>-a
Idiv cx ; <ax>=<dx>:<ax>/<cx>
mov X,ax
ret
prim endp
end
|
|
)