GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

Fill in literal cases in Python unmarshaller (untested)

Browse Source
This commit is contained in:
John J. Camilleri
2021-09-03 15:26:10 +02:00
parent 3ecb937753
commit d53b7587f5
3 changed files with 15 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/runtime/python/expr.c
View File

@@ -856,7 +856,7 @@ Type_richcompare(TypeObject *t1, TypeObject *t2, int op)
} else if (op == Py_NE) {
if (cmp) Py_RETURN_FALSE; else Py_RETURN_TRUE;
} else {
PyErr_SetString(PyExc_TypeError, "the operation is not supported");
PyErr_SetString(PyExc_TypeError, "comparison operation not supported");
return NULL;
}
}

15
src/runtime/python/marshaller.c
View File

@@ -53,33 +53,36 @@ PgfExpr eimplarg(PgfUnmarshaller *this, PgfExpr expr)
PgfLiteral lint(PgfUnmarshaller *this, size_t size, uintmax_t *v)
{
return 0;
PyObject *i = PyLong_FromUnsignedLong(*v);
return (PgfLiteral) i;
}
PgfLiteral lflt(PgfUnmarshaller *this, double v)
{
return 0;
PyObject *d = PyFloat_FromDouble(v);
return (PgfLiteral) d;
}
PgfLiteral lstr(PgfUnmarshaller *this, PgfText *v)
{
return 0;
PyObject *s = PyUnicode_FromStringAndSize(v->text, v->size);
return (PgfLiteral) s;
}
PgfType dtyp(PgfUnmarshaller *this, int n_hypos, PgfTypeHypo *hypos, PgfText *cat, int n_exprs, PgfExpr *exprs)
{
PgfText* catname = (PgfText*) malloc(sizeof(PgfText)+cat->size+1);
PgfText *catname = (PgfText*) malloc(sizeof(PgfText)+cat->size+1);
memcpy(catname->text, cat->text, cat->size+1);
catname->size = cat->size;
TypeObject* pytype = (TypeObject*) pgf_TypeType.tp_alloc(&pgf_TypeType, 0);
TypeObject *pytype = (TypeObject*) pgf_TypeType.tp_alloc(&pgf_TypeType, 0);
pytype->cat = catname;
return (PgfType) pytype;
}
void free_ref(PgfUnmarshaller *this, object x)
{
return;
Py_XDECREF(x);
}
static PgfUnmarshallerVtbl unmarshallervtbl =

10
src/runtime/python/test_suite.py
View File

@@ -15,7 +15,7 @@ def test_readPGF_GF():
with pytest.raises(pgf.PGFError):
pgf.readPGF("../haskell/tests/basic.gf")
@pytest.mark.skip(reason="Bug in runtime")
@pytest.mark.skip(reason="Unhandled case in runtime")
def test_readPGF_NGF(NGF):
with pytest.raises(pgf.PGFError):
pgf.readPGF("./basic.ngf")
@@ -34,7 +34,7 @@ def test_bootNGF_GF():
with pytest.raises(pgf.PGFError):
pgf.bootNGF("../haskell/tests/basic.gf", "./abc.ngf")
@pytest.mark.skip(reason="Bug in runtime")
@pytest.mark.skip(reason="Unhandled case in runtime")
def test_bootNGF_NGF(NGF):
with pytest.raises(pgf.PGFError):
pgf.bootNGF("./basic.ngf", "./abc.ngf")
@@ -45,17 +45,17 @@ def test_bootNGF_existing(NGF):
# readNGF
@pytest.mark.skip(reason="Bug in runtime")
@pytest.mark.skip(reason="Unhandled case in runtime")
def test_readNGF_non_existant():
with pytest.raises(FileNotFoundError):
pgf.readNGF("./abc.ngf")
@pytest.mark.skip(reason="Bug in runtime")
@pytest.mark.skip(reason="Unhandled case in runtime")
def test_readNGF_GF():
with pytest.raises(pgf.PGFError):
pgf.readNGF("../haskell/tests/basic.gf")
@pytest.mark.skip(reason="Bug in runtime")
@pytest.mark.skip(reason="Unhandled case in runtime")
def test_readNGF_PGF():
with pytest.raises(pgf.PGFError):
pgf.readNGF("../haskell/tests/basic.pgf")