  ?? SKIP := 2 ??
  ?? PUSH (LIST := ON) ??
  { MLTERR -- Declaration of mlt$error }
  ?? POP ??

  TYPE
    mlt$error = (mle$no_error, mle$invalid_bdp_data,
      mle$loss_of_significance, mle$overflow, mle$underflow,
      mle$indefinite, mle$infinite, mle$bad_parameters,
      mle$no_digits);
