;$Id: demo_draw.pro,v 1.4 2001/01/15 22:26:40 scottm Exp $
;
;  Copyright (c) 1997-2001, Research Systems, Inc. All rights reserved.
;       Unauthorized reproduction prohibited.
;
pro demo_draw, oWindow, oView, debug=debug
;
;Procedure DEMO_DRAW: call oWindow->Draw, oView
;wrapping the call in !except=0 if not DEBUG.
;
;On some platforms, when IDLgrWindow::Draw is invoked, math errors
;(e.g. "% Program caused arithmetic error: Floating illegal
;operand") are printed.  DEMO_DRAW exists to supress the printing of
;these errors.
;
;Flush and print any accumulated math errors
;
void = check_math(/print)
;
;Silently accumulate any subsequent math errors, unless we are debugging.
;
orig_except = !except
!except = ([0, 2])[keyword_set(debug)]
;
;Draw.
;
oWindow->Draw, oView
;
;Silently (unless we are debugging) flush any accumulated math errors.
;
void = check_math(PRINT=keyword_set(debug))
;
;Restore original math error behavior.
;
!except = orig_except
end