From bcb97a336e56fa28c4f0061602e355a3ef5abaf6 Mon Sep 17 00:00:00 2001 From: Krasimir Angelov Date: Thu, 14 Sep 2017 18:11:24 +0200 Subject: make the API for indexing in the parser and the linearizer public since it will be needed in the Haskell binding --- src/runtime/c/pgf/reader.c | 14 +------------- 1 file changed, 1 insertion(+), 13 deletions(-) (limited to 'src/runtime/c/pgf/reader.c') diff --git a/src/runtime/c/pgf/reader.c b/src/runtime/c/pgf/reader.c index 2129269e8..2821857d6 100644 --- a/src/runtime/c/pgf/reader.c +++ b/src/runtime/c/pgf/reader.c @@ -936,18 +936,6 @@ pgf_read_pargs(PgfReader* rdr, PgfConcr* concr) return pargs; } -extern void -pgf_parser_index(PgfConcr* concr, - PgfCCat* ccat, PgfProduction prod, - bool is_lexical, - GuPool *pool); - -extern void -pgf_lzr_index(PgfConcr* concr, - PgfCCat* ccat, PgfProduction prod, - bool is_lexical, - GuPool *pool); - static bool pgf_production_is_lexical(PgfReader* rdr, PgfProductionApply *papp) { @@ -1075,7 +1063,7 @@ pgf_read_cnccat(PgfReader* rdr, PgfAbstr* abstr, PgfConcr* concr, PgfCId name) int len = last + 1 - first; cnccat->cats = gu_new_seq(PgfCCat*, len, rdr->opool); - + for (int i = 0; i < len; i++) { int fid = first + i; PgfCCat* ccat = gu_map_get(concr->ccats, &fid, PgfCCat*); -- cgit v1.2.3