Apologies, I omitted the keyword Function in Function myfunc (parameters
...) etc. in my email.
The problem of re-declaration of myfunc in included file still remains.
Andrew.
> -----Original Message-----
> From: Andrew Gregory [mailto:Andrew.Gregory@npl.co.uk]
> Sent: 25 March 2003 13:58
> To: 'gpc(a)gnu.de'
> Subject: Pascal from C with 30020323
>
>
> I've produced some Pascal which is called from C. The Pascal program
> looks like this:
>
> program myprog;
>
> {$gpc-main=Dummy}
>
> myfunc (parameters.. .) : integer; asmname 'name';
>
> {$include "myfile.pas"}
>
> begin end.
>
>
>
> The function myfunc is given in the file "myfile.pas".
>
> To suit the new compiler 20030323 I changed the declaration above to
>
>
> myfunc (parameters.. .) : integer; attribute (name = 'name');
> external;
>
> The compiler now objects to the re-declaration of myfunc. How
> can I get
> round this
> without editing myfile.pas (which is used by a number of
> other programs,
> so I don't want to alter it)?
>
> Andrew.
>
>
>
> -------------------------------------------------------------------
> This e-mail and any attachments may contain confidential and/or
> privileged material; it is for the intended addressee(s) only.
> If you are not a named addressee, you must not use, retain or
> disclose such information.
>
> NPL Management Ltd cannot guarantee that the e-mail or any
> attachments are free from viruses.
>
> NPL Management Ltd. Registered in England and Wales. No: 2937881
> Registered Office: Teddington, Middlesex, United Kingdom TW11 0LW.
> -------------------------------------------------------------------
>
-------------------------------------------------------------------
This e-mail and any attachments may contain confidential and/or
privileged material; it is for the intended addressee(s) only.
If you are not a named addressee, you must not use, retain or
disclose such information.
NPL Management Ltd cannot guarantee that the e-mail or any
attachments are free from viruses.
NPL Management Ltd. Registered in England and Wales. No: 2937881
Registered Office: Teddington, Middlesex, United Kingdom TW11 0LW.
-------------------------------------------------------------------