use enum_ prop in seadesc to store all members

because frappy can not handle dynamic enums
2022-08-24 17:40:02 +02:00
parent 4d9961fe5c
commit 4ada8529fb
5 changed files with 11 additions and 1 deletions
--- a/tcl/startup/frappy.tcl
+++ b/tcl/startup/frappy.tcl
@ -55,7 +55,10 @@ proc describe_node {base path {visibility 1}} {

  set hp $base/$path
  lassign [split [hinfo $hp] ,] type nkids length
-  set enum [silent 0 hgetpropval $hp enum]
+  set enum [silent 0 hgetpropval $hp enum_]
+  if {$enum eq "0"} {
+    set enum [silent 0 hgetpropval $hp enum]
+  }
  set extra ""
  if {$enum eq "1"} {
    set type bool