diff options
| author | bringert <bringert@cs.chalmers.se> | 2005-11-28 23:02:04 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2005-11-28 23:02:04 +0000 |
| commit | 967891cfd7eec5e90185b1b8b5c5819885a032ea (patch) | |
| tree | ed332bebdb7eb4ead8b6a6c058af4a6a549b670c /transfer/examples | |
| parent | 884055566e82c1ab9829c75f674838d272ff099f (diff) | |
Transfer compiler: extended variable removal to variables bound in case expressions.
Diffstat (limited to 'transfer/examples')
| -rw-r--r-- | transfer/examples/layout.tr | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/transfer/examples/layout.tr b/transfer/examples/layout.tr index 15f0aac3a..46adf5631 100644 --- a/transfer/examples/layout.tr +++ b/transfer/examples/layout.tr @@ -3,3 +3,7 @@ x = let x : T = y in case y of f -> q _ -> a + +f = \x -> case x of + { r = _ } -> 0 + |