# ---------------------
Devel::Peek::Dump output so we can compare values:
SV = IV(0x2bf2d8) at 0x2bf2d8
  REFCNT = 1
  FLAGS = (PADMY,ROK)
  RV = 0x2216b0
  SV = PVMG(0x4372c8) at 0x2216b0
    REFCNT = 1
    FLAGS = (OBJECT,IOK,READONLY,pIOK)
    IV = 7888424
    NV = 0
    PV = 0
    STASH = 0x30a5e8    "Short"
    # ---------------------
perl passing simtime:  20
obj size   : 4
obj val    : 2bf2d8
thing size : 4
thing val  : 7888424
thing simtime p : 0               << should be 20
thing simtime A : 0
thing index   A : 0
thing simtime B : 0               << should be 20
thing index   B : 0               << should be 1
perl passing simtime:  40
obj size   : 4
obj val    : 2bf2d8
thing size : 4
thing val  : 7888424
thing simtime p : 0               << should be 40
thing simtime A : 0
thing index   A : 0
thing simtime B : 0               << should be 40
thing index   B : 0               << should be 2
FREE thing size : 4