summaryrefslogtreecommitdiff
path: root/src/runtime/dotNet
diff options
context:
space:
mode:
Diffstat (limited to 'src/runtime/dotNet')
-rw-r--r--src/runtime/dotNet/Expr.cs2
-rw-r--r--src/runtime/dotNet/Native.cs4
-rw-r--r--src/runtime/dotNet/Type.cs2
3 files changed, 4 insertions, 4 deletions
diff --git a/src/runtime/dotNet/Expr.cs b/src/runtime/dotNet/Expr.cs
index dada28fc0..407ea4af3 100644
--- a/src/runtime/dotNet/Expr.cs
+++ b/src/runtime/dotNet/Expr.cs
@@ -46,7 +46,7 @@ namespace PGFSharp
using (var strNative = new Native.NativeString(exprStr))
{
var in_ = NativeGU.gu_data_in(strNative.Ptr, strNative.Size, tmp_pool.Ptr);
- var expr = Native.pgf_read_expr(in_, result_pool.Ptr, exn.Ptr);
+ var expr = Native.pgf_read_expr(in_, result_pool.Ptr, tmp_pool.Ptr, exn.Ptr);
if (exn.IsRaised || expr == IntPtr.Zero)
{
throw new PGFError();
diff --git a/src/runtime/dotNet/Native.cs b/src/runtime/dotNet/Native.cs
index bc90aca17..0c055ffd8 100644
--- a/src/runtime/dotNet/Native.cs
+++ b/src/runtime/dotNet/Native.cs
@@ -128,7 +128,7 @@ namespace PGFSharp
public static extern IntPtr pgf_function_type(IntPtr pgf, IntPtr funNameStr);
[DllImport(LIBNAME, CallingConvention = CC)]
- public static extern IntPtr pgf_read_type(IntPtr in_, IntPtr pool, IntPtr err);
+ public static extern IntPtr pgf_read_type(IntPtr in_, IntPtr pool, IntPtr tmp_pool, IntPtr err);
[DllImport(LIBNAME, CallingConvention = CC)]
public static extern void pgf_print_type(IntPtr expr, IntPtr ctxt, int prec, IntPtr output, IntPtr err);
@@ -139,7 +139,7 @@ namespace PGFSharp
public static extern void pgf_print_expr(IntPtr expr, IntPtr ctxt, int prec, IntPtr output, IntPtr err);
[DllImport(LIBNAME, CallingConvention = CC)]
- public static extern IntPtr pgf_read_expr(IntPtr in_, IntPtr pool, IntPtr err);
+ public static extern IntPtr pgf_read_expr(IntPtr in_, IntPtr pool, IntPtr tmp_pool, IntPtr err);
[DllImport(LIBNAME, CallingConvention = CC)]
public static extern IntPtr pgf_compute(IntPtr pgf, IntPtr expr, IntPtr err, IntPtr tmp_pool, IntPtr res_pool);
diff --git a/src/runtime/dotNet/Type.cs b/src/runtime/dotNet/Type.cs
index bf31f8117..819af0b7b 100644
--- a/src/runtime/dotNet/Type.cs
+++ b/src/runtime/dotNet/Type.cs
@@ -43,7 +43,7 @@ namespace PGFSharp
using (var strNative = new Native.NativeString(typeStr))
{
var in_ = NativeGU.gu_data_in(strNative.Ptr, strNative.Size, tmp_pool.Ptr);
- var typ = Native.pgf_read_type(in_, result_pool.Ptr, exn.Ptr);
+ var typ = Native.pgf_read_type(in_, result_pool.Ptr, tmp_pool.Ptr, exn.Ptr);
if (exn.IsRaised || typ == IntPtr.Zero)
{
throw new PGFError();