blob: e7196f532efd0e3fc91628184f47baa33434eb75 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
package provide fubar 1.0
namespace eval ::fubar:: {
#
# export only public functions.
#
namespace export {[a-z]*}
}
proc ::fubar::foo {bar} {
puts "$bar"
return true
}
namespace import ::fubar::foo
|