msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

fix the DB_scope in pgf_read_ngf

Browse Source
This commit is contained in:
krangelov
2021-08-08 16:29:51 +02:00
parent 8d1cc22622
commit f70e1b8772
1 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
src/runtime/c/pgf.cxx
View File

@@ -103,20 +103,22 @@ PgfPGF *pgf_read_ngf(const char *fpath, PgfExn* err)
try { try {
pgf = new PgfPGF(fpath, O_CREAT | O_RDWR, S_IRUSR | S_IWUSR); pgf = new PgfPGF(fpath, O_CREAT | O_RDWR, S_IRUSR | S_IWUSR);
if (DB::get_root<PgfPGFRoot>() == 0) { {
is_new = true;
DB_scope scope(pgf, WRITER_SCOPE); DB_scope scope(pgf, WRITER_SCOPE);
ref<PgfPGFRoot> root = DB::malloc<PgfPGFRoot>(); if (DB::get_root<PgfPGFRoot>() == 0) {
root->major_version = 2; is_new = true;
root->minor_version = 0; ref<PgfPGFRoot> root = DB::malloc<PgfPGFRoot>();
root->gflags = 0; root->major_version = 2;
root->abstract.name = DB::malloc<PgfText>(); root->minor_version = 0;
root->abstract.name->size = 0; root->gflags = 0;
root->abstract.aflags = 0; root->abstract.name = DB::malloc<PgfText>();
root->abstract.funs = 0; root->abstract.name->size = 0;
root->abstract.cats = 0; root->abstract.aflags = 0;
root->abstract.funs = 0;
root->abstract.cats = 0;
DB::set_root<PgfPGFRoot>(root);
}
} }
return pgf; return pgf;