tcl 네임 스페이스 오류

Question

내가 내보내는 네임 스페이스 "b"에 정의 된 여러 함수가 있습니다. 나는 다음 thusly 히 :: X :: Y를 네임 스페이스 이러한 기능을 가져옵니다

namespace eval ::x::y "namespace import fun" 

몇 시간 후에 내가 할 :

재미가하는

namespace eval ::x::y fun 

:

proc fun {} { 
    puts "[namespace current]" 
    uplevel {puts "[namespace current]"} 
} 

인쇄 무엇 입니다 :

 
::b 
::x::y 

내가 원하고 필요로는 '재미를 위해 무엇 ':: x :: y에서 일어나고 :: b에서는 일어나지 않습니다. 내가 도대체 ​​뭘 잘못하고있는 겁니까?

Answer 1

Tcl의 네임 스페이스가 작동하는 방식이 아닙니다. 각 프로시 저는 이름이있는 정확히 하나의 네임 스페이스와 연관됩니다. namespace import을 사용하면 프로 시저에 대한 별칭이 다른 네임 스페이스에서 프로 시저를 호출 할 수 있도록 가져 오는 네임 스페이스에 배치되지만 프로 시저 자체는 원래 네임 스페이스에 남아 해당 프로 시저에서 실행됩니다.

호출자의 네임 스페이스를 알고 싶다면 uplevel namespace current (또는 다소 바람이 세지 만 효율적인 버전은 uplevel 1 {namespace current})을 사용하십시오. 이것은 네임 스페이스에 프로 시저를 호출하는 데 사용 된 명령이 포함 된 것을 실제로 알려주지는 않습니다. 당신은 많은 그때는 아마 뭔가 잘못하고 있다는 것을 필요로하는 경우, 물론

namespace qualifiers [uplevel 1 [list namespace which [lindex [info level 0] 0]]] 

: 그것을 위해, 당신은 (호출 된 명령)이 괴물이 필요합니다. 정보를 얻는 데 필요한 코드의 길이와 복잡성을 고려할 때 분명합니다.

특히이 기능을 사용하여 개체 방향을 지정하는 경우 해당 개체를 사용하지 않는 실제 개체 시스템을 사용하지 마십시오. 세부 권리. Tcl 8.6.0에는 one (기여한 확장 기능이있는 경우 two)이 포함되어 있으며 이전 버전에는 확장 패키지로 사용할 수있는 파일이 많이 있습니다.