 See variables compilation-error-regexp-alist or python-compilation-error-regexp-alist."
   (mc--shell-compile python-command python-dbg-flags python-compilation-error-regexp-alist))
 
+(defun ruby-compile ()
+  ;; CLGC
+  "Run `ruby-command' with `ruby-dbg-flags' on current-buffer (`ruby-mode').
+
+User is prompted for arguments to run their ruby program with.
+If you want to step throught errors set the variable `ruby-compilation-error-regexp-alist'
+to a value understandable by compile's `next-error'.
+See variables compilation-error-regexp-alist or ruby-compilation-error-regexp-alist."
+  (mc--shell-compile ruby-command ruby-dbg-flags ruby-compilation-error-regexp-alist))
 
 (defun default-compile ()
   "Default function invoked by `mode-compile' (\\[mode-compile])

;;   Scott Hofmann <scotth@visix.com>.
;;   Stefan Schoef <Stefan.Schoef@arbi.informatik.uni-oldenburg.de>.
;;   John W. Harwell <ccjohnh@showme.missouri.edu> - JWH.
;;
;; @ ToDo:
;; =======

    ("zsh"    .  zsh-mode)
    ("perl"   .  perl-mode)
    ("tcl"    .   tcl-mode) ; JWH
    ("python" . python-mode) ; BM
    ("ruby"   . ruby-mode)) ; CLGC
  "Assoc list of compile function for some known shells.

Each element look like (SHELL . MODE) This variable look like
