Bolt mcg into the PowerPC backend. It doesn't build yet, but it is generating

*some* code.

build.lua

@@ -33,7 +33,6 @@ installable {
 		"util/misc+pkg",
 		"util/opt+pkg",
 		"examples+pkg",
-		"mach/proto/mcg+pkg",
 		plat_packages
 	}
 }

first/ackbuilder.lua

@@ -453,7 +453,7 @@ loadtarget = function(targetname)
 		target = targets[targetname]
 		if not target then
 			error(string.format("build file '%s' contains no target '%s'",
-				filename, targetpart))
+				filepart, targetpart))
 		end
 	end
 

mach/powerpc/mcg/table

@@ -423,6 +423,10 @@ PATTERNS
         emit "subf %out, %out, %left"
 		cost 12;
 
+	out:(int)reg = MUL4(left:(int)reg, right:(int)reg)
+		emit "mullw %out, %left, %right"
+		cost 4;
+
 	out:(int)reg = DIV4(left:(int)reg, right:(int)reg)
 		emit "divw %out, %left, %right"
 		cost 4;

mach/proto/mcg/build.lua

@@ -1,43 +1,51 @@
 include("util/mcgg/build.lua")
 
-mcgg {
+definerule("build_mcg",
-	name = "mcgg_c",
+	{
-	srcs = { "./table" }
+		arch = { type="string" }
-}
-
-cprogram {
-	name = "mcg",
-	srcs = {
-		"./*.c",
-		matching(filenamesof("+mcgg_c"), "%.c$"),
 	},
-	deps = {
+	function(e)
-		"+mcgg_c",
+		-- Remember this is executed from the caller's directory; local
-		"./*.h",
+		-- target names will resolve there
-		"h+emheaders",
+		local headers = clibrary {
-		"modules+headers",
+			name = e.name.."/headers",
-		"modules/src/alloc+lib",
+			srcs = {},
-		"modules/src/data+lib",
+			hdrs = {
-		"modules/src/em_code+lib_k",
+				"mach/proto/mcg/*.h",
-		"modules/src/em_data+lib",
+				"mach/"..e.arch.."/mcg/*.h",
-		"modules/src/idf+lib",
+			}
-		"modules/src/read_em+lib_ev",
-		"modules/src/string+lib",
-		"modules/src/system+lib",
-		"util/mcgg+lib",
-	},
-	vars = {
-		["+cflags"] = {
-			"-Werror-implicit-function-declaration",
 		}
-	}
-}
 
--- Just for test purposes for now
+		local tables = mcgg {
-installable {
+			name = e.name.."/tables",
-	name = "pkg",
+			srcs = { "mach/"..e.arch.."/mcg/table" }
-	map = {
+		}
-		["$(PLATDEP)/mcg"] = "+mcg"
+
-	}
+		return cprogram {
-}
+			name = e.name,
+			srcs = {
+				"mach/proto/mcg/*.c",
+				"mach/"..e.arch.."/mcg/platform.c",
+				matching(filenamesof(tables), "%.c$")
+			},
+			deps = {
+				"h+emheaders",
+				"modules+headers",
+				"modules/src/alloc+lib",
+				"modules/src/data+lib",
+				"modules/src/em_code+lib_k",
+				"modules/src/em_data+lib",
+				"modules/src/flt_arith+lib",
+				"modules/src/idf+lib",
+				"modules/src/object+lib",
+				"modules/src/read_em+lib_kv",
+				"modules/src/string+lib",
+				"modules/src/system+lib",
+				"util/mcgg+lib",
+				headers,
+				tables, -- for .h file
+			}
+		}
+	end
+)
 

mach/proto/mcg/treebuilder.c

@@ -441,12 +441,13 @@ static void insn_ivalue(int opcode, arith value)
         case op_rmi: simple_alu2(opcode, value, IR_MOD); break;
         case op_sli: simple_alu2(opcode, value, IR_ASL); break;
         case op_sri: simple_alu2(opcode, value, IR_ASR); break;
-        case op_slu: simple_alu2(opcode, value, IR_LSL); break;
-        case op_sru: simple_alu2(opcode, value, IR_LSR); break;
         case op_ngi: simple_alu1(opcode, value, IR_NEG); break;
 
         case op_adu: simple_alu2(opcode, value, IR_ADD); break;
         case op_sbu: simple_alu2(opcode, value, IR_SUB); break;
+        case op_mlu: simple_alu2(opcode, value, IR_MUL); break;
+        case op_slu: simple_alu2(opcode, value, IR_LSL); break;
+        case op_sru: simple_alu2(opcode, value, IR_LSR); break;
 
         case op_and: simple_alu2(opcode, value, IR_AND); break;
         case op_ior: simple_alu2(opcode, value, IR_OR); break;

plat/build.lua

@@ -1,5 +1,6 @@
 include("mach/proto/as/build.lua")
 include("mach/proto/ncg/build.lua")
+include("mach/proto/mcg/build.lua")
 include("mach/proto/top/build.lua")
 
 definerule("ackfile",

plat/linuxppc/build-tools.lua

@@ -5,8 +5,8 @@ build_as {
 	arch = "powerpc",
 }
 
-build_ncg {
+build_mcg {
-	name = "ncg",
+	name = "mcg",
 	arch = "powerpc",
 }
 
@@ -14,7 +14,7 @@ return installable {
 	name = "tools",
 	map = {
 		["$(PLATDEP)/linuxppc/as"] = "+as",
-		["$(PLATDEP)/linuxppc/ncg"] = "+ncg",
+		["$(PLATDEP)/linuxppc/mcg"] = "+mcg",
 		["$(PLATIND)/descr/linuxppc"] = "./descr",
 		"util/opt+pkg",
 	}

plat/linuxppc/descr

@@ -35,7 +35,7 @@ var C_INCLUDES=-I{PLATFORMDIR}/include -I{EM}/share/ack/include/ansi
 name be
 	from .m.g
 	to .s
-	program {EM}/lib/ack/{PLATFORM}/ncg
+	program {EM}/lib/ack/{PLATFORM}/mcg
 	mapflag -gdb GF=-gdb
 	args {GF?} <
 	stdout