[pulse] fix fuel debug message

Summary:
This would previously print that we ran out of fuel even if we didn't
and we simply reached a normal form.

Reviewed By: ezgicicek

Differential Revision: D23575571

fbshipit-source-id: 37d02ca8d

infer/src/pulse/PulseFormula.ml

@@ -1200,13 +1200,15 @@ end = struct
        fuel). That's ok because there's not much fuel to begin with, and as long as we're making
        progress it's probably worth it anyway. *)
     let rec normalize_with_fuel ~fuel phi =
+      if fuel <= 0 then (
+        L.d_printfln "ran out of fuel when normalizing" ;
+        Sat phi )
+      else
         let* new_linear_eqs, phi = normalize_linear_eqs ~fuel phi >>= normalize_atoms in
-      if new_linear_eqs && fuel > 0 then (
+        if new_linear_eqs then (
           L.d_printfln "new linear equalities, consuming fuel (from %d)" fuel ;
           normalize_with_fuel ~fuel:(fuel - 1) phi )
-      else (
+        else Sat phi
-        L.d_printfln "ran out of fuel when normalizing" ;
-        Sat phi )
     in
     normalize_with_fuel ~fuel:base_fuel phi