The function get-focus-stack returns all of the module names in the focus stack as a multifield value. A multifield value of length zero is returned if the focus stack is empty.
Syntax
(get-focus-stack)
Example
CLIPS> (clear) CLIPS> (get-focus-stack) (MAIN) CLIPS> (clear-focus-stack) CLIPS> (get-focus-stack) () CLIPS> (defmodule A) CLIPS> (defmodule B) CLIPS> (focus A B) TRUE CLIPS> (get-focus-stack) (A B) CLIPS>