{{{  comments
; some macros to control svc
}}}
@if-using not(VERSION)
  @use (VERSION)
  {{{  check-out
  (deffun check-out (
    delete-mode-view
    shell-command "co "  "-l "  "$ORIFILE
  ))
  }}}
  {{{  check-in
  (deffun check-in (
    save-file
    add-mode-view
    shell-command "ci "  "-u "  "$ORIFILE
  ))
  }}}
@fi
