Lines Matching +refs:compile +refs:command
21 ;; a native compile command.
35 (defcustom m2-compile-command "m2c"
36 "Command to compile Modula-2 programs."
40 (defcustom m2-link-command "m2l"
105 (define-key map "\C-c\C-c" 'm2-compile)
131 \\[m2-compile] compile \\[m2-next-error] next-error
135 `m2-compile-command' holds the command to compile a Modula-2 program.
136 `m2-link-command' holds the command to link a Modula-2 program."
205 (eval-when-compile
502 (defun m2-compile ()
504 (compile (concat m2-compile-command " " (buffer-name))))
509 (compile (concat m2-link-command " " m2-link-name))
510 (compile (concat m2-link-command " "
514 (defun m2-execute-monitor-command (command)
517 (call-process shell nil t t "-cf" (concat "exec " command))))
528 (m2-execute-monitor-command (concat "m2whereis " modulename))