Mercurial > repos > icfp2013
changeset 19:5a025e6c6f89
simple parallel requests limit test
author | William Morgan <bill@mrgn.org> |
---|---|
date | Fri, 09 Aug 2013 13:53:45 -0700 |
parents | a0e66161bde0 |
children | 92db3d1e8809 |
files | src/requests.tp |
diffstat | 1 files changed, 4 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/requests.tp Fri Aug 09 12:55:38 2013 -0700 +++ b/src/requests.tp Fri Aug 09 13:53:45 2013 -0700 @@ -4,14 +4,12 @@ "\"" . str . "\"" } - evalRequest <- :_id args { + evalRequest <- :id args { #{ - id <- _id +// id <- _id string <- { -// idStr <- id// method not implemented -// idStr <- _id//method not implemented // idStr <- "a"//good -// idStr <- quote("id") . quote(id)//segfault + idStr <- quote("id") . quote(id)//segfault // idStr <- "\"id\":\"" . id . "\""// method not implemented // argsStr <- ""//arguments fold: "" with: :acc el {acc . el} argsStr <- "b" @@ -31,7 +29,7 @@ } main <- { - print: ((evalRequest: #[1 2 3]) string) . "\n" + print: ((evalRequest: "someId" #[1 2 3]) string) . "\n" print: ((guessRequest: "someId" "someProg") string) . "\n" } }