We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 31a4068 commit 9910d29Copy full SHA for 9910d29
libcobj/app/src/main/java/jp/osscons/opensourcecobol/libcobj/call/CobolResolve.java
@@ -552,9 +552,12 @@ private static void cancelCallStackList(CobolCallStackList p) {
552
// プログラムをキャンセル
553
String programName = p.getName();
554
if (programName != null) {
555
- CobolRunnable runnable = callTable.get(programName);
556
- if (runnable != null && !runnable.isActive()) {
557
- runnable.cancel();
+ try {
+ CobolResolve.cobCancel(programName);
+ } catch (CobolStopRunException e) {
558
+ throw new CobolRuntimeException(
559
+ CobolRuntimeException.COBOL_FATAL_ERROR,
560
+ "Failed to cancel program: " + programName);
561
}
562
563
0 commit comments