aboutsummaryrefslogtreecommitdiff
path: root/frontend/utilities.icl
diff options
context:
space:
mode:
authorjohnvg2011-04-12 14:28:38 +0000
committerjohnvg2011-04-12 14:28:38 +0000
commit16611833c11257bcf9f2cb425edb742092fb2aec (patch)
tree2ca6ec763867e1cf419e15685528c3461c2e79b3 /frontend/utilities.icl
parentadd BETypeSymbolNoMark to the 64 bit version (diff)
allow qualified imports of class members
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1915 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/utilities.icl')
-rw-r--r--frontend/utilities.icl8
1 files changed, 0 insertions, 8 deletions
diff --git a/frontend/utilities.icl b/frontend/utilities.icl
index f7d7264..de046af 100644
--- a/frontend/utilities.icl
+++ b/frontend/utilities.icl
@@ -419,11 +419,3 @@ where
| d == node_index
= (ds, marks, [d : group])
= close_group node_index ds marks [d : group] pi
-
-replaceTwoDimArrElt :: !Int !Int !.e !{!*{!.e}} -> (!.e, !{!.{!.e}})
-replaceTwoDimArrElt ix1 ix2 el arr
- # (inner_array, arr)
- = replace arr ix1 {}
- (el2, inner_array)
- = replace inner_array ix2 el
- = (el2, { arr & [ix1] = inner_array })