Fix warning message to show true fidelity threshold

src/chip-reader.lisp

@@ -138,7 +138,7 @@
      (warn "Chip specification contains a fidelity field populated by the Forest error sentinel. Replacing it with the default ~a." +totally-awful-fidelity+)
      +totally-awful-fidelity+)
     ((> fidelity +near-perfect-fidelity+)
-     (warn "Chip specification contained fidelity ~a > 1. Truncating to ~a." fidelity +near-perfect-fidelity+)
+     (warn "Chip specification contained fidelity ~a > ~a~:*. Truncating to ~a." fidelity +near-perfect-fidelity+)
      +near-perfect-fidelity+)
     ((minusp fidelity)
      (error "Chip specification contained negative fidelity ~a. I don't know what to do with this value." fidelity))