

Description:
Returns the window currently containing the edit position. A window becomes
the current window by using the MAP, POSITION, CURSOR_VERTICAL, or ADJUST_WINDOW
built-ins.
Syntax:
window := CURRENT_WINDOW
Example:
The following returns the current window in WINDOW$RETURN.
WINDOW$RETURN := CURRENT_WINDOW;
Errors:
TPU$_WINDNOTMAPPED Current window must be mapped.
Related Builtins:
CURRENT_WINDOW