Function: def-gdb-set-positive-number

def-gdb-set-positive-number is a macro defined in gdb-mi.el.gz.

Signature

(def-gdb-set-positive-number NAME VARIABLE ECHO-STRING &optional DOC)

Documentation

Define a function NAME which reads new VAR value from minibuffer.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/gdb-mi.el.gz
(defmacro def-gdb-set-positive-number (name variable echo-string &optional doc)
  "Define a function NAME which reads new VAR value from minibuffer."
  (declare (indent defun))
  `(defun ,name (event)
     ,(when doc doc)
     (interactive "e")
     (save-selected-window
       (select-window (posn-window (event-start event)))
       (let* ((arg (read-from-minibuffer ,echo-string))
              (count (string-to-number arg)))
         (if (<= count 0)
             (error "Positive number only")
           (customize-set-variable ',variable count)
           (gdb-invalidate-memory 'update))))))