finalize support for partial strings

src/prolog/macros.rs

@@ -73,7 +73,7 @@ macro_rules! functor {
     );
     ($name:expr, $len:expr, [$($args:expr),*], $fix: expr) => (
         vec![ HeapCellValue::NamedStr($len, clause_name!($name), Some($fix)), $($args),* ]
-    );    
+    );
 }
 
 macro_rules! temp_v {
@@ -143,6 +143,12 @@ macro_rules! is_var {
     )
 }
 
+macro_rules! is_partial_string {
+    ($r:expr) => (
+        call_clause!(ClauseType::Inlined(InlinedClauseType::IsPartialString($r)), 1, 0)
+    )
+}
+
 macro_rules! call_clause {
     ($ct:expr, $arity:expr, $pvs:expr) => (
         Line::Control(ControlInstruction::CallClause($ct, $arity, $pvs, false, false))