src.elv.sh@v0.21.0-dev.0.20240515223629-06979efb9a2a/pkg/eval/ns_test.elvts (about) 1 ////// 2 # ns # 3 ////// 4 5 ~> kind-of (ns [&]) 6 ▶ ns 7 8 ## equality ## 9 // an Ns is only equal to itself ## 10 ~> var ns = (ns [&]) 11 eq $ns $ns 12 ▶ $true 13 ~> eq (ns [&]) (ns [&]) 14 ▶ $false 15 ~> eq (ns [&]) [&] 16 ▶ $false 17 18 ## access ## 19 ~> var ns: = (ns [&a=b &x=y]) 20 put $ns:a 21 ▶ b 22 ~> var ns: = (ns [&a=b &x=y]) 23 put $ns:[a] 24 ▶ b 25 26 ## keys ## 27 ~> keys (ns [&a=b &x=y]) | order 28 ▶ a 29 ▶ x 30 31 ## has-key ## 32 ~> has-key (ns [&a=b &x=y]) a 33 ▶ $true 34 ~> has-key (ns [&a=b &x=y]) b 35 ▶ $false