       (is (= (.get_total_executors summary)) 3)
       (is (= (.get_total_topologies summary)) 1)
 
-      ;test for many-topology case
+      ;;test for many-topology case
       (bind topology2 (Thrift/buildTopology
                         {"2" (Thrift/prepareSpoutDetails
                                (TestPlannerSpout. true) (Integer. 4))}

      (is (= (.get_total_workers summary) 10))
      (is (= (.get_total_executors summary)) 12)
      (is (= (.get_total_topologies summary)) 3)
      )))

(deftest test-rebalance

                                       TOPOLOGY-EVENTLOGGER-EXECUTORS 0
                                       })))]
    (letlocals
      ;;test for 0-topology case
      (.advanceClusterTime cluster 11)
      (bind owner-resource-summaries (.getOwnerResourceSummaries (.getNimbus cluster) nil))
      (bind summary (first owner-resource-summaries))
      (is (nil? summary))

      ;;test for 1-topology case
      (bind topology (Thrift/buildTopology
                       {"1" (Thrift/prepareSpoutDetails
                              (TestPlannerSpout. true) (Integer. 3))}
