I think my lisp is causing a fatal error when closing
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I have lisp that runs an audit on close & exit, and it does what it is suppose to do. But after the drawing has closed I will get a fatal error. The error doesn't happen every time, but a majority of the time. That's why I am not sure if it is the lisp or not. I was wondering if someone could look over my lisp and see if they see something wrong. Or that could make it more efficient, sometimes it does seem to take longer to run than the audits normally does.
Thanks!
Joseph Mauk
C3D 2020
Win10
(command "undefine" "close")
(command "undefine" "quit")
----------------------------------------------------------------
(defun c:close ()
(setvar "cmdecho" 0)
(command "AUDIT" "Y")
(princ "\nDone! \nAll is good!")
(setvar "cmdecho" 1)
(command ".close")
(princ))
----------------------------------------------------------------
(defun c:quit ()
(setvar "cmdecho" 0)
(command "AUDIT" "Y")
(princ "\nDone! \nAll is good!")
(setvar "cmdecho" 1)
(command ".quit")
(princ))