FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index All products support Como gerar o exe apesar de um "unresolved external"
Posts: 19
Joined: Tue Oct 06, 2009 07:26 PM
Como gerar o exe apesar de um "unresolved external"
Posted: Thu Nov 05, 2009 09: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

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Como gerar o exe apesar de um "unresolved external"
Posted: Sat Nov 07, 2009 06:59 AM
Puedes crear una función "dummy" que no haga nada:
Code (fw): Select all Collapse
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

Continue the discussion