diff options
-rw-r--r-- | compiler/utils/GraphColor.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/GraphColor.hs b/compiler/utils/GraphColor.hs index 34cbb29b02..4c1388e91d 100644 --- a/compiler/utils/GraphColor.hs +++ b/compiler/utils/GraphColor.hs @@ -193,7 +193,7 @@ colorScan_spin iterative triv spill graph -- we were able to coalesce something -- go back to Simplify and see if this frees up more nodes to be trivially colorable. - (graph2, kksCoalesceFound @(_:_)) + (graph2, kksCoalesceFound@(_:_)) -> colorScan_spin iterative triv spill graph2 ksTriv ksSpill (reverse kksCoalesceFound ++ kksCoalesce) |