Revision 72747d91 src/Ganeti/HTools/Graph.hs
b/src/Ganeti/HTools/Graph.hs | ||
---|---|---|
28 | 28 |
|
29 | 29 |
{- |
30 | 30 |
|
31 |
Copyright (C) 2012, Google Inc. |
|
31 |
Copyright (C) 2012, 2013, Google Inc.
|
|
32 | 32 |
|
33 | 33 |
This program is free software; you can redistribute it and/or modify |
34 | 34 |
it under the terms of the GNU General Public License as published by |
... | ... | |
147 | 147 |
neighColors :: Graph.Graph -> VertColorMap -> Graph.Vertex -> [Color] |
148 | 148 |
neighColors g cMap v = verticesColors cMap $ neighbors g v |
149 | 149 |
|
150 |
{-# ANN colorNode "HLint: ignore Use alternative" #-} |
|
150 | 151 |
-- | Color one node. |
151 | 152 |
colorNode :: Graph.Graph -> VertColorMap -> Graph.Vertex -> Color |
152 | 153 |
-- use of "head" is A-ok as the source is an infinite list |
Also available in: Unified diff