-.comp 920 010111010010000
-.start __generic_print_Start
-.depend "StdGeneric" "20220216025412"
-.depend "_SystemEnumStrict" "20220216025412"
-.depend "_SystemStrictLists" "20220216025412"
-.depend "StdStrictLists" "20220216025412"
-.depend "_SystemEnum" "20220216025412"
-.depend "StdEnum" "20220216025412"
-.depend "StdMisc" "20220216025412"
-.depend "StdFunctions" "20220216025412"
-.depend "StdCharList" "20220216025412"
-.depend "StdTuple" "20220216025412"
-.depend "StdOrdList" "20220216025412"
-.depend "StdList" "20220216025412"
-.depend "StdClass" "20220216025412"
-.depend "StdFile" "20220216025412"
-.depend "StdString" "20220216025412"
-.depend "_SystemArray" "20220216025412"
-.depend "StdArray" "20220216025412"
-.depend "StdChar" "20220216025412"
-.depend "StdReal" "20220216025412"
-.depend "StdInt" "20220216025412"
-.depend "StdOverloaded" "20220216025412"
-.depend "StdBool" "20220216025412"
-.depend "StdEnv" "20220216025412"
-.module m_generic_print "generic_print" "20220301120244"
-.endinfo
-.impmod _system
-.implab _cycle_in_spine
-.implab _type_error
-.implab _hnf
-.impdesc e_system_dind
-.implab e_system_nind e_system_eaind
-.impdesc e_system_dif
-.implab e_system_nif e_system_eaif
-.implab e_system_sif
-.impdesc e_system_dAP
-.implab e_system_nAP e_system_eaAP
-.implab e_system_sAP
-.impdesc ARRAY
-.impdesc _Nil
-.impdesc _Cons
-.impdesc _Conss
-.implab n_Conss ea_Conss
-.impdesc _Consts
-.implab n_Consts ea_Consts
-.impdesc _Conssts
-.implab n_Conssts ea_Conssts
-.impdesc _Tuple
-.impdesc d_S.1
-.implab n_S.1 ea_S.1
-.impdesc d_S.2
-.implab n_S.2 ea_S.2
-.impdesc d_S.3
-.implab n_S.3 ea_S.3
-.impdesc d_S.4
-.implab n_S.4 ea_S.4
-.impdesc d_S.5
-.implab n_S.5 ea_S.5
-.impdesc d_S.6
-.implab n_S.6 ea_S.6
-.implab _driver
-.impmod StdString
-.impdesc e_StdString_dtoString;5
-.implab e_StdString_ntoString;5
-.impdesc e_StdString_dtoString;7
-.implab e_StdString_ntoString;7
-.impmod StdGeneric
-.impdesc e_StdGeneric_dUNIT
-.impdesc e_StdGeneric_dLEFT
-.impdesc e_StdGeneric_dRIGHT
-.impdesc e_StdGeneric_dPAIR
-.impdesc e_StdGeneric_dCONS
-.impdesc e_StdGeneric_dRECORD
-.impdesc e_StdGeneric_rGenericTypeDefDescriptor
-.impdesc e_StdGeneric_rGenericConsDescriptor
-.impdesc e_StdGeneric_dGenericConsDescriptor.gcd_name
-.implab e_StdGeneric_nGenericConsDescriptor.gcd_name
-.impdesc e_StdGeneric_dGenConsNoPrio
-.impdesc e_StdGeneric_rGenericRecordDescriptor
-.impdesc e_StdGeneric_rGenericFieldDescriptor
-.impdesc e_StdGeneric_dGenericFieldDescriptor.gfd_name
-.implab e_StdGeneric_nGenericFieldDescriptor.gfd_name
-.impdesc e_StdGeneric_dGenTypeCons
-.impdesc e_StdGeneric_kGenTypeVar
-.impdesc e_StdGeneric_dGenTypeApp
-.impdesc e_StdGeneric_dGenTypeArrow
-.record r42 aa 2 0 "T"
-.export __generic_print_Start
-.o 0 0
-__generic_print_Start
- build _ 0 n1
-.d 1 0
- jmp _driver
-.n 0 _ ea1
-.o 1 0
-n1
- push_node _cycle_in_spine 0
-.o 1 0
-ea1
-.o 1 0
-s1
- buildh _Nil 0
- buildh _Nil 0
- buildh _None 0
- buildh _Cons 2
- buildR 3.14
- buildh _Tuple 2
- buildI 42
-.d 4 0
- jmp s14
-.o 4 0
-s14
- create
- push_a 2
- push_a 2
- update_a 2 4
- update_a 1 3
- updatepop_a 0 2
-.d 3 0
- jsr s39
-.o 1 0
- buildh d65 0
- build _ 0 n38
- buildh d8 2
- buildh d2 0
- build _ 0 n37
- buildh d8 2
- buildh d9 2
- build _ 0 n36
- push_a 3
- push_a 3
- update_a 1 4
- update_a 2 1
- update_a 3 2
- update_a 0 3
- pop_a 1
- update_a 3 4
- update_a 2 3
- update_a 1 2
- updatepop_a 0 1
-.d 5 0
- jmp s7
-.desc d65 _hnf l65 2 0 "_f2"
-.a 2 ea65
-.o 2 0
-l65
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea65
-.o 3 0
-s65
- push_a 0
- jsr_eval 0
- repl_args 2 2
- buildh d64 0
- buildh d3 0
- push_a 5
- push_a 4
- update_a 1 5
- update_a 2 1
- update_a 3 2
- update_a 4 3
- update_a 0 4
- pop_a 1
- update_a 4 6
- update_a 3 5
- update_a 2 4
- update_a 1 3
- updatepop_a 0 2
-.d 6 0
- jmp s11
-.desc d64 _hnf l64 2 0 "_f1"
-.a 2 ea64
-.o 2 0
-l64
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea64
-.o 3 0
-s64
- push_a 0
- jsr_eval 0
- buildh d63 0
- push_a 3
- push_a 2
- update_a 1 3
- update_a 2 1
- update_a 0 2
- pop_a 1
- update_a 2 4
- update_a 1 3
- updatepop_a 0 2
-.d 4 0
- jmp s12
-.desc d63 _hnf l63 2 0 "_f0"
-.a 2 ea63
-.o 2 0
-l63
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea63
-.o 3 0
-s63
- push_a 0
- jsr_eval 0
- buildh d2 0
- push_a 3
- push_a 2
- update_a 1 3
- update_a 2 1
- update_a 0 2
- pop_a 1
- update_a 2 4
- update_a 1 3
- updatepop_a 0 2
-.d 4 0
- jmp s13
-.n 0 _
-.o 1 0
-n37
- push_node _cycle_in_spine 0
-.o 0 0
-ea37
- build _ 0 n36
- buildI 0
- buildAC "f1"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericFieldDescriptor 3 0 3 0 0
- pop_a 3
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n38
- push_node _cycle_in_spine 0
-.o 0 0
-ea38
- build _ 0 n36
- buildI 1
- buildAC "f2"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericFieldDescriptor 3 0 3 0 0
- pop_a 3
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n36
- push_node _cycle_in_spine 0
-.o 0 0
-ea36
- build _ 0 n35
- build _ 0 n34
- buildI 0
- buildI 2
- buildAC "T"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericRecordDescriptor 5 0 5 0 0
- pop_a 5
-.d 1 0
- rtn
-.n 0 _ ea34
-.o 1 0
-n34
- push_node _cycle_in_spine 0
-.o 1 0
-ea34
-.o 1 0
-s34
- buildAC "T"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildAC "Int"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildAC "_!Maybe"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- buildAC "_List"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- buildAC "Real"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildAC "_Tuple2"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- buildh e_StdGeneric_dGenTypeApp 2
- buildh e_StdGeneric_dGenTypeArrow 2
- buildAC "Int"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- fillh e_StdGeneric_dGenTypeArrow 2 2
-.d 1 0
- rtn
-.n 0 _ ea35
-.o 1 0
-n35
- push_node _cycle_in_spine 0
-.o 1 0
-ea35
-.o 1 0
-s35
- buildh _Nil 0
- buildAC "f2"
- buildh ARRAY 1
- buildh _Cons 2
- buildAC "f1"
- buildh ARRAY 1
- fillh _Cons 2 2
-.d 1 0
- rtn
-.desc d3 _hnf l3 2 0 "gPrint_Real;3"
-.o 4 0
-i3
- pop_a 1
-.d 3 0
- jmp s3
-.ai 2 ea3 i3
-.o 2 0
-l3
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea3
-.o 3 0
-s3
- push_a 0
- build _ 1 e_StdString_ntoString;7
- push_a 2
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- fillh _Cons 2 4
- pop_a 2
-.d 1 0
- rtn
-.desc d2 _hnf l2 2 0 "gPrint_Int;1"
-.o 4 0
-i2
- pop_a 1
-.d 3 0
- jmp s2
-.ai 2 ea2 i2
-.o 2 0
-l2
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea2
-.o 3 0
-s2
- push_a 0
- build _ 1 e_StdString_ntoString;5
- push_a 2
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- fillh _Cons 2 4
- pop_a 2
-.d 1 0
- rtn
-.o 4 0
-s13
- push_a 1
- build _ 1 n33
- buildh d4 0
- build _ 0 n32
- buildh d6 2
- build _ 0 n31
- push_a 3
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- buildh d6 2
- buildh d10 2
- push_a 4
- push_a 2
- update_a 1 3
- update_a 2 1
- update_a 0 2
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
-.d 4 0
- jmp s5
-.n 0 _
-.o 1 0
-n31
- push_node _cycle_in_spine 0
-.o 0 0
-ea31
- build _ 0 n29
- build _ 0 n28
- buildh e_StdGeneric_dGenConsNoPrio 0
- buildI 0
- buildI 1
- buildAC "_!Just"
- buildh ARRAY 1
- push_a 5
- update_a 3 6
- update_a 4 3
- update_a 5 4
- update_a 0 5
- pop_a 1
- fill_r e_StdGeneric_rGenericConsDescriptor 6 0 6 0 0
- pop_a 6
-.d 1 0
- rtn
-.n 0 _ ea27
-.o 1 0
-n27
- push_node _cycle_in_spine 0
-.o 1 0
-ea27
-.o 1 0
-s27
- buildh _Nil 0
- build _ 0 n32
- buildh _Cons 2
- build _ 0 n31
- fillh _Cons 2 2
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n28
- push_node _cycle_in_spine 0
-.o 0 0
-ea28
- build _ 0 n27
- buildI 2
- buildI 1
- buildAC "_!Maybe"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericTypeDefDescriptor 4 0 4 0 0
- pop_a 4
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n32
- push_node _cycle_in_spine 0
-.o 0 0
-ea32
- build _ 0 n30
- build _ 0 n28
- buildh e_StdGeneric_dGenConsNoPrio 0
- buildI 1
- buildI 0
- buildAC "_!None"
- buildh ARRAY 1
- push_a 5
- update_a 3 6
- update_a 4 3
- update_a 5 4
- update_a 0 5
- pop_a 1
- fill_r e_StdGeneric_rGenericConsDescriptor 6 0 6 0 0
- pop_a 6
-.d 1 0
- rtn
-.n 0 _ ea29
-.o 1 0
-n29
- push_node _cycle_in_spine 0
-.o 1 0
-ea29
-.o 1 0
-s29
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_!Maybe"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- fillh e_StdGeneric_dGenTypeArrow 2 2
-.d 1 0
- rtn
-.n 0 _ ea30
-.o 1 0
-n30
- push_node _cycle_in_spine 0
-.o 1 0
-ea30
-.o 1 0
-s30
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_!Maybe"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- fillh e_StdGeneric_dGenTypeApp 2 2
-.d 1 0
- rtn
-.n 1 _ ea33
-.o 1 0
-n33
- push_node _cycle_in_spine 1
-.o 2 0
-ea33
-.o 2 0
-s33
- eq_desc _Just 1 0
- jmp_true case.1
- jmp case.2
-case.1
- repl_args 1 1
- push_a 0
- buildh e_StdGeneric_dCONS 1
- fillh e_StdGeneric_dLEFT 1 2
- pop_a 1
-.d 1 0
- rtn
-case.2
- buildh e_StdGeneric_dUNIT 0
- buildh e_StdGeneric_dCONS 1
- fillh e_StdGeneric_dRIGHT 1 2
- pop_a 1
-.d 1 0
- rtn
-.desc d12 _hnf l12 3 0 "gPrint__List;13"
-.o 5 0
-i12
- pop_a 1
- jsr_eval 1
-.d 4 0
- jmp s12
-.ai 3 ea12 i12
-.o 2 0
-l12
- push_args 0 2 2
- update_a 3 2
- create
- update_a 0 4
- pop_a 1
-.o 4 0
-ea12
- jsr_eval 1
-.o 4 0
-s12
- push_a 1
- build _ 1 n26
- buildh d4 0
- build _ 0 n25
- buildh d6 2
- push_a 2
- buildh d12 1
- push_a 3
- buildh d9 2
- build _ 0 n24
- buildh d6 2
- buildh d10 2
- push_a 4
- push_a 2
- update_a 1 3
- update_a 2 1
- update_a 0 2
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
-.d 4 0
- jmp s5
-.n 0 _
-.o 1 0
-n24
- push_node _cycle_in_spine 0
-.o 0 0
-ea24
- build _ 0 n22
- build _ 0 n21
- buildh e_StdGeneric_dGenConsNoPrio 0
- buildI 0
- buildI 2
- buildAC "_Cons"
- buildh ARRAY 1
- push_a 5
- update_a 3 6
- update_a 4 3
- update_a 5 4
- update_a 0 5
- pop_a 1
- fill_r e_StdGeneric_rGenericConsDescriptor 6 0 6 0 0
- pop_a 6
-.d 1 0
- rtn
-.n 0 _ ea20
-.o 1 0
-n20
- push_node _cycle_in_spine 0
-.o 1 0
-ea20
-.o 1 0
-s20
- buildh _Nil 0
- build _ 0 n25
- buildh _Cons 2
- build _ 0 n24
- fillh _Cons 2 2
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n21
- push_node _cycle_in_spine 0
-.o 0 0
-ea21
- build _ 0 n20
- buildI 2
- buildI 1
- buildAC "_List"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericTypeDefDescriptor 4 0 4 0 0
- pop_a 4
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n25
- push_node _cycle_in_spine 0
-.o 0 0
-ea25
- build _ 0 n23
- build _ 0 n21
- buildh e_StdGeneric_dGenConsNoPrio 0
- buildI 1
- buildI 0
- buildAC "_Nil"
- buildh ARRAY 1
- push_a 5
- update_a 3 6
- update_a 4 3
- update_a 5 4
- update_a 0 5
- pop_a 1
- fill_r e_StdGeneric_rGenericConsDescriptor 6 0 6 0 0
- pop_a 6
-.d 1 0
- rtn
-.n 0 _ ea22
-.o 1 0
-n22
- push_node _cycle_in_spine 0
-.o 1 0
-ea22
-.o 1 0
-s22
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_List"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_List"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- buildh e_StdGeneric_dGenTypeArrow 2
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- fillh e_StdGeneric_dGenTypeArrow 2 2
-.d 1 0
- rtn
-.n 0 _ ea23
-.o 1 0
-n23
- push_node _cycle_in_spine 0
-.o 1 0
-ea23
-.o 1 0
-s23
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_List"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- fillh e_StdGeneric_dGenTypeApp 2 2
-.d 1 0
- rtn
-.desc d4 _hnf l4 2 0 "gPrint_UNIT;5"
-.a 2 ea4
-.o 2 0
-l4
- push_args 0 1 1
- update_a 2 1
- create
- update_a 0 3
- pop_a 1
-.o 3 0
-ea4
- jsr_eval 1
-.o 3 0
-s4
- fill_a 1 2
- pop_a 2
-.d 1 0
- rtn
-.desc d10 _hnf l10 4 0 "gPrint_EITHER;11"
-.a 4 ea10
-.o 2 0
-l10
- push_args 0 3 3
- update_a 4 3
- create
- update_a 0 5
- pop_a 1
-.o 5 0
-ea10
- jsr_eval 2
-.o 5 0
-s10
- eq_desc e_StdGeneric_dLEFT 1 2
- jmp_true case.3
- jmp case.4
-case.3
- push_args 2 1 1
- buildh _Nil 0
- update_a 0 4
- pop_a 1
- push_a 4
- push_a 2
- jsr_eval 0
- push_a 2
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 7
- update_a 1 6
- updatepop_a 0 5
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-case.4
- push_args 2 1 1
- buildh _Nil 0
- update_a 0 4
- pop_a 1
- push_a 4
- push_a 3
- jsr_eval 0
- push_a 2
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 7
- update_a 1 6
- updatepop_a 0 5
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.n 1 _ ea26
-.o 1 0
-n26
- push_node _cycle_in_spine 1
-.o 2 0
-ea26
-.o 2 0
-s26
- eq_desc _Cons 2 0
- jmp_true case.5
- jmp case.6
-case.5
- repl_args 2 2
- push_a 1
- push_a 1
- buildh e_StdGeneric_dPAIR 2
- buildh e_StdGeneric_dCONS 1
- fillh e_StdGeneric_dLEFT 1 3
- pop_a 2
-.d 1 0
- rtn
-case.6
- buildh e_StdGeneric_dUNIT 0
- buildh e_StdGeneric_dCONS 1
- fillh e_StdGeneric_dRIGHT 1 2
- pop_a 1
-.d 1 0
- rtn
-.o 6 0
-s11
- push_a 3
- push_a 3
- buildh _Tuple 2
- build _ 1 n19
- push_a 2
- push_a 2
- buildh d9 2
- build _ 0 n18
- buildh d6 2
- push_a 6
- push_a 2
- update_a 1 3
- update_a 2 1
- update_a 0 2
- pop_a 1
- update_a 2 7
- update_a 1 6
- updatepop_a 0 5
-.d 4 0
- jmp s5
-.n 0 _ ea15
-.o 1 0
-n15
- push_node _cycle_in_spine 0
-.o 1 0
-ea15
-.o 1 0
-s15
- buildh _Nil 0
- build _ 0 n18
- fillh _Cons 2 2
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n16
- push_node _cycle_in_spine 0
-.o 0 0
-ea16
- build _ 0 n15
- buildI 1
- buildI 2
- buildAC "_Tuple2"
- buildh ARRAY 1
- fill_r e_StdGeneric_rGenericTypeDefDescriptor 4 0 4 0 0
- pop_a 4
-.d 1 0
- rtn
-.n 0 _
-.o 1 0
-n18
- push_node _cycle_in_spine 0
-.o 0 0
-ea18
- build _ 0 n17
- build _ 0 n16
- buildh e_StdGeneric_dGenConsNoPrio 0
- buildI 0
- buildI 2
- buildAC "_Tuple2"
- buildh ARRAY 1
- push_a 5
- update_a 3 6
- update_a 4 3
- update_a 5 4
- update_a 0 5
- pop_a 1
- fill_r e_StdGeneric_rGenericConsDescriptor 6 0 6 0 0
- pop_a 6
-.d 1 0
- rtn
-.n 0 _ ea17
-.o 1 0
-n17
- push_node _cycle_in_spine 0
-.o 1 0
-ea17
-.o 1 0
-s17
- pushI 1
- buildhr e_StdGeneric_kGenTypeVar 0 1
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildAC "_Tuple2"
- buildh ARRAY 1
- buildh e_StdGeneric_dGenTypeCons 1
- buildh e_StdGeneric_dGenTypeApp 2
- buildh e_StdGeneric_dGenTypeApp 2
- pushI 1
- buildhr e_StdGeneric_kGenTypeVar 0 1
- buildh e_StdGeneric_dGenTypeArrow 2
- pushI 0
- buildhr e_StdGeneric_kGenTypeVar 0 1
- fillh e_StdGeneric_dGenTypeArrow 2 2
-.d 1 0
- rtn
-.desc d6 _hnf l6 4 0 "gPrint_CONS;7"
-.a 4 ea6
-.o 2 0
-l6
- push_args 0 3 3
- update_a 4 3
- create
- update_a 0 5
- pop_a 1
-.o 5 0
-ea6
- jsr_eval 2
-.o 5 0
-s6
- push_args 2 1 1
- buildh _Nil 0
- update_a 0 4
- pop_a 1
- push_a 4
- buildAC ")"
- buildh ARRAY 1
- buildh _Cons 2
- push_a 1
- push_a 4
- build _ 3 n66
- buildAC " "
- buildh ARRAY 1
- buildh _Cons 2
- push_a 2
- build e_StdGeneric_dGenericConsDescriptor.gcd_name -4 e_StdGeneric_nGenericConsDescriptor.gcd_name
- buildh _Cons 2
- buildAC "("
- buildh ARRAY 1
- fillh _Cons 2 7
- pop_a 5
-.d 1 0
- rtn
-.n 3 _ ea66
-.o 1 0
-n66
- push_node _cycle_in_spine 3
-.o 4 0
-ea66
-.o 4 0
-s66
- push_a 2
- push_a 1
- jsr_eval 0
- push_a 3
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.n 1 _ ea19
-.o 1 0
-n19
- push_node _cycle_in_spine 1
-.o 2 0
-ea19
- repl_args 2 2
-.o 3 0
-s19
- push_a 1
- push_a 1
- buildh e_StdGeneric_dPAIR 2
- fillh e_StdGeneric_dCONS 1 3
- pop_a 2
-.d 1 0
- rtn
-.o 4 0
-s5
- push_a 2
- push_a 2
- push_a 2
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.desc d8 _hnf l8 4 0 "gPrint_FIELD;9"
-.a 4 ea8
-.o 2 0
-l8
- push_args 0 3 3
- update_a 4 3
- create
- update_a 0 5
- pop_a 1
-.o 5 0
-ea8
-.o 5 0
-s8
- push_a 3
- push_a 3
- push_a 3
- build _ 3 n67
- buildAC "="
- buildh ARRAY 1
- buildh _Cons 2
- push_a 1
- build e_StdGeneric_dGenericFieldDescriptor.gfd_name -4 e_StdGeneric_nGenericFieldDescriptor.gfd_name
- fillh _Cons 2 6
- pop_a 4
-.d 1 0
- rtn
-.n 3 _ ea67
-.o 1 0
-n67
- push_node _cycle_in_spine 3
-.o 4 0
-ea67
-.o 4 0
-s67
- push_a 2
- push_a 1
- jsr_eval 0
- push_a 3
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.desc d9 _hnf l9 4 0 "gPrint_PAIR;10"
-.a 4 ea9
-.o 2 0
-l9
- push_args 0 3 3
- update_a 4 3
- create
- update_a 0 5
- pop_a 1
-.o 5 0
-ea9
- jsr_eval 2
- jsr_eval 0
-.o 5 0
-s9
- push_args 2 2 2
- buildh _Nil 0
- update_a 0 5
- pop_a 1
- push_a 5
- push_a 2
- push_a 5
- build _ 3 n68
- buildAC " "
- buildh ARRAY 1
- buildh _Cons 2
- push_a 1
- push_a 4
- update_a 2 8
- update_a 1 7
- updatepop_a 0 6
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.n 3 _ ea68
-.o 1 0
-n68
- push_node _cycle_in_spine 3
-.o 4 0
-ea68
-.o 4 0
-s68
- push_a 2
- push_a 1
- jsr_eval 0
- push_a 3
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn
-.o 3 0
-s39
- push_a 1
- push_a 1
- buildh e_StdGeneric_dPAIR 2
- fillh e_StdGeneric_dRECORD 1 3
- pop_a 2
-.d 1 0
- rtn
-.o 5 0
-s7
- push_args 2 1 1
- buildh _Nil 0
- update_a 0 4
- pop_a 1
- push_a 4
- buildAC "}"
- buildh ARRAY 1
- buildh _Cons 2
- push_a 1
- push_a 4
- build _ 3 n69
- buildAC "{"
- buildh ARRAY 1
- fillh _Cons 2 7
- pop_a 5
-.d 1 0
- rtn
-.n 3 _ ea69
-.o 1 0
-n69
- push_node _cycle_in_spine 3
-.o 4 0
-ea69
-.o 4 0
-s69
- push_a 2
- push_a 1
- jsr_eval 0
- push_a 3
- push_a 1
- update_a 1 2
- update_a 0 1
- pop_a 1
- update_a 2 5
- update_a 1 4
- updatepop_a 0 3
- jsr_ap 2
- fill_a 0 1
- pop_a 1
-.d 1 0
- rtn