Mercurial > repos > rhope
diff kernel.rhope @ 69:d0ce696786cc
Clean up debug print statements a bit. Fix bug that prevented workers that took no inputs from working. Remove workaround in Array for said bug.
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Wed, 16 Jun 2010 04:36:08 +0000 |
parents | 079200bc3e75 |
children | c40c3d399133 |
line wrap: on
line diff
--- a/kernel.rhope Mon Jun 07 15:36:04 2010 -0400 +++ b/kernel.rhope Wed Jun 16 04:36:08 2010 +0000 @@ -59,10 +59,10 @@ If[[n] < [0i32]] { val <- [0i32]-[n] - buf <- [Array[1]]Append[45i8] + buf <- [Array[]]Append[45i8] }{ val <- Val[n] - buf <- Array[1] + buf <- Array[] } fbuf <- [_Print Int32[val, buf]]Append[10i8] out <- write[1i32, fbuf, Int64[[fbuf]Length >>]] @@ -152,7 +152,7 @@ out <- [_internal_blueprint_eq[left,right]]!=[0] } -Array[n:out(Array)] +Array[:out(Array)] { out <- [[_internal_array_allocboxed[0] ]Length <<[0]