[Magic-dev] Odd warning msg from system .magicrc file

[R. Timothy Edwards]

Dear Graham,

> Hallo Tim,
>    The following lines are in the system .magicrc file
> 
> magic::suspendout
> if {![catch {set Opts(tools)}]} { magic::enable_tools }
> set GND "gnd!"
> set VDD "vdd!"
> magic::resumeout
> 
>    When I run magic in batch mode
> 
> magic -Tpharosc -dnull -noconsole <<EOF
> 
> I get the following error
> 
> : invalid command name "magic::suspendout"
> : invalid command name "magic::resumeout"

Hmmm.  I have this feeling that I solved this error before.  The
problem is that "suspendout" and "resumeout" are functions passed to
the console, and so are defined in the console, which is a separate
interpreter thread from magic.  In batch mode, magic runs without
the console, so these commands are not defined.  I suggest adding
to tcltk/magic.tcl.in the following lines around line number 56:

    #-----------------------------------------------------------------
    # Define these console routines so that they don't produce errors
    # when Magic is run in batch mode

    proc magic::suspendout {}
    proc magic::resumeout {}

I think this will eliminate the problem.

					Regards,
					Tim

+--------------------------------+-------------------------------------+
| Dr. R. Timothy Edwards (Tim)   | email: tim at opencircuitdesign.com    |
| Open Circuit Design, Inc.	 | web:   http://opencircuitdesign.com |
| 22815 Timber Creek Lane        | phone: (301) 528-9364               |
| Clarksburg, MD 20871-4001      | cell:  (240) 401-0616               |
+--------------------------------+-------------------------------------+