Posted to tcl by daapp at Wed May 05 09:12:19 GMT 2010view raw

  1. namespace eval A {
  2. proc unknown {args} {
  3. puts $args
  4. }
  5.  
  6. namespace unknown unknown
  7. }
  8.  
  9. puts "from A"
  10. namespace eval A {hello world}
  11.  
  12. puts "from global"
  13. A::hello world
  14.  
  15. #----
  16.  
  17. from A
  18. hello world
  19. from global
  20. invalid command name "A::hello"
  21. while executing
  22. "A::hello world"
  23. (file "ns.tcl" line 13)