From: Maurice Lombardi <Maurice DOT Lombardi AT ujf-grenoble DOT fr>
Newsgroups: comp.os.msdos.djgpp
Subject: Re: link error with gpc
Date: Thu, 13 Sep 2001 18:32:47 +0200
Organization: Universite Joseph Fourier - Grenoble 1
Lines: 39
Message-ID: <3BA0DFAF.6030709@ujf-grenoble.fr>
References: <20010910 DOT 230100 DOT 8798 DOT 1 DOT vmccar AT juno DOT com> <200109111130 DOT f8BBUTV25979 AT postino5 DOT prima DOT com DOT ar>
NNTP-Posting-Host: knautie.ujf-grenoble.fr
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: rhone.ujf-grenoble.fr 1000398712 34008 152.77.252.196 (13 Sep 2001 16:31:52 GMT)
X-Complaints-To: abuse AT ujf-grenoble DOT fr
NNTP-Posting-Date: Thu, 13 Sep 2001 16:31:52 +0000 (UTC)
User-Agent: Mozilla/5.0 (Windows; U; Win98; fr-FR; rv:0.9.2) Gecko/20010726 Netscape6/6.1
X-Accept-Language: fr,it,en
To: djgpp AT delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp
Reply-To: djgpp AT delorie DOT com

Orlando P. Hevia wrote:

> I am compiling a subroutine in PASCAL, no problem at 
> compiling time.
> 
> At link time with a FORTRAN program (as a library), I 
> receive this error message:
> 
> g:/usr/lib/gcc-
> lib/djgpp/2.953/libgpc.a(rts.o)(.text+0x19c4):rts.c: 
> undefined reference to `tcsetpgrp'
> g:/usr/lib/gcc-
> lib/djgpp/2.953/libgpc.a(rts.o)(.text+0x19f0):rts.c: 
> undefined reference to `tcgetpgrp'
> collect2: ld returned 1 exit status
> make.exe: *** [tpbigp.exe] Error 1
> 
> The PASCAL source is a sample of how to add foreign 
> routines to the main program. Both FORTRAN an C foreign 
> routines are correctly linked. Only PASCAL has the problem.


You should look carefully in the directory %DJDIR%\doc\gpc\demos
to the demos programs beginning with gpc_c and c_gpc which explain
how to call pascal from c and c from pascal.

 
Maurice


-- 
        Maurice Lombardi
Laboratoire de  Spectrometrie Physique,
Universite Joseph Fourier de Grenoble, BP87
38402 Saint Martin d'Heres Cedex     FRANCE
Tel: 33 (0)4 76 51 47 51
Fax: 33 (0)4 76 51 45 44
mailto:Maurice DOT Lombardi AT ujf-grenoble DOT fr