id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc	lang	patch	platform
711	can't assign class with attributes to undef	coke	whiteknight	"See TT #696 for the original version of this.

Modified version that causes segfault against r39187.

{{{
.sub main :main
  say ""1..2""

  $P0 = new ""Undef""
  $P2 = new 'Integer'
  assign $P0, $P2
  say ""ok 1""

  $P0 = new ""Undef""
  $P1 = get_class 'Hash'
  $P2 = subclass $P1
  addattribute $P2, 'searches'
  addattribute $P2, 'ids'

  $P3 = new $P2
  assign $P0, $P3
  say ""ok 2""
.end
}}}

generates

{{{
1..2
ok 1
get_attr_str() not implemented in class 'default'
current instr.: 'main' pc 31 (foo.pir:16)
destroy() not implemented in class 'default'
current instr.: 'main' pc 31 (foo.pir:16)
Segmentation fault
}}}"	bug	closed	normal		core	trunk	medium	fixed