u3: suppress bail:evil printf
@@ -690,9 +690,13 @@ u3m_bail(u3_noun how)
abort();
}
- /* Printf some metadata.
- */
- if ( c3__exit != how && (_(u3ud(how)) || 1 != u3h(how)) ) {
+ // printf some metadata
+ //
+ switch ( how ) {
+ case c3__evil:
+ case c3__exit: break;
+
+ default: {
if ( _(u3ud(how)) ) {
c3_c str_c[5];
@@ -703,11 +707,12 @@ u3m_bail(u3_noun how)
str_c[4] = 0;
fprintf(stderr, "\r\nbail: %s\r\n", str_c);
}
- else {
+ else if ( 1 != u3h(how) ) {
c3_assert(_(u3ud(u3h(how))));
fprintf(stderr, "\r\nbail: %d\r\n", u3h(how));
}
}
+ }
// intercept fatal errors
//
