return failure from push() in libpack instead of longjmping

Related to #1801.

diff --git a/lib/pack/ccomps.c b/lib/pack/ccomps.c
index 4f9ac80e83df5bf1a97da5928e8531afa8937fee..a20c91289129ab85cb55599811ecbc6a48ea648d 100644 (file)
--- a/lib/pack/ccomps.c
+++ b/lib/pack/ccomps.c
@@ -78,15 +78,14 @@ static int push(stk_t* sp, Agnode_t * np)
        if (sp->curblk->next == NULL) {
            blk_t *bp = malloc(sizeof(blk_t));
            if (bp == 0) {
-               agerr(AGERR, "gc: Out of memory\n");
-               longjmp(jbuf, 1);
+               return -1;
            }
            bp->prev = sp->curblk;
            bp->next = NULL;
            bp->data = calloc(BIGBUF, sizeof(Agnode_t *));
            if (bp->data == 0) {
-               agerr(AGERR, "gc: Out of memory\n");
-               longjmp(jbuf, 1);
+               free(bp);
+               return -1;
            }
            bp->endp = bp->data + BIGBUF;
            sp->curblk->next = bp;