Mercurial > repos > rhope
changeset 73:6a1a7d5cc2d9
Add some error checking, cleanup output and add a bad test file
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 19 Jun 2010 23:13:41 -0400 |
parents | f7bcf3db1342 |
children | a844c623c7df |
files | nworker.rhope parser_old.rhope testbad.fc |
diffstat | 3 files changed, 10 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/nworker.rhope Fri Jun 18 17:00:50 2010 -0400 +++ b/nworker.rhope Sat Jun 19 23:13:41 2010 -0400 @@ -376,6 +376,7 @@ If[[[node]Type >>] = ["output"]] { out <- nodelist + }{ [node]Has Input Types? {
--- a/parser_old.rhope Fri Jun 18 17:00:50 2010 -0400 +++ b/parser_old.rhope Sat Jun 19 23:13:41 2010 -0400 @@ -1308,6 +1308,7 @@ Register Workers Compile[prog, worker, name:out] { + Print[["Registering "]Append[name]] If[[ Type Of[[worker]Trees >>] ] = ["Foreign Lib"]] { convention <- Val[[[worker]Trees >>]Language >>] } { convention <- "rhope" } @@ -1327,6 +1328,7 @@ ]Library <<[ [[worker]Trees >>]Name >> ] }{ + Print[["Transforming "]Append[name]] trees, nworker, refs <- Add List to Worker[[worker]Trees >>, [NWorker["rhope"]]Uses[[worker]Uses Stores >>], prog, worker, Dictionary[]] final nworker <- Fold[[["Add Wires Helper"]Set Input[3, worker]]Set Input[4, refs], nworker, trees] }