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.
 
 

65 lines
799 B

SETCP0
(:methods
recv_internal:
5:
0 PUSHINT
PUSHNULL
PUSHNULL
0 PUSHINT
s0 s6 XCHG
NEWC
STREF
s0 s6 XCHG
s0 s5 XCHG
3 1 BLKSWAP
s5 s6 XCHG2
257 PUSHINT
STIX
s0 s3 XCHG2
STSLICER
s0 s1 XCHG
STSLICER
1 STI
NEWC
s2 PUSH
ISNULL
NOT
<{
-1 PUSHINT
s0 s1 XCHG
1 STI
s1 s2 XCHG
257 PUSHINT
STIX
}> PUSHCONT
<{
s2 POP
0 PUSHINT
ROT
1 STI
}> PUSHCONT
IFELSE
ROT
s0 PUSH
ISNULL
<{
s0 POP
0 PUSHINT
s0 s1 XCHG
2 STU
}> PUSHCONT
<{
STSLICER
}> PUSHCONT
IFELSE
ENDC
s0 s1 XCHG
STREF
ENDC
107886:
5 CALLDICT
) 19 DICTPUSHCONST
DICTIGETJMPZ
11 THROWARG