func main() {
log.Println("Lomo compiler, pk, 20150716")
flag.Parse()
if sname := name + ".lomo"; name != "" {
if f, err := os.Open(sname); err == nil {
sc := lss.ConnectTo(bufio.NewReader(f))
for err == nil {
p := lpp.ConnectToUnit(sc, resolve)
var u *ir.Unit
if u, err = p.Unit(); err == nil {
if f, err := os.Create(u.Name + ".ui"); err == nil {
target.Impl.NewCode(u, f)
f.Close()
}
if f, err := os.Create(u.Name + ".ud"); err == nil {
target.Impl.NewDef(ir.NewForeign(u), f)
f.Close()
}
if u.Name == "Top" {
cache := make(map[string]*ir.Unit)
ld := func(name string) (ret *ir.Unit) {
if ret = cache[name]; ret == nil {
if f, err := os.Open(name + ".ui"); err == nil {
ret = target.Impl.OldCode(f)
cache[name] = ret
}
f.Close()
}
return
}
var old loom.Cluster
for i := 0; i < 1; i++ {
mm := loom.Init("Top", ld)
loom.Do(mm, nil, old).Wait()
loom.Close(mm).Wait()
old = mm
}
}
}
}
}
}
loom.Exit()
}
func TestBasics(t *testing.T) {
runtime.GOMAXPROCS(runtime.NumCPU())
if f, err := os.Open("Basic.lomo"); err == nil {
sc := lss.ConnectTo(bufio.NewReader(f))
for err == nil {
p := lpp.ConnectToUnit(sc, resolve)
var u *ir.Unit
if u, err = p.Unit(); err == nil {
if f, err := os.Create(u.Name + ".ui"); err == nil {
target.Impl.NewCode(u, f)
f.Close()
}
if f, err := os.Create(u.Name + ".ud"); err == nil {
target.Impl.NewDef(ir.NewForeign(u), f)
f.Close()
}
if u.Name == "Top" {
cache := make(map[string]*ir.Unit)
ld := func(name string) (ret *ir.Unit) {
if ret = cache[name]; ret == nil {
if f, err := os.Open(name + ".ui"); err == nil {
ret = target.Impl.OldCode(f)
cache[name] = ret
}
f.Close()
}
return
}
var old loom.Cluster
for i := 0; i < 100; i++ {
mm := loom.Init("Top", ld)
loom.Do(mm, nil, old).Wait()
loom.Close(mm).Wait()
old = mm
}
}
}
}
}
}