aboutsummaryrefslogtreecommitdiff
path: root/frontend/convertcases.icl
diff options
context:
space:
mode:
Diffstat (limited to 'frontend/convertcases.icl')
-rw-r--r--frontend/convertcases.icl4
1 files changed, 4 insertions, 0 deletions
diff --git a/frontend/convertcases.icl b/frontend/convertcases.icl
index 909209c..22ec9b4 100644
--- a/frontend/convertcases.icl
+++ b/frontend/convertcases.icl
@@ -1414,6 +1414,10 @@ where
distributeLets depth (ArraySelection selector expr_ptr expr) cp_info
# (expr, cp_info) = distributeLets depth expr cp_info
= (ArraySelection selector expr_ptr expr, cp_info)
+ distributeLets depth (DictionarySelection var selectors expr_ptr expr) cp_info
+ # (selectors, cp_info) = distributeLets depth selectors cp_info
+ # (expr, cp_info) = distributeLets depth expr cp_info
+ = (DictionarySelection var selectors expr_ptr expr, cp_info)
distributeLets depth selection cp_info
= (selection, cp_info)