diff --git a/tsvm_core/src/net/torvald/tsvm/VMJSR223Delegate.kt b/tsvm_core/src/net/torvald/tsvm/VMJSR223Delegate.kt
index 4cc6095..e0199b3 100644
--- a/tsvm_core/src/net/torvald/tsvm/VMJSR223Delegate.kt
+++ b/tsvm_core/src/net/torvald/tsvm/VMJSR223Delegate.kt
@@ -126,7 +126,11 @@ class VMJSR223Delegate(val vm: VM) {
     }
 
     fun spin() {
-        Thread.sleep(4L);
+        Thread.sleep(4L)
+    }
+
+    fun sleep(time: Long) {
+        Thread.sleep(time)
     }
 
     fun waitForMemChg(addr: Int, andMask: Int, xorMask: Int) {