Mercurial > repos > rhope
changeset 180:c40e0faa1c92
Add Call to Dict and List
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 19 Jun 2011 10:43:11 -0700 |
parents | 64be565a40c6 |
children | a658c17148cb |
files | dict.rhope list.rhope |
diffstat | 2 files changed, 22 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/dict.rhope Sat Jun 18 11:11:58 2011 -0700 +++ b/dict.rhope Sun Jun 19 10:43:11 2011 -0700 @@ -328,3 +328,14 @@ } } +Call@Dictionary[dict,index:out,notfound] +{ + out,notfound <- [dict]Index[index] +} + +Call@Empty Dictionary[dict,index:out,notfound] +{ + notfound <- index +} + +
--- a/list.rhope Sat Jun 18 11:11:58 2011 -0700 +++ b/list.rhope Sun Jun 19 10:43:11 2011 -0700 @@ -442,3 +442,14 @@ { out <- _=List[a,b] } + +Call@List[list,index:out,notfound] +{ + out,notfound <- [list]Index[index] +} + +Call@List Leaf[list,index:out,notfound] +{ + out,notfound <- [list]Index[index] +} +