home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / tcl / 1789 < prev    next >
Encoding:
Text File  |  1992-11-10  |  1.4 KB  |  45 lines
  1. Newsgroups: comp.lang.tcl
  2. Path: sparky!uunet!think.com!spool.mu.edu!tulane!cpu.com!cpu.com!GWLESTER
  3. From: gwlester@cpu.com (Gerald W. Lester)
  4. Subject: Re: calling procedures
  5. Nntp-Posting-Host: captainhook.cpu.com
  6. References: <1992Nov10.152527.27992@unilabs.uucp>
  7. Sender: usenet@cpu.com (Usenet administrator)
  8. Organization: Computerized Processes Unlimited, Metairie, LA, (504)-889-2784
  9. Date: Tue, 10 Nov 1992 18:41:57 GMT
  10. Message-ID: <1992Nov10.184157.10279@cpu.com>
  11. Reply-To: gwlester@cpu.com
  12. Lines: 31
  13.  
  14. In article <1992Nov10.152527.27992@unilabs.uucp>, chare@unilabs.uucp (Chris Hare) writes:
  15. >
  16. >I have a procedure called errorDialog defined near the bottom of my wish
  17. >script :
  18. >
  19. >proc errorDialog { $message } {
  20. >....
  21. >}
  22. >
  23. >Near the top of my script I will call this procedure if there isn't some
  24. >stuff setup.
  25. >
  26. >if { ... } {
  27. >   errorDialog $stuff
  28. >}
  29. >
  30. >I get told by wish that the procedure errorDialog is unknown.  What am I
  31. >missing?
  32.  
  33.     Tcl executes the file as it reads it in.  It does *NOT* make a pass
  34. over the file to check syntax and define all procedures, hence your procedure
  35. is not defined when you try to call it.  I find that structuring TCL files like
  36. Pascal programs (i.e. the main at the end) works great.
  37.  
  38. >
  39. >Thanks!
  40. >
  41. >-- 
  42. >????                --- It Always works for me! ---                           
  43. >Chris Hare, UNIX Scientist                  Preferred : chare@unilabs.org
  44. >Just a mild-mannered consultant by day ....
  45.