Commit d923a8b2 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Oops, remove experimental archiving code.

parent e797aaf2
...@@ -368,7 +368,6 @@ Simulator instproc run {} { ...@@ -368,7 +368,6 @@ Simulator instproc run {} {
var_import ::GLOBALS::elabinelab_eid var_import ::GLOBALS::elabinelab_eid
var_import ::GLOBALS::elabinelab_cvstag var_import ::GLOBALS::elabinelab_cvstag
var_import ::GLOBALS::security_level var_import ::GLOBALS::security_level
var_import ::GLOBALS::sourcefile_list
if {$ran == 1} { if {$ran == 1} {
perror "The Simulator 'run' statement can only be run once." perror "The Simulator 'run' statement can only be run once."
...@@ -618,10 +617,6 @@ Simulator instproc run {} { ...@@ -618,10 +617,6 @@ Simulator instproc run {} {
$self spitxml_data "eventlist" [list "time" "vnode" "vname" "objecttype" "eventtype" "arguments" "atstring" ] [list [lindex $event 0] [lindex $event 1] [lindex $event 2] $objtypes([lindex $event 3]) $eventtypes([lindex $event 4]) [lindex $event 5] [lindex $event 6] ] $self spitxml_data "eventlist" [list "time" "vnode" "vname" "objecttype" "eventtype" "arguments" "atstring" ] [list [lindex $event 0] [lindex $event 1] [lindex $event 2] $objtypes([lindex $event 3]) $eventtypes([lindex $event 4]) [lindex $event 5] [lindex $event 6] ]
} }
foreach sourcefile $sourcefile_list {
$self spitxml_data "external_sourcefiles" [list "pathname"] [list $sourcefile]
}
$self spitxml_finish $self spitxml_finish
} }
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment