Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Further gut the PAST inclusion code.
  • Loading branch information
jnthn committed Sep 8, 2012
1 parent e19b5fd commit 1ff9f02
Showing 1 changed file with 0 additions and 20 deletions.
20 changes: 0 additions & 20 deletions src/PASTRegex.pir
Expand Up @@ -25,11 +25,6 @@
.end

.sub '' :load :init :outer('PAST_Outer')
# Create a serialization context for this compilation unit.
.local pmc sc
sc = nqp_create_sc "__PAST_CORE_SC__"
nqp_push_compiling_sc sc

# Run the main block.
.const 'Sub' $P2 = 'PAST_Outer'
$P2()
Expand All @@ -39,20 +34,5 @@
.include 'src/cheats/parrot-sub.pir'

.sub '' :anon :load :init :outer('PAST_Outer') :subid('Imports')
# Also want the dumper.
load_bytecode 'dumper.pbc'

.local pmc KnowHOW, how, PAST
KnowHOW = get_knowhow
PAST = KnowHOW."new_type"("name"=>"PAST")
how = get_how PAST
how."compose"(PAST)

# Add PAST dummy NS to the SC.
$P0 = nqp_get_sc "__PAST_CORE_SC__"
nqp_set_sc_object "__PAST_CORE_SC__", 0, PAST
nqp_set_sc_for_object PAST, $P0

# Pop SC off current SCs stack.
nqp_pop_compiling_sc
.end

0 comments on commit 1ff9f02

Please sign in to comment.