vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 05:12:26 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Update bootstrap C source.

Browse source
This commit is contained in:
David Brown 2016-12-05 12:07:40 +00:00
parent e6c858e6e7
commit c7e88f4634
186 changed files with 489 additions and 332 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/compiler/OPM.Mod
View file

@ -767,6 +767,8 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *)
END CloseFiles;
(* === Installation directory discovery === *)
PROCEDURE IsProbablyInstallDir(s: ARRAY OF CHAR): BOOLEAN;
VAR testpath: ARRAY 1024 OF CHAR; identity: Platform.FileIdentity;
BEGIN
@ -790,11 +792,11 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *)
PROCEDURE FindInstallDir;
VAR i: INTEGER;
BEGIN
(* First try location of binary (with -parts appended) *)
(* First try location of binary (with <name>.d appended) *)
COPY(Modules.BinaryDir, InstallDir);
Strings.Append("/", InstallDir);
Strings.Append(Configuration.name, InstallDir);
Strings.Append("-parts", InstallDir);
Strings.Append(".d", InstallDir);
IF IsProbablyInstallDir(InstallDir) THEN RETURN END;
(* Now test whether binary is in bin directory under install dir. *)