Open-COBOL Uknown错误

Posted 2021-04-16

我一直在努力教自己COBOL。在尝试这样做时，我遇到了一个我无法弄清楚的问题。

我正在运行ubuntu 16.04，并使用GnuCOBOL（Open-COBOL）进行编译。我认为这可能是存储库中的Open-COBOL版本的一个问题，所以我从源代码编译，并收到相同的问题。

尝试运行此代码时：

IDENTIFICATION DIVISION.
PROGRAM-ID. Multi.

DATA DIVISION.
WORKING-STORAGE SECTION.
*> Group Value
   01 VALS.
*> Elementary Value
      05 VAL-1 PIC 9(03) VALUE 4.
      05 VAL-2 PIC 9(03) VALUE 3.
      05 RESULT PIC 9(06).


PROCEDURE DIVISION.
   MULTIPLY VAL-1 BY VAL-2 GIVING RESULT.
   DISPLAY "Result is =" RESULT.
   DISPLAY 'GROUP DATA ITEM = ' VALS.

我收到：

Segmentation fault (core dumped)

我编译：

cobc -free -o Multi.o ./Multi.cob

我似乎无法弄清楚我做错了什么，以及导致seg错误的原因。有任何想法吗？提前致谢！

答案

从您的评论中，您似乎错误地将模块Multi.o视为可执行文件。从模块运行程序Multi的方法是cobcrun Multi。

或者，您可以使用cobc -x创建普通可执行文件。