PROGRAM{
  DECLPROC __tact_context_get
  DECLPROC __tact_verify_address
  DECLPROC __tact_store_address
  DECLPROC __tact_store_address_opt
  DECLPROC __gen_write_Linker
  DECLPROC $__gen_Linker_init
  107886 DECLMETHOD init
  DECLPROC main
  DECLGLOBVAR __tact_context
  DECLGLOBVAR __tact_context_sys
  __tact_context_get PROCINLINE:<{
    __tact_context GETGLOB
    4 UNTUPLE
  }>
  __tact_verify_address PROCINLINE:<{
    SBITS
    267 PUSHINT
    NEQ
    136 THROWIFNOT
  }>
  __tact_store_address PROCINLINE:<{
    STSLICER
  }>
  __tact_store_address_opt PROCINLINE:<{
    DUP
    ISNULL
    IF:<{
      DROP
      0 PUSHINT
      SWAP
      2 STU
    }>ELSE<{
      __tact_store_address INLINECALLDICT
    }>
  }>
  __gen_write_Linker PROCREF:<{
    s3 s4 XCHG2
    257 PUSHINT
    STIX
    SWAP
    __tact_store_address INLINECALLDICT
    SWAP
    __tact_store_address_opt INLINECALLDICT
    NEWC
    ROT
    __tact_store_address_opt INLINECALLDICT
    ENDC
    SWAP
    STREF
  }>
  $__gen_Linker_init PROC:<{
    PUSHNULL
    __tact_context_get INLINECALLDICT
    s2 s3 XCHG
    3 BLKDROP
    s0 s4 XCHG
    NEWC
    STREF
    s4 s4 s4 XCHG3
    __gen_write_Linker INLINECALLDICT
    ENDC
  }>
  init PROC:<{
    $__gen_Linker_init CALLDICT
  }>
  main PROC:<{
  }>
}END>c