X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/b2ca4022ea6c61e10ac87a0a92bb0f998ecf8b48..561f9a30af99cfbd4dbb51bcc82506c987cb92a9:/src/closure.c diff --git a/src/closure.c b/src/closure.c index 87ad8c5f..03a59f0b 100644 --- a/src/closure.c +++ b/src/closure.c @@ -1,5 +1,5 @@ /* Subroutines for bison - Copyright (C) 1984, 1989, 2000 Free Software Foundation, Inc. + Copyright 1984, 1989, 2000 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -18,15 +18,11 @@ Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ - #include "system.h" -#include "alloc.h" #include "gram.h" #include "closure.h" - -extern short **derives; - -extern void RTC PARAMS ((unsigned *, int)); +#include "derives.h" +#include "warshall.h" short *itemset; short *itemsetend; @@ -126,7 +122,7 @@ set_firsts (void) varsetsize = rowsize = WORDSIZE (nvars); - firsts = NEW2 (nvars * rowsize, unsigned); + firsts = XCALLOC (unsigned, nvars * rowsize); row = firsts; for (i = ntokens; i < nsyms; i++) @@ -175,7 +171,7 @@ set_fderives (void) int ruleno; int i; - fderives = NEW2 (nvars * rulesetsize, unsigned) - ntokens * rulesetsize; + fderives = XCALLOC (unsigned, nvars * rulesetsize) - ntokens * rulesetsize; set_firsts (); @@ -212,17 +208,17 @@ set_fderives (void) print_fderives (); #endif - FREE (firsts); + XFREE (firsts); } void new_closure (int n) { - itemset = NEW2 (n, short); + itemset = XCALLOC (short, n); rulesetsize = WORDSIZE (nrules + 1); - ruleset = NEW2 (rulesetsize, unsigned); + ruleset = XCALLOC (unsigned, rulesetsize); set_fderives (); } @@ -314,7 +310,7 @@ closure (short *core, int n) void free_closure (void) { - FREE (itemset); - FREE (ruleset); - FREE (fderives + ntokens * rulesetsize); + XFREE (itemset); + XFREE (ruleset); + XFREE (fderives + ntokens * rulesetsize); }