FG42
/
FG42
1
0
Fork 1
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

generic-c project test point

This commit is contained in:
Sameer Rahmani 2010-12-25 17:19:03 +03:30
parent bfd75f2ea6
commit b19a5c4920
4 changed files with 55 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/lib/menu.el
View File

@ -1,4 +1,4 @@
;; Shitty - My personal emacs IDE configuration
;; Shit - My personal emacs IDE configuration
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify

2
src/lib/project.el
View File

@ -1,4 +1,4 @@
;; Shitty - My personal emacs IDE configuration
;; Shit - My personal emacs IDE configuration
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify

48
src/plugins/cproject.el Normal file
View File

@ -0,0 +1,48 @@
;; Shit - My personal emacs IDE configuration
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; any later version.
;;
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; C project plugin for Shit IDE
(defun init-menus () "Draw required menu for C mode"
(define-key global-map [Ctrl-x p c k ] 'kmodule)
(define-key global-map [menu-bar file new-proj cproj kmodule] '("Kernel Module" . kmodule))
(define-key global-map [menu-bar file new-proj cproj separator2] '("--"))
(define-key global-map [Ctrl-x p c n ] 'make-cpp)
(define-key global-map [menu-bar file new-proj cproj cpp-make] '("Make project (C++)" . make-cpp))
(define-key global-map [Ctrl-x p c m ] 'make-c)
(define-key global-map [menu-bar file new-proj cproj c-make] '("Make project (C)" . make-c))
(define-key global-map [menu-bar file new-proj cproj separator1] '("--"))
(define-key global-map [Ctrl-x p c p ] 'generic-cpp)
(define-key global-map [menu-bar file new-proj cproj cppgeneric] '("Generic project (C++)" . generic-cpp))
(define-key global-map [Ctrl-x p c g] 'generic-c)
(define-key global-map [menu-bar file new-proj cproj cgeneric] '("Generic project (C)" . generic-c))
)
(defun c-new-project () "Create a new C/C++ project"
(new-project)
(log project-name)
)
(defun generic-c () "Create a generic type C project"
(c-new-project)
)

7
src/shit-ide.el
View File

@ -1,4 +1,4 @@
;; Shitty - My personal emacs IDE configuration
;; Shit - My personal emacs IDE configuration
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify
@ -19,7 +19,7 @@
(setq ROOTPATH nil)
(setq LIBPATH nil)
(setq PLUGINPATH nil)
(setq TEMPLATESPATH nil)
(defun strip-el-ext (STR) "strinp the lastest elist extension suffix"
(setq ext (replace-regexp-in-string "\.el$" "" STR))
@ -42,10 +42,13 @@
(nbutlast cur-path-list)
(setq ROOTPATH (concat (mapconcat 'identity cur-path-list "/") "/"))
(setq PLUGINPATH (concat ROOTPATH "plugins/"))
(setq TEMPLATESPATH (concat ROOTPATH "templates/"))
(setq LIBPATH (concat ROOTPATH "lib/"))
(log (format "Running on %s" ROOTPATH))
(log (format "lib : %s" LIBPATH))
(log (format "plugins : %s" PLUGINPATH))
(log (format "templates : %s" TEMPLATESPATH))
)
(defun load-lib (ADDR) "load the shit library on the ADDR path"