1 files changed, 0 insertions, 19 deletions
diff --git a/c/pl.cpp b/c/pl.cpp
index ef8aaf9..46ed717 100644
--- a/c/pl.cpp
+++ b/c/pl.cpp
@@ -91,22 +91,3 @@ int PL_get_tchars(const term_t t, TCHAR** const pTsz, const int iFlags)
 	return -1;
 #endif
 }
-
-/* Call nullary Prolog predicate, propagating Prolog exceptions. */
-int Plx(const char* const szMod, const char* const szPred)
-{
-	Frame f;
-	const term_t t = PL_new_term_refs(0);
-	Query q(NULL, PL_predicate(szPred, 0, szMod), t);
-	return q.NextSolution();
-}
-
-/* Call nullary Prolog predicate, ignoring Prolog exceptions. */
-int Pl(const char* const szMod, const char* const szPred)
-{
-	try {
-		return Plx(szMod, szPred);
-	} catch (term_t& t) {
-		return 0;
-	}
-}