Lines Matching defs:var
149 (setq gdb-var-list nil)
150 (setq gdb-var-changed nil)
175 (defun gdbmi-var-list-children (varnum)
177 (list (concat "-var-update " varnum "\n") 'ignore))
179 (list (concat "-var-list-children --all-values "
181 `(lambda () (gdbmi-var-list-children-handler ,varnum)))))
183 (defconst gdbmi-var-list-children-regexp
187 (defun gdbmi-var-list-children-handler (varnum)
190 (let ((var-list nil))
192 (dolist (var gdb-var-list)
193 (if (string-equal varnum (cadr var))
195 (push var var-list)
196 (while (re-search-forward gdbmi-var-list-children-regexp nil t)
205 (dolist (var1 gdb-var-list)
208 (push varchild var-list))))
209 (push var var-list)))
210 (setq gdb-var-changed t)
211 (setq gdb-var-list (nreverse var-list))))))
252 (setq gdb-var-changed t) ; force update
253 (dolist (var gdb-var-list)
254 (setcar (nthcdr 5 var) nil))))
255 (gdb-var-update))