;;; -*- Mode: LISP -*-

(select (or (si:get-release-version) (si:get-system-version))
  (6 (load "calvin:>atms>tp-rel6"))
  (7 (load "calvin:>atms>rel7>tp-rel7"))
  (otherwise (ferror "Unknown system version")))