Do you see the Malformed List?

[CEHill]

Due to an introduced error after several months away from using AutoCAD Mechanical, I now get a malformed list error. Can you find its source?
My VLIDE skills are very slowly growing...snail-like.

(This particular acaddoc.lsp file contains an AutoCAD Mechanical-specific code area).

Thanks!

[Tom Beauford]

How I'd find the error:
If you put ;| before first line and |; at the end of say line 322 the first 322 lines will be commented out.
If you still get the error on loading move the |; down and reload till you don't.

[CEHill]

Hi Tom,
I like it!

Thanks!

[madcadder]

I did a cut and paste into vlide and broke it down into 3 sections to check. None of the sections had an error in them but the overall program has an issue.
Also, I attached an acaddoc.lsp also. Notice the formatting difference. Sometimes just the way you format makes it easier to find errors.

Edit: Also... you can use a
;;;
at the beginning of the line to rem out that line. Also shown in my attached lsp.

[madcadder]

Found it

(if (/= (getvar "ucsicon") 3)
  (progn (setvar "ucsicon" 3)
	 (princ
	   "\nSet ucs icon to display at the origin." ; Added on August 22, 2018 - UCS Icon at Origin
	 )
  )

[CEHill]

I live for tips. Your time taken and interest are not lost on me!

- - - Updated - - -

I did a cut and paste into vlide and broke it down into 3 sections to check. None of the sections had an error in them but the overall program has an issue.
Also, I attached an acaddoc.lsp also. Notice the formatting difference. Sometimes just the way you format makes it easier to find errors.

Edit: Also... you can use a
;;;
at the beginning of the line to rem out that line. Also shown in my attached lsp.

An (excellent) example like yours is worth a thousand words!

[Adam Junior]

I looked into your acaddoc(Error in Code).lsp and found that just one missing ")" can mess it all up.

(if (/= (getvar "ucsicon") 3)
  (progn (setvar "ucsicon" 3)
   (princ
     "\nSet ucs icon to display at the origin." ; Added on August 22, 2018 - UCS Icon at Origin
   )
  )
);<-- It was missing this ")" right here.

I found another occurrence of "ucsicon" near the bottom of your acaddoc(Error in Code).lsp.

(if (/= (getvar "ucsicon") 1)
  (progn (setvar "ucsicon" 1) (princ "\nUCSICON On!"))
)

[CEHill]

I looked into your acaddoc(Error in Code).lsp and found that just one missing ")" can mess it all up.

(if (/= (getvar "ucsicon") 3)
  (progn (setvar "ucsicon" 3)
   (princ
     "\nSet ucs icon to display at the origin." ; Added on August 22, 2018 - UCS Icon at Origin
   )
  )
);<-- It was missing this ")" right here.

I found another occurrence of "ucsicon" near the bottom of your acaddoc(Error in Code).lsp.

(if (/= (getvar "ucsicon") 1)
  (progn (setvar "ucsicon" 1) (princ "\nUCSICON On!"))
)

Hi Adam,
I appreciate your observations. With the freely-available Crimson Editor, the .LSP settings include parentheses matching. Your results agree with mine. All is well.
NOTE: Somewhere along the way, the code was involuntarily realigned: A break was introduced after the code "(princ" and the rest was shifted to a new line. I restored it to a single line.

Thanks!

[madcadder]

I live for tips. Your time taken and interest are not lost on me!

- - - Updated - - -



An (excellent) example like yours is worth a thousand words!

I liked your IF statements for setting variables. Mine is a hammer method, where it does not matter what the current setting is I am changing it to... Even if it doesn't need changing.
I may have to take some time to polish mine up a bit and remove some of garbage that been sitting in there for years upon years.

[BIG-AL]

For me I would do like this moved the ")"

(princ "\nSet ucs icon to display at the origin.") ; Added on August 22, 2018 - UCS Icon at Origin

The remark is possibly being seen as part of the princ string.