tools.test: Make the flag public. Finish porting tester changes to fuzzer.

[factor.git] / unmaintained / graph-theory / graph-theory.factor

diff --git a/unmaintained/graph-theory/graph-theory.factor b/unmaintained/graph-theory/graph-theory.factor
index 1b4224c864727a704c017979c10d2fb7e89b239f..e14ffb4a83911b421f9ff29d816934a79742d79e 100644 (file)
--- a/unmaintained/graph-theory/graph-theory.factor
+++ b/unmaintained/graph-theory/graph-theory.factor
@@ -34,7 +34,7 @@ M: graph num-vertices
     vertices length ;
 
 M: graph num-edges
-   [ vertices ] [ '[ _ adjlist length ] sigma ] bi ;
+   [ vertices ] [ '[ _ adjlist length ] map-sum ] bi ;
 
 M: graph adjlist
     [ vertices ] [ swapd '[ _ swap _ adj? ] filter ] bi ;