You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

549 lines
9.6 KiB

SETCP0
(:methods
recv_internal:
c2 SAVE
SAMEALTSAVE
0 PUSHINT
s1 PUSH
SBITS
31 GTINT
<{
s0 POP
s0 PUSH
32 PLDU
}> PUSHCONT
IF
s0 s2 XCHG
CTOS
4 LDU
s0 s1 XCHG
1 PUSHINT
AND
1 EQINT
<{
-1 PUSHINT
}> PUSHCONT
<{
0 PUSHINT
}> PUSHCONT
IFELSE
s0 s1 XCHG
LDMSGADDR
s2 PUSH
s6 s6 XCHG2
4 TUPLE
1 SETGLOBVAR
s0 s2 XCHG
<{
2DROP
}> PUSHCONT
IFJMP
s0 PUSH
3665837821 PUSHINT
EQUAL
<{
s0 POP
c4 PUSH
CTOS
LDREF
s0 s1 XCHG
2 SETGLOBVAR
LDDICT
s0 s1 XCHG
s1 POP
s0 s1 XCHG
32 LDU
s0 s1 XCHG
3665837821 PUSHINT
EQUAL
129 THROWIFNOT
LDGRAMS
s0 s1 XCHG
s1 POP
<{
1 GETGLOBVAR
4 UNTUPLE
s2 s3 XCHG
3 BLKDROP
s1 PUSH
0 EQINT
<{
s1 POP
s1 PUSH
267 PUSHINT
s2 PUSH
257 PUSHINT
s1 s3 s3 XCHG3
DICTGET
NULLSWAPIFNOT
<{
s0 s1 XCHG
LDI
s0 POP
}> PUSHCONT
<{
2DROP
PUSHNULL
}> PUSHCONT
IFELSE
s0 PUSH
ISNULL
128 THROWIF
110 MULCONST
100 PUSHINT
DIV QOUT
s0 s1 XCHG
}> PUSHCONT
IF
267 PUSHINT
3 0 1 PUSH3
257 PUSHINT
s1 s3 s3 XCHG3
DICTGET
NULLSWAPIFNOT
<{
s0 s1 XCHG
LDI
s0 POP
}> PUSHCONT
<{
2DROP
PUSHNULL
}> PUSHCONT
IFELSE
s0 PUSH
ISNULL
128 THROWIF
s3 PUSH
SUB
s2 PUSH
s3 s5 XCHG
s0 s1 XCHG
257 PUSHINT
6 CALLDICT
s0 PUSH
267 PUSHINT
s4 PUSH
257 PUSHINT
s1 s3 s3 XCHG3
DICTGET
NULLSWAPIFNOT
<{
s0 s1 XCHG
LDI
s0 POP
}> PUSHCONT
<{
2DROP
PUSHNULL
}> PUSHCONT
IFELSE
s0 PUSH
ISNULL
128 THROWIF
0 LESSINT
<{
267 PUSHINT
s3 PUSH
0 PUSHINT
257 PUSHINT
6 CALLDICT
}> IFREF
-1 PUSHINT
0 PUSHINT
PUSHSLICE
<{
NEWC
0 PUSHINT
s0 s1 XCHG
32 STU
NIL
s0 s1 XCHG
TPUSH
PUSHNULL
TPUSH
s0 s1 XCHG
<{
s0 PUSH
SREFS
s1 PUSH
SBITS
<{
s0 PUSH
0 GTINT
s2 PUSH
0 GTINT
OR
}> PUSHCONT
<{
s0 s3 XCHG
2 UNTUPLE
127 PUSHINT
s2 PUSH
BBITS
3 RSHIFT
SUB
s0 s5 XCHG
3 RSHIFT
s5 s5 XCPU
MIN
s0 PUSH
0 GTINT
<{
s0 PUSH
3 LSHIFT
s1 s5 XCHG
LDSLICEX
s3 s3 XCHG2
STSLICER
s0 s1 s4 XCHG3
}> PUSHCONT
IF
ROTREV
PAIR
s4 s1 PUSH2
SUB
0 GTINT
<{
NEWC
s0 s1 XCHG
PAIR
s4 s4 XCHG2
SUB
3 LSHIFT
}> PUSHCONT
<{
s1 POP
s3 POP
0 GTINT
<{
LDREF
s0 POP
CTOS
s0 PUSH
SREFS
s1 PUSH
SBITS
}> PUSHCONT
<{
0 PUSHINT
s0 PUSH
}> PUSHCONT
IFELSE
}> PUSHCONT
IFELSE
}> PUSHCONT
WHILE
3 BLKDROP
}> CALLREF
2 UNTUPLE
s0 s1 XCHG
ENDC
<{
s1 PUSH
ISNULL
NOT
}> PUSHCONT
<{
s0 s1 XCHG
2 UNTUPLE
ROTREV
STREF
ENDC
}> PUSHCONT
WHILE
s1 POP
}> CALLREF
s2 s4 XCHG
s3 s5 XCHG
PUSHNULL
PUSHNULL
<{
NEWC
1 PUSHINT
s0 s1 XCHG
2 STI
s0 s7 XCHG2
s0 s1 XCHG
1 STI
0 PUSHINT
s0 s1 XCHG
3 STI
s0 s5 XCHG2
STSLICER
s0 s3 XCHG2
STGRAMS
0 PUSHINT
s0 s1 XCHG
105 STI
s3 PUSH
ISNULL
NOT
s5 PUSH
ISNULL
NOT
OR
<{
-1 PUSHINT
s0 s1 XCHG
1 STI
NEWC
0 PUSHINT
s0 s1 XCHG
1 STI
0 PUSHINT
s0 s1 XCHG
1 STI
s4 PUSH
ISNULL
NOT
<{
-1 PUSHINT
s0 s1 XCHG
1 STI
s0 s4 XCHG
s0 PUSH
ISNULL
128 THROWIF
s0 s4 XCHG2
STREF
}> PUSHCONT
<{
s4 POP
s0 s3 XCHG
0 PUSHINT
s0 s1 XCHG
1 STI
}> PUSHCONT
IFELSE
s4 PUSH
ISNULL
NOT
<{
-1 PUSHINT
s0 s1 XCHG
1 STI
s0 s4 XCHG
s0 PUSH
ISNULL
128 THROWIF
s0 s4 XCHG2
STREF
}> PUSHCONT
<{
s4 POP
s0 s3 XCHG
0 PUSHINT
s0 s1 XCHG
1 STI
}> PUSHCONT
IFELSE
0 PUSHINT
s0 s1 XCHG
1 STI
s0 s2 XCHG
-1 PUSHINT
s0 s1 XCHG
1 STI
s0 s2 XCHG
ENDC
ROT
STREF
}> PUSHCONT
<{
s3 POP
s3 POP
s0 s1 XCHG
0 PUSHINT
s0 s1 XCHG
1 STI
}> PUSHCONT
IFELSE
s1 PUSH
ISNULL
NOT
<{
-1 PUSHINT
s0 s1 XCHG
1 STI
s0 s1 XCHG
s0 PUSH
ISNULL
128 THROWIF
s0 s1 XCHG
STREF
}> PUSHCONT
<{
s1 POP
0 PUSHINT
s0 s1 XCHG
1 STI
}> PUSHCONT
IFELSE
ENDC
s0 s1 XCHG
SENDRAWMSG
}> CALLREF
}> CALLREF
NEWC
2 GETGLOBVAR
s0 s1 XCHG
STREF
s0 s1 XCHG
s0 s1 XCHG
STDICT
ENDC
c4 POP
}> PUSHCONT
IFJMP
0 EQINT
<{
s0 PUSH
HASHSU
20712925151889215669912116818955575927875783670988084319049521716100301489720 PUSHINT
EQUAL
<{
s0 POP
c4 PUSH
CTOS
LDREF
s0 s1 XCHG
2 SETGLOBVAR
LDDICT
s0 s1 XCHG
s1 POP
1 GETGLOBVAR
4 UNTUPLE
s0 POP
s2 POP
s2 PUSH
267 PUSHINT
s2 PUSH
257 PUSHINT
s1 s3 s3 XCHG3
DICTGET
NULLSWAPIFNOT
<{
s0 s1 XCHG
LDI
s0 POP
}> PUSHCONT
<{
2DROP
PUSHNULL
}> PUSHCONT
IFELSE
s0 PUSH
ISNULL
<{
s0 POP
0 PUSHINT
}> PUSHCONT
IF
267 PUSHINT
s0 s1 XCHG
s0 PUSH
ISNULL
128 THROWIF
s0 s3 XCHG2
ADD
257 PUSHINT
6 CALLDICT
NEWC
2 GETGLOBVAR
s0 s1 XCHG
STREF
s0 s1 XCHG
s0 s1 XCHG
STDICT
ENDC
c4 POP
RETALT
}> PUSHCONT
IFJMP
}> IFREF
c4 PUSH
CTOS
LDREF
s0 s1 XCHG
2 SETGLOBVAR
LDDICT
s0 s1 XCHG
s1 POP
s0 s1 XCHG
32 LDU
s0 POP
2077040623 PUSHINT
EQUAL
<{
1 GETGLOBVAR
4 UNTUPLE
s0 POP
s2 POP
s2 PUSH
267 PUSHINT
s2 PUSH
257 PUSHINT
s1 s3 s3 XCHG3
DICTGET
NULLSWAPIFNOT
<{
s0 s1 XCHG
LDI
s0 POP
}> PUSHCONT
<{
2DROP
PUSHNULL
}> PUSHCONT
IFELSE
s0 PUSH
ISNULL
<{
s0 POP
0 PUSHINT
}> PUSHCONT
IF
267 PUSHINT
s0 s1 XCHG
s0 PUSH
ISNULL
128 THROWIF
s0 s3 XCHG2
ADD
257 PUSHINT
6 CALLDICT
}> PUSHCONT
IF
NEWC
2 GETGLOBVAR
s0 s1 XCHG
STREF
s0 s1 XCHG
s0 s1 XCHG
STDICT
ENDC
c4 POP
6:
s1 PUSH
ISNULL
<{
2DROP
ROTREV
DICTDEL
s0 POP
}> PUSHCONT
IFJMP
NEWC
s0 s1 XCHG
STIX
s1 s3 s3 XCHG3
DICTSETB
113617:
123515602279859691144772641439386770278 PUSHINT
209801025412363888721030803524359905849 PUSHINT
) 19 DICTPUSHCONST
DICTIGETJMPZ
11 THROWARG