We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 38cf515 + 5f2c66d commit b6c3d5cCopy full SHA for b6c3d5c
src/OVAL/probes/SEAP/sexp-manip.c
@@ -932,7 +932,10 @@ SEXP_t *SEXP_list_new (SEXP_t *memb, ...)
932
933
va_start(ap, memb);
934
list = SEXP_new ();
935
- list = SEXP_list_new_rv(list, memb, ap);
+ if (SEXP_list_new_rv(list, memb, ap) == NULL) {
936
+ SEXP_free(list);
937
+ list = NULL;
938
+ }
939
va_end(ap);
940
941
return (list);
@@ -1035,7 +1038,10 @@ SEXP_t *SEXP_list_rest (const SEXP_t *list)
1035
1038
SEXP_t *sexp;
1036
1039
1037
1040
sexp = SEXP_new();
- sexp = SEXP_list_rest_r(sexp, list);
1041
+ if (SEXP_list_rest_r(sexp, list) == NULL) {
1042
+ SEXP_free(sexp);
1043
+ sexp = NULL;
1044
1045
1046
return (sexp);
1047
}
0 commit comments