#627: dynlexpad doesn't work with installed parrot.
--------------------+-------------------------------------------------------
Reporter: coke | Owner:
Type: bug | Status: new
Priority: normal | Milestone:
Component: none | Version: 1.1.0
Severity: medium | Keywords: tcl blocker
Lang: | Patch:
Platform: darwin |
--------------------+-------------------------------------------------------
Given this PIR from {{{t/dynpmc/dynlexpad.t}}}
{{{
.loadlib "dynlexpad"
.HLL "Some"
.sub load :anon :init
.local pmc interp, lexpad, dynlexpad
interp = getinterp
lexpad = get_class 'LexPad'
dynlexpad = get_class 'DynLexPad'
interp.'hll_map'(lexpad, dynlexpad)
.end
# see loadlib
.sub 'test' :main
foo()
.end
.sub foo :lex
$P1 = new 'Integer'
$P1 = 13013
store_lex 'a', $P1
print "ok 1\n"
$P2 = find_lex 'a'
print "ok 2\n"
print $P2
print "\n"
end
.end
}}}
running with svn-recent out of the build dir, I get:
{{{
$ ./parrot /tmp/die.pir
ok 1
ok 2
13013
}}}
Running from an installed parrot, I get:
{{{
$ parrot /tmp/die.pir
src/string/api.c:762: failed assertion 'encoding'
Abort trap
slurpee:~/research/parrot coke$ parrot -V
This is Parrot version 1.1.0 built for nojit.
Copyright (C) 2001-2009, Parrot Foundation.
This code is distributed under the terms of the Artistic License 2.0.
For more details, see the full text of the license in the LICENSE file
included in the Parrot source tree.
}}}
--
Ticket URL: <https://trac.parrot.org/parrot/ticket/627>
Parrot <https://trac.parrot.org/parrot/>
Parrot Development
_______________________________________________
parrot-tickets mailing list
[email protected]
http://lists.parrot.org/mailman/listinfo/parrot-tickets
