Success with 0 points

[adhameer]

Related to #207: when a student doesn't trigger a penalty, we would like to give them a success message, but award them no points for it. Previously we were able to do this with a status of Success 0, but as of 5c24c81 this no longer works because of the following code:

learn-ocaml/src/grader/learnocaml_report.ml

Lines 142 to 143 in 5c24c81

	(fun n -> if n > 0 then Success n else if n < 0 then Penalty (-n)
	else Failure) ;

and it now displays as a Failure instead. We could use Informative or Important, but prefer the positive feedback + green background of the Success status. Could this be fixed?

[erikmd]

Hi @adhameer,
This issue is also blocking for us (cf. #207 (comment) for more context). So I'll try to adapt our graders to workaround this unexpected Failure in the reports with learn-ocaml 0.11.
But actually, by looking at the previous version of the file src/grader/learnocaml_report.ml changed by 5c24c81, it seems that the Failure itself is unnecessary?

so I'd suggest to replace the line mentioned by Aliya with:

 (fun n -> if n >= 0 then Success n else if n < 0 then Penalty (-n)) ;

@yurug WDYT?