From e0b8bd221d3e2b6ca355d212b9ca913e8ec22909 Mon Sep 17 00:00:00 2001
From: David Given <dg@cowlark.com>
Date: Sat, 13 Aug 2016 13:07:19 +0200
Subject: [PATCH] Pascal runtime library now builds.

---
 lang/pc/libpc/build.lua | 46 +++++++++++++++++++++++++++++++++++++++++
 plat/build.lua          |  3 ++-
 2 files changed, 48 insertions(+), 1 deletion(-)
 create mode 100644 lang/pc/libpc/build.lua

diff --git a/lang/pc/libpc/build.lua b/lang/pc/libpc/build.lua
new file mode 100644
index 000000000..a86ce616e
--- /dev/null
+++ b/lang/pc/libpc/build.lua
@@ -0,0 +1,46 @@
+include("plat/build.lua")
+
+for _, plat in ipairs(vars.plats) do
+    acklibrary {
+        name = "lib_"..plat,
+        srcs = {
+			"./*.c",
+			"./bts.e",
+			"./encaps.e",
+			"./fef.e",
+			"./fif.e",
+			"./gto.e",
+			"./hol0.e",
+			"./sav.e",
+			"./sig.e",
+			"./trap.e",
+			"./trp.e",
+        },
+		hdrs = {}, -- must be empty
+		deps = {
+			"lang/cem/libcc.ansi/headers+headers",
+			"plat/"..plat.."+headers",
+			"h+emheaders",
+		},
+        vars = { plat = plat }
+    }
+
+	ackfile {
+		name = "prt_"..plat,
+		srcs = { "./head_pc.e" },
+		vars = { plat = plat },
+		deps = {
+			"h+emheaders"
+		}
+	}
+
+	installable {
+		name = "pkg_"..plat,
+		map = {
+			["$(PLATIND)/"..plat.."/pascal.o"] = "+prt_"..plat,
+			["$(PLATIND)/"..plat.."/libpascal.a"] = "+lib_"..plat,
+		}
+	}
+end
+
+
diff --git a/plat/build.lua b/plat/build.lua
index 8802ce636..05f746fea 100644
--- a/plat/build.lua
+++ b/plat/build.lua
@@ -93,8 +93,9 @@ definerule("build_plat_libs",
 			name = e.name,
 			map = {
 				"lang/basic/lib+pkg_"..e.plat,
-				"lang/m2/libm2+pkg_"..e.plat,
 				"lang/cem/libcc.ansi+pkg_"..e.plat,
+				"lang/m2/libm2+pkg_"..e.plat,
+				"lang/pc/libpc+pkg_"..e.plat,
 				["$(PLATIND)/"..e.plat.."/libem.a"] = "mach/"..e.arch.."/libem+lib_"..e.plat,
 				["$(PLATIND)/"..e.plat.."/libend.a"] = "mach/"..e.arch.."/libend+lib_"..e.plat,
 				["$(PLATIND)/"..e.plat.."/libsys.a"] = "mach/"..e.arch.."/libsys+lib_"..e.plat,