diff --git a/Parallel/IpcParallel/SlaveTask.vb b/Parallel/IpcParallel/SlaveTask.vb
index 4d70380..56ea3aa 100644
--- a/Parallel/IpcParallel/SlaveTask.vb
+++ b/Parallel/IpcParallel/SlaveTask.vb
@@ -152,10 +152,10 @@ Public Class SlaveTask
 
         Dim commandlineArgvs As String = builder(processor, host.HostPort)
 
-        'If Not debugPort Is Nothing Then
-        '    Console.WriteLine(commandlineArgvs)
-        '    Pause()
-        'End If
+        If Not debugPort Is Nothing Then
+            Console.WriteLine(commandlineArgvs)
+            Pause()
+        End If
 
 #If netcore5 = 0 Then
         Call CommandLine.Call(processor, commandlineArgvs)
diff --git a/Parallel/ThreadTask/ThreadTask.vb b/Parallel/ThreadTask/ThreadTask.vb
index 8a5f845..f33fcee 100644
--- a/Parallel/ThreadTask/ThreadTask.vb
+++ b/Parallel/ThreadTask/ThreadTask.vb
@@ -100,7 +100,7 @@ Namespace ThreadTask
         ''' <param name="n_threads"></param>
         ''' <returns></returns>
         Public Function WithDegreeOfParallelism(n_threads As Integer) As ThreadTask(Of TOut)
-            threads = New AsyncHandle(Of TOut)(n_threads) {}
+            threads = New AsyncHandle(Of TOut)(n_threads - 1) {}
             Return Me
         End Function