int printImpliedLiterals(VC vc) { int count = 0; Expr impLit = vc_getImpliedLiteral(vc); printf("Implied Literals:\n"); while (impLit) { ++count; vc_printExpr(vc, impLit); vc_deleteExpr(impLit); impLit = vc_getImpliedLiteral(vc); } return count; }
// Return next literal implied by last assertion value caml_vc_getImpliedLiteral(value vc) { CAMLparam1(vc); CAMLreturn(alloc_Expr(vc_getImpliedLiteral(VC_val(vc)))); }