PC Toledo

ederxc escreveu:o que poderia ser este erro?

Código: Selecionar todos

error eart 0082: segment  '_ntool '  (class 'code') size excceds 64k

Esse erro, analisando melhor, está parecendo corrupção de biblioteca ou objeto. Tente linkar seu programa sem nenhuma biblioteca ou objeto. Vá incluindo todos de novo, um a um, até o erro aparecer de novo. Acho que pode muito bem ser algum arquivo corrompido.

pois é maligno , ja havia tentado isso antes ! linkei apenas com a CT.lib

if not errorlevel 1 rtlink file %1,ct.lib

Se você apenas incluiu a CATools e o erro persiste, então tente pegar outra cópia dela (apenas as LIBs), mas sem apagar a anterior. Apenas renomeie os arquivos antigos, para o caso de haver problema no HD.
Uma LIB corrompida poderia ser a causadora do erro.

Po, a sintaxe não tá errada, não? Ao invés de
if not errorlevel 1 rtlink file %1,ct.lib
não deveria ser
if not errorlevel 1 rtlink file %1 library ct52?

Do jeito que está, não fica parecendo ao Blinker que CT, em "file %1,ct", é um OBJ, aí o Blinker tenta linkar a LIB como se fosse um OBJ?

Se houver mais de um objeto/lib:
if not errorlevel 1 rtlink file %1,outroobj lib ct52,outralib

Boa observação. Não tinha notado isso, até porque, a primeira coisa que se imagina é que o batch de compilação jamais produziria aquele erro estranho. De qualquer forma, se for assim que o colega compila/linka, é claro que só vai dar problema.
Muito embora ele tenha dito que testou a compilação sem arquivo nenhum e foi colocando um a um, como eu sugeri, e não deu problema até chegar na CATools. Então, não sei mais o que dizer.

Eder,

Altere o seu CL.BAT para o seguinte:
clipper %1
rtlink file %1,timeslic lib ct52

(o "if not errorlevel..." pode deletar. É, a rigor, dispensável)

O que vai acontecer quando vc rodar CL XPTO:
- o Clipper vai criar o arquivo xpto.OBJ a partir de xpto.PRG
- o Rtlink vai juntar o xpto.OBJ e o timeslic.OBJ e vai criar o xpto.EXE, depois de pegar a função Getinput() da LIB ct52...


Pra ficar mais claro, vamos complicar: além do "timeslic.obj", vamos imaginar que vc precisa linkar o "eolo.obj" e o "eder.obj" e que, além disso, vc usa a função LF_FOPEN() que está na LFN.lib e algumas funções do PageScript que estão em PS52.lib... Como fica?

clipper %1
rtlink file %1,timeslic,eolo,eder lib ct52,lfn,ps52

Então:
- "file %1,timeslic,eolo,eder" contém os arquivos OBJ, separados por ","
- "lib ct52,lfn,ps52" são as bibliotecas a usar, separadas por ","

:)Pos Bom dia amigos, era isso ae Eolo , matou a pau , fiz a linkedi??o e ? deu erro algum. -:]



Agora que deu certo veresmos oq ue consigo com o Getinput()

um grande abra?o amigos e muito obrigado pelo empenho ...

Tem essa lib CT para Harbour?

No xHarbour faz parte do core:
E no Harbour faz parte das bibliotecas extras:
Para usar no Harbour, basta incluir o arquivo hbct.hbc na compilação: