comparison lisp/cedet/ede/project-am.el @ 105652:51bc239bdc37

* cedet/srecode/srt.el: * cedet/srecode/compile.el: * cedet/semantic/mru-bookmark.el: * cedet/semantic/debug.el: * cedet/semantic/complete.el: * cedet/semantic/analyze.el: Require CL when compiling. * cedet/semantic/scope.el (semantic-analyze-scoped-inherited-tag-map): Wrap calculation of tmpscope so that the regular scope will continue to work. * cedet/semantic/idle.el (semantic-idle-tag-highlight): Use semantic-idle-summary-highlight-face as the highlighting. * emacs-lisp/eieio-base.el (eieio-persistent-save): If buffer contains multibyte characters, choose first applicable coding system automatically. * cedet/ede/project-am.el (project-run-target): New method. (project-run-target): New method. * cedet/ede.el (ede-target): Add run target menu item. (ede-project, ede-minor-keymap): Add ede-run-target binding. (ede-run-target): New function. (ede-target::project-run-target): New method. * cedet/ede/proj.el (project-run-target): New method. * cedet/ede/proj-shared.el (ede-gcc-libtool-shared-compiler) (ede-g++-libtool-shared-compiler): Remove SHELL. Remove COMMANDS. Add :rules. (ede-proj-target-makefile-shared-object): Only libtool compilers now available. Add linkers for libtool. (ede-cc-linker-libtool, ede-g++-linker-libtool): New. (ede-proj-makefile-target-name): Always use .la extension. * cedet/ede/proj-prog.el (project-run-target): New method. * cedet/ede/proj-obj.el (ede-cc-linker): Rename from ede-gcc-linker. (ede-g++-linker): Change Change link lines. * cedet/ede/pmake.el (ede-pmake-insert-variable-shared): When searching for old variables, go to the end of the buffer and search backward from there. (ede-proj-makefile-automake-insert-subdirs) (ede-proj-makefile-automake-insert-extradist): New methods. (ede-proj-makefile-create): Use them. * cedet/ede/pconf.el (ede-proj-configure-test-required-file): Force FILE to expand to the current target. Use file-exists-p to check that it exists. * cedet/ede/linux.el (ede-linux-version): Don't call "head". (ede-linux-load): Wrap dir in file-name-as-directory. Set :version slot. * cedet/ede/files.el (ede-get-locator-object): When enabling locate, do so on "top". * cedet/ede/emacs.el (ede-emacs-file-existing): Wrap "dir" in file-name-as-directory during compare. (ede-emacs-version): Return Emacs/XEmacs differentiator. Get version number from different places. Don't call egrep. (ede-emacs-load): Set :version slot. Call file-name-as-directory to set the directory. * cedet/ede/shell.el: New file. * cedet/inversion.el (inversion-decoders): Allow for stray . in alpha/beta variants.
author Chong Yidong <cyd@stupidchicken.com>
date Sat, 17 Oct 2009 04:18:31 +0000
parents 7f4c7f5c0eba
children 1d1d5d9bd884
comparison
equal deleted inserted replaced
105651:1bab58491dc5 105652:51bc239bdc37
390 (let ((tb (get-buffer-create " *padt*")) 390 (let ((tb (get-buffer-create " *padt*"))
391 (dd (oref obj path)) 391 (dd (oref obj path))
392 (cmd nil)) 392 (cmd nil))
393 (unwind-protect 393 (unwind-protect
394 (progn 394 (progn
395 (require 'ede/shell)
395 (set-buffer tb) 396 (set-buffer tb)
396 (setq default-directory dd) 397 (setq default-directory dd)
397 (setq cmd (read-from-minibuffer 398 (setq cmd (read-from-minibuffer
398 "Run (like this): " 399 "Run (like this): "
399 (concat (symbol-name project-am-debug-target-function) 400 (concat (symbol-name project-am-debug-target-function)
400 " " (ede-target-name obj)))) 401 " " (ede-target-name obj))))
401 (funcall project-am-debug-target-function cmd)) 402 (funcall project-am-debug-target-function cmd))
403 (kill-buffer tb))))
404
405 (defmethod project-run-target ((obj project-am-objectcode))
406 "Run the current project target in comint buffer."
407 (let ((tb (get-buffer-create " *padt*"))
408 (dd (oref obj path))
409 (cmd nil))
410 (unwind-protect
411 (progn
412 (set-buffer tb)
413 (setq default-directory dd)
414 (setq cmd (read-from-minibuffer
415 "Run (like this): "
416 (concat (ede-target-name obj))))
417 (ede-shell-run-something obj cmd))
402 (kill-buffer tb)))) 418 (kill-buffer tb))))
403 419
404 (defmethod project-make-dist ((this project-am-target)) 420 (defmethod project-make-dist ((this project-am-target))
405 "Run the current project in the debugger." 421 "Run the current project in the debugger."
406 (require 'compile) 422 (require 'compile)