Mercurial > repos > rhope
comparison functional.rhope @ 92:e73a93fb5de1
Beginning of port of compiler to itself, some bugfixes and a refcount optimization
| author | Mike Pavone <pavone@retrodev.com> |
|---|---|
| date | Mon, 02 Aug 2010 00:58:55 -0400 |
| parents | 6d41b71f1b77 |
| children | a34a982ecd32 |
comparison
equal
deleted
inserted
replaced
| 91:bcdc326b3d6e | 92:e73a93fb5de1 |
|---|---|
| 58 | 58 |
| 59 Find[list,pred:loc,not found] | 59 Find[list,pred:loc,not found] |
| 60 { | 60 { |
| 61 ,not found <- [list]First | 61 ,not found <- [list]First |
| 62 { | 62 { |
| 63 loc <- _Find[list,pred,~] | 63 loc,not found <- _Find[list,pred,~] |
| 64 } | 64 } |
| 65 } | 65 } |
| 66 | 66 |
| 67 _Filter[list,pred,cur,dest:out] | 67 _Filter[list,pred,cur,dest:out] |
| 68 { | 68 { |