function default_int, x
;
; Return a 4-byte or 8-byte integer (depending on memory model) with
; the value x.  (Replaces, e.g., x=1 and x=1l with x=default_int(1)).
;
; B. Knapp, 2001-05-01
;
  mbits = ((!version.release ge 5.4) ? !version.memory_bits : 32)
  return, ((mbits eq 64) ? long64(x) : long(x))
  end