abort_.c

来自「unix v7是最后一个广泛发布的研究型UNIX版本」· C语言 代码 · 共 9 行

#include <stdio.h>

abort_()
{
fprintf(stderr, "Fortran abort routine called\n");
_cleanup();
abort();
}