aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/trans.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-07-22 12:24:55 -0700
committerGraydon Hoare <[email protected]>2010-07-22 12:24:55 -0700
commiteaa35611dc2c66d73032ece1ddde7881fcaccdee (patch)
treecbc01266700dafadc468bc4947b7053d3014f881 /src/boot/me/trans.ml
parentFix mem op= mem bug in trans.ml (via not terribly good fix). Closes #111. (diff)
downloadrust-eaa35611dc2c66d73032ece1ddde7881fcaccdee.tar.xz
rust-eaa35611dc2c66d73032ece1ddde7881fcaccdee.zip
Add XFAIL'ed test for return-in-iter, call unimpl when we find it. Closes #100.
Diffstat (limited to 'src/boot/me/trans.ml')
-rw-r--r--src/boot/me/trans.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml
index be7adc1a..07b22dca 100644
--- a/src/boot/me/trans.ml
+++ b/src/boot/me/trans.ml
@@ -4532,6 +4532,8 @@ let trans_visitor
calls
| Ast.STMT_ret atom_opt ->
+ if get_stmt_depth cx stmt.id > 0
+ then unimpl (Some stmt.id) "ret within iterator-block";
begin
match atom_opt with
None -> ()