Gpc <unresolved symbol Assign>
Peter Gerwinski
peter at agnes.dida.physik.uni-essen.de
Tue Feb 4 00:21:02 CET 1997
> I have no problems compiling and running under Borland, but I do not have
> dos based machines at my disposal and would like to compile under either
> gpc or xlp.
Xlp? Is that something we should know about?
> Is there some library i need to tell it to link?
GNU Pascal has no built-in Assign procedure. You can use the
"BPCompat" Unit from the "contrib" subdirectory of the GPC
source distribution (same as the "System" Unit from the new
BPCompat package). Alternatively you can write it yourself
using Extended Pascal's "bind" mechanism:
Type
WrkString = String ( 255 );
Procedure Assign ( Var T: Text; Name: WrkString );
Var
B: BindingType;
begin (* Assign *)
unbind ( T );
B:= binding ( T );
B.Name:= Name;
bind ( T, B );
B:= binding ( T );
end (* Assign *);
Hope this helps,
Peter
Dipl.-Phys. Peter Gerwinski, Essen, Germany, free physicist and programmer
peter.gerwinski at uni-essen.de - http://home.pages.de/~peter.gerwinski/ [970201]
maintainer GNU Pascal - http://home.pages.de/~gnu-pascal/ [970125]
More information about the Gpc
mailing list