Ticket #867 (new bug)

Opened 5 years ago

Implicit NameSpace Creation Does Not Respect Compile-time HLL Map

Reported by: chromatic Owned by:
Priority: normal Milestone:
Component: core Version: trunk
Severity: medium Keywords: HLL
Cc: Language:
Patch status: Platform: all

Description

From an example by Coke:

.HLL 'tcl'

.sub 'foo' :anon :init
  $P1 = get_class 'NameSpace'
  $P2 = subclass $P1, 'BSNS'
  $P0 = getinterp
  $P0.'hll_map'($P1, $P2)
.end

.namespace ['a';'b';'c']

.sub 'hi'
  noop
.end

.namespace []

.sub 'blah' :main
  $P1 = get_hll_namespace ['a';'b';'c']
  $S0 = typeof $P1
  print 'ok 1 - '
  say $S0
.end

I believe this should print ok 1 - BSNS .

Making this work is not trivial.

Note: See TracTickets for help on using tickets.