Merge branch '2.x-read-internal-traces' into '2.x'

Write parsers for internal (proprietary) traces and environment files

See merge request opendc/opendc-simulator!37

1 files changed, 8 insertions, 9 deletions

diff --git a/opendc/opendc-compute/src/main/kotlin/com/atlarge/opendc/compute/virt/driver/hypervisor/HypervisorVirtDriver.kt b/opendc/opendc-compute/src/main/kotlin/com/atlarge/opendc/compute/virt/driver/hypervisor/HypervisorVirtDriver.kt
index 05e1ab90..f50d694a 100644
--- a/opendc/opendc-compute/src/main/kotlin/com/atlarge/opendc/compute/virt/driver/hypervisor/HypervisorVirtDriver.kt
+++ b/opendc/opendc-compute/src/main/kotlin/com/atlarge/opendc/compute/virt/driver/hypervisor/HypervisorVirtDriver.kt
@@ -190,15 +190,14 @@ class HypervisorVirtDriver(
                 }
             }
 
-            for (i in burst.indices) {
-                monitor.onSliceFinish(
-                    end,
-                    burst[i],
-                    remainder[i],
-                    vms.size,
-                    hostContext.server
-                )
-            }
+            val totalBurst = burst.sum()
+            monitor.onSliceFinish(
+                end,
+                totalBurst,
+                totalBurst - remainder.sum(),
+                vms.size,
+                hostContext.server
+            )
         }
         this.call = call
         call.invokeOnCompletion { this.call = null }