| Server IP : 217.160.0.212 / Your IP : 216.73.217.5 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/cedet/ede/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (require 'ede) #@140 Update the current projects main version number. Argument NEWVERSION is the version number to use in the current project. (fn NEWVERSION) (defalias 'ede-update-version #[257 "\301 \302\303\"\230?\205 \304\303#\210\305!\210\306\")\207" [ede-object ede-toplevel eieio-oref version eieio-oset project-update-version ede-update-version-in-source] 5 (#$ . 100) (byte-code "\300 \301\302\"\303\304\305\"\306$\266\202C\207" [ede-toplevel eieio-oref version read-string format "Update Version (was %s): " nil] 7)]) (byte-code "\300\301\302\303\302\304%\210\300\305\302\306\302\307%\210\300\305\302\310\302\311%\207" [cl-generic-define-method project-update-version nil ((ot ede-project)) #[257 "\300\301\302!\"\207" [error "project-update-version not supported by %s" eieio-object-name] 5 "The :version of the project OT has been updated.\nHandle saving, or other detail.\n\n(fn OT)"] ede-update-version-in-source ((this ede-project) version) #[514 "\300\301\302\"\"\207" [ede-map-targets make-closure #[257 "\301\300\"\207" [V0 ede-update-version-in-source] 4 "\n\n(fn TARG)"]] 7 "Change occurrences of a version string in sources.\nIn project THIS, cycle over all targets to give them a chance to set\ntheir sources to VERSION.\n\n(fn THIS VERSION)"] ((this ede-target) version) #[514 "\301\302\"\205P \303\302\"\205P \303\302\"\211\205N r\304\305@\"!q\210eb\210\306\307\310\311\306#\203F \312 \313\314\"\216\315 \210)\210\316\224\316\225|\210\316\224b\210c\210*\211A\262\202 \262\207" [case-fold-search slot-boundp versionsource eieio-oref find-file-noselect ede-expand-filename t re-search-forward "version:\\s-*\\([^ \n]+\\)" nil match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] ede-make-buffer-writable 1] 7 "In sources for THIS, change version numbers to VERSION.\n\n(fn THIS VERSION)"]] 6) #@110 Make sure that BUFFER is writable. If BUFFER isn't specified, use the current buffer. (fn &optional BUFFER) (defalias 'ede-make-buffer-writable #[256 "\212\211\203 \211q\210\301\211)\207" [buffer-read-only nil] 3 (#$ . 1960)]) (provide 'ede/util)