2263 |
(idlwave-shell-display-line |
(idlwave-shell-display-line |
2264 |
(nth idlwave-shell-calling-stack-index stack) nil |
(nth idlwave-shell-calling-stack-index stack) nil |
2265 |
(unless idlwave-shell-electric-debug-mode 'no-debug)) |
(unless idlwave-shell-electric-debug-mode 'no-debug)) |
2266 |
(message (or message |
(message "%s" (or message |
2267 |
(format "In routine %s (stack level %d)" |
(format "In routine %s (stack level %d)" |
2268 |
idlwave-shell-calling-stack-routine |
idlwave-shell-calling-stack-routine |
2269 |
(- idlwave-shell-calling-stack-index)))))) |
(- idlwave-shell-calling-stack-index)))))) |