main: compile C source files in packages

TODO: C++ etc. files

ir/ir.go

@@ -19,6 +19,7 @@ import (
 // results.
 type Program struct {
 	Program        *ssa.Program
+	LoaderProgram  *loader.Program
 	mainPkg        *ssa.Package
 	Functions      []*Function
 	functionMap    map[*ssa.Function]*Function
@@ -172,11 +173,12 @@ func NewProgram(lprogram *loader.Program, mainPath string) *Program {
 	}
 
 	p := &Program{
-		Program:     program,
-		mainPkg:     mainPkg,
-		functionMap: make(map[*ssa.Function]*Function),
-		globalMap:   make(map[*ssa.Global]*Global),
-		comments:    comments,
+		Program:       program,
+		LoaderProgram: lprogram,
+		mainPkg:       mainPkg,
+		functionMap:   make(map[*ssa.Function]*Function),
+		globalMap:     make(map[*ssa.Global]*Global),
+		comments:      comments,
 	}
 
 	for _, pkg := range packageList {