Ticket #711 (closed bug: fixed)

Opened 6 years ago

Last modified 5 years ago

can't assign class with attributes to undef

Reported by: coke Owned by: whiteknight
Priority: normal Milestone:
Component: core Version: trunk
Severity: medium Keywords:
Cc: Language:
Patch status: Platform:

Description

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

Change History

  Changed 6 years ago by whiteknight

  • owner set to whiteknight
  • status changed from new to assigned
  • component changed from none to core

follow-up: ↓ 4   Changed 6 years ago by coke

  • keywords tcl blocker removed
  • severity changed from high to medium

This is no longer a blocker for partcl.

  Changed 5 years ago by coke

  • lang set to tcl

in reply to: ↑ 2   Changed 5 years ago by coke

  • lang tcl deleted

Replying to coke:

This is no longer a blocker for partcl.

  Changed 5 years ago by bacek

  • status changed from assigned to closed
  • resolution set to fixed

Example from original description at r41527 produces

1..2
ok 1
ok 2

Resolving ticket.

Note: See TracTickets for help on using tickets.