anchor.diff:  
   (**
   
  -We could liberally parse integer and float literals using pfloat and pint64.
  +We could liberally parse integer and float literals using `pfloat` and `pint64`.
   
   However, to strictly match the rules laid out
   [here](https://www.sqlite.org/syntaxdiagrams.html#literal-value),
  
positive.code:         currentTimestampLiteral
      ]
  
  let typeBounds =
      %% '('
      -- ws
  
negative.code:         else 
              lit.String |> float |> FloatLiteral |> preturn
  
  (**
  
  Our core numeric literal parser intentionally leaves out leading signs (`-` and `+`).
  Most of the time, these are handled by the numeric literals appearing within expressions, in which
  those are valid prefix operators.
  
  However, sometimes numeric literals are accepted where general expressions are not. For these
  situations, we have a special parser for a numeric literal prefixed by an optional sign.
  
  *)
  
  let signedNumericLiteral =
      let sign =
          %[
  