1 files changed, 12 insertions, 0 deletions
diff --git a/src/math/point.c b/src/math/point.c
new file mode 100644
index 0000000..a5a1c69
--- /dev/null
+++ b/src/math/point.c
@@ -0,0 +1,12 @@
+/*
+ * ecgen, tool for generating Elliptic curve domain parameters
+ * Copyright (C) 2017 J08nY
+ */
+#include "point.h"
+
+point_t *gerepile_point(pari_sp ltop, point_t *point) {
+	if (point) {
+		gerepileall(ltop, 2, &point->point, &point->order);
+	}
+	return point;
+}
+\ No newline at end of file