Como gerar o exe apesar de um "unresolved external"

Como gerar o exe apesar de um "unresolved external"

Postby Coiote » Thu Nov 05, 2009 9:07 am

Olá colegas

Existiria no Harbour uma cláusula semelhante ao
BLINKER EXECUTABLE NODELETE
que gera o exe apesar de um "unresolved external" como, por exemplo, na falta de um dos módulos compilados com /m no programa abaixo?

Calc.prg:
---------
Function Main()
Cliente := "JOAO"
If Cliente = "JOAO"
Soma(1, 1)
ElseIf Cliente = "MARIA"
Subtrai(1, 1) // Este prg nao consta em Joao.lnk
Endif // Como gero o exe apesar do
Return Nil // unresolved external?

Soma.prg:
---------
Proc Soma(A,B)
Return A+B

Joao.lnk:
-----------
Calc
Soma

Estou compilando assim:
compila @Joao

Compila.bat (parte dele)
-----------------------------
\Harbour\Bin\harbour @%1.lnk -m -n -q0 -i%HB_INC_INSTALL% %2 %3 %HARBOURFLAGS%

Rem Arquitetura w32:

bcc32 -O2 -d %CFLAGS% -I%HB_INC_INSTALL% -L%HB_LIB_INSTALL% %1.c %HB_USER_LIBS% hbcpage.lib hbdebug.lib hbvm.lib hbrtl.lib gtwin.lib hblang.lib hbrdd.lib hbmacro.lib hbpp.lib rddfpt.lib rddntx.lib rddcdx.lib hbhsx.lib hbsix.lib hbcommon.lib hbpcre.lib hbzlib.lib
Coiote
 
Posts: 19
Joined: Tue Oct 06, 2009 7:26 pm

Re: Como gerar o exe apesar de um "unresolved external"

Postby Antonio Linares » Sat Nov 07, 2009 6:59 am

Puedes crear una función "dummy" que no haga nada:
Code: Select all  Expand view

function Subtrai()
return nil
 

de esa forma ya podrás enlazar y construir el EXE, aunque no funcione correctamente.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35254
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to All products support

Who is online

Users browsing this forum: No registered users and 1 guest