Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/compiler98/AssocTree.hc

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


#include "newmacros.h"
#include "runtime.h"

#define CT_v535	((void*)startLabel+40)
#define FN_LAMBDA528	((void*)startLabel+80)
#define CT_v539	((void*)startLabel+112)
#define F0_LAMBDA528	((void*)startLabel+120)
#define FN_AssocTree_46cmp1	((void*)startLabel+140)
#define CT_v543	((void*)startLabel+172)
#define F0_AssocTree_46cmp1	((void*)startLabel+180)
#define CT_v544	((void*)startLabel+232)
#define FN_AssocTree_46Prelude_46203_46update	((void*)startLabel+276)
#define CT_v548	((void*)startLabel+308)
#define F0_AssocTree_46Prelude_46203_46update	((void*)startLabel+316)
#define CT_v549	((void*)startLabel+368)
#define FN_AssocTree_46Prelude_46197_46ok	((void*)startLabel+400)
#define CT_v553	((void*)startLabel+424)
#define F0_AssocTree_46Prelude_46197_46ok	((void*)startLabel+432)
#define FN_AssocTree_46cmp2	((void*)startLabel+452)
#define CT_v557	((void*)startLabel+484)
#define F0_AssocTree_46cmp2	((void*)startLabel+492)
#define CT_v558	((void*)startLabel+560)
#define FN_AssocTree_46Prelude_46190_46combine	((void*)startLabel+604)
#define CT_v565	((void*)startLabel+644)
#define F0_AssocTree_46Prelude_46190_46combine	((void*)startLabel+652)
#define CT_v566	((void*)startLabel+680)
#define CT_v567	((void*)startLabel+720)
#define FN_LAMBDA529	((void*)startLabel+752)
#define CT_v568	((void*)startLabel+776)
#define F0_LAMBDA529	((void*)startLabel+784)
#define CT_v569	((void*)startLabel+820)
#define CT_v570	((void*)startLabel+876)
#define CT_v571	((void*)startLabel+932)
#define CT_v572	((void*)startLabel+984)
#define CT_v573	((void*)startLabel+1040)
#define CT_v574	((void*)startLabel+1120)
extern Node FN_Tree234_46treeMap[];
extern Node FN_Prelude_46_36[];
extern Node F0_NHC_46Internal_46_95id[];
extern Node FN_NHC_46Internal_46_95apply1[];
extern Node FN_Prelude_46compare[];
extern Node FN_Tree234_46treeUpdate[];
extern Node FN_Tree234_46treeSearch[];
extern Node FN_Tree234_46treeAdd[];
extern Node FN_NHC_46Internal_46_95apply2[];
extern Node CF_Tree234_46initTree[];
extern Node FN_Tree234_46treeMapList[];
extern Node FN_Prelude_46foldl[];
extern Node FN_Prelude_46Show_46Prelude_462[];
extern Node FN_Prelude_46Show_46Prelude_46_91_93_46show[];
extern Node FN_Prelude_46Show_46AssocTree_46AssocTree[];
extern Node FN_Prelude_46_95_46showsType[];
extern Node FN_Prelude_46_95_46showList[];
extern Node FN_Prelude_46_95_46showsPrec[];

static Node startLabel[] = {
  42
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v535)
,};
Node FN_AssocTree_46mapAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I4,HEAP_OFF_N1,3,HEAP_ARG)
, bytes2word(2,PUSH_HEAP,HEAP_CVAL_I5,HEAP_CVAL_P1)
, bytes2word(6,HEAP_OFF_N1,5,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v535: (byte 0) */
  HW(4,2)
, 0
,};
Node F0_AssocTree_46mapAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46mapAT),2)
, CAPTAG(useLabel(FN_LAMBDA528),1)
, VAPTAG(useLabel(FN_Tree234_46treeMap))
, VAPTAG(useLabel(FN_Prelude_46_36))
, useLabel(F0_NHC_46Internal_46_95id)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v539)
,	/* FN_LAMBDA528: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,2,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,HEAP_I1,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_I1,HEAP_OFF_N1,5)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v539: (byte 0) */
  HW(1,2)
, 0
,	/* F0_LAMBDA528: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA528),2)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v543)
,	/* FN_AssocTree_46cmp1: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I3,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,2,PUSH_P1,0)
, bytes2word(PUSH_ARG_I2,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,ZAP_ARG_I1,ZAP_ARG_I2,ZAP_STACK_P1)
, bytes2word(4,ZAP_STACK_P1,3,EVAL)
, bytes2word(NEEDHEAP_I32,APPLY,2,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v543: (byte 0) */
  HW(1,3)
, 0
,	/* F0_AssocTree_46cmp1: (byte 0) */
  CAPTAG(useLabel(FN_AssocTree_46cmp1),3)
, VAPTAG(useLabel(FN_Prelude_46compare))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v544)
,};
Node FN_AssocTree_46updateAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,4)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG_ARG,1,3)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,6,HEAP_OFF_N1)
, bytes2word(5,HEAP_ARG,2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,6,HEAP_CVAL_P1,7)
, bytes2word(HEAP_OFF_N1,6,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
,	/* CT_v544: (byte 0) */
  HW(5,4)
, 0
,};
Node F0_AssocTree_46updateAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46updateAT),4)
, CAPTAG(useLabel(FN_AssocTree_46Prelude_46203_46update),1)
, CAPTAG(useLabel(FN_AssocTree_46cmp1),1)
, VAPTAG(useLabel(FN_Tree234_46treeUpdate))
, VAPTAG(useLabel(FN_Prelude_46_36))
, useLabel(F0_NHC_46Internal_46_95id)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v548)
,	/* FN_AssocTree_46Prelude_46203_46update: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,2,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,HEAP_I1,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_I1,HEAP_OFF_N1,5)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v548: (byte 0) */
  HW(1,2)
, 0
,	/* F0_AssocTree_46Prelude_46203_46update: (byte 0) */
  CAPTAG(useLabel(FN_AssocTree_46Prelude_46203_46update),2)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v549)
,};
Node FN_AssocTree_46lookupAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_N1,1,HEAP_CVAL_I3)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG_ARG,1,3)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I5,HEAP_OFF_N1,6)
, bytes2word(HEAP_OFF_N1,6,HEAP_OFF_N1,6)
, bytes2word(HEAP_ARG,2,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,0,0)
,	/* CT_v549: (byte 0) */
  HW(3,3)
, 0
,};
Node F0_AssocTree_46lookupAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46lookupAT),3)
, CAPTAG(useLabel(FN_AssocTree_46Prelude_46197_46ok),1)
, CAPTAG(useLabel(FN_AssocTree_46cmp1),1)
, VAPTAG(useLabel(FN_Tree234_46treeSearch))
, bytes2word(1,0,0,1)
, useLabel(CT_v553)
,	/* FN_AssocTree_46Prelude_46197_46ok: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,2,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_I2,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(1,1,0)
,	/* CT_v553: (byte 0) */
  HW(0,1)
, 0
,	/* F0_AssocTree_46Prelude_46197_46ok: (byte 0) */
  CAPTAG(useLabel(FN_AssocTree_46Prelude_46197_46ok),1)
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v557)
,	/* FN_AssocTree_46cmp2: (byte 0) */
  bytes2word(ZAP_ARG_I3,NEEDSTACK_I16,PUSH_ZAP_ARG,4)
, bytes2word(EVAL,NEEDHEAP_I32,UNPACK,2)
, bytes2word(PUSH_P1,0,PUSH_ARG_I2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,1,ZAP_ARG_I1)
, bytes2word(ZAP_ARG_I2,ZAP_STACK_P1,4,ZAP_STACK_P1)
, bytes2word(3,EVAL,NEEDHEAP_I32,APPLY)
, bytes2word(2,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
,	/* CT_v557: (byte 0) */
  HW(1,4)
, 0
,	/* F0_AssocTree_46cmp2: (byte 0) */
  CAPTAG(useLabel(FN_AssocTree_46cmp2),4)
, VAPTAG(useLabel(FN_Prelude_46compare))
, bytes2word(5,0,4,1)
, bytes2word(3,2,2,3)
, bytes2word(1,4,0,5)
, useLabel(CT_v558)
,};
Node FN_AssocTree_46addAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,3)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG_ARG,1,4)
, bytes2word(HEAP_CVAL_N1,1,HEAP_ARG_ARG,4)
, bytes2word(5,HEAP_CVAL_I5,HEAP_OFF_N1,9)
, bytes2word(HEAP_OFF_N1,8,HEAP_OFF_N1,6)
, bytes2word(HEAP_ARG,2,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(6,HEAP_CVAL_P1,7,HEAP_OFF_N1)
, bytes2word(7,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v558: (byte 0) */
  HW(5,5)
, 0
,};
Node F0_AssocTree_46addAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46addAT),5)
, CAPTAG(useLabel(FN_AssocTree_46Prelude_46190_46combine),2)
, CAPTAG(useLabel(FN_AssocTree_46cmp2),2)
, VAPTAG(useLabel(FN_Tree234_46treeAdd))
, VAPTAG(useLabel(FN_Prelude_46_36))
, useLabel(F0_NHC_46Internal_46_95id)
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v565)
,	/* FN_AssocTree_46Prelude_46190_46combine: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,UNPACK)
, bytes2word(2,PUSH_ZAP_ARG_I3,ZAP_STACK_P1,1)
, bytes2word(EVAL,NEEDHEAP_I32,UNPACK,2)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,1,HEAP_P1)
, bytes2word(3,HEAP_I1,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_I1,HEAP_OFF_N1,6)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v565: (byte 0) */
  HW(1,3)
, 0
,	/* F0_AssocTree_46Prelude_46190_46combine: (byte 0) */
  CAPTAG(useLabel(FN_AssocTree_46Prelude_46190_46combine),3)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, bytes2word(0,0,0,0)
, useLabel(CT_v566)
,};
Node FN_AssocTree_46initAT[] = {
  bytes2word(NEEDSTACK_I16,PUSH_CVAL_P1,3,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v566: (byte 0) */
  HW(1,0)
, 0
,};
Node CF_AssocTree_46initAT[] = {
  VAPTAG(useLabel(FN_AssocTree_46initAT))
, useLabel(CF_Tree234_46initTree)
, bytes2word(1,0,0,1)
, useLabel(CT_v567)
,};
Node FN_AssocTree_46listAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,PUSH_HEAP,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,2,HEAP_ARG,1)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v567: (byte 0) */
  HW(2,1)
, 0
,};
Node F0_AssocTree_46listAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46listAT),1)
, CAPTAG(useLabel(FN_LAMBDA529),2)
, VAPTAG(useLabel(FN_Tree234_46treeMapList))
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v568)
,	/* FN_LAMBDA529: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(HEAP_ARG_ARG,1,2,RETURN)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(1,2,0)
,	/* CT_v568: (byte 0) */
  HW(0,2)
, 0
,	/* F0_LAMBDA529: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA529),2)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v569)
,};
Node FN_AssocTree_46reorderAT[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,2)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,5,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v569: (byte 0) */
  HW(3,2)
, 0
,};
Node F0_AssocTree_46reorderAT[] = {
  CAPTAG(useLabel(FN_AssocTree_46reorderAT),2)
, VAPTAG(useLabel(FN_AssocTree_46listAT))
, VAPTAG(useLabel(FN_Prelude_46foldl))
, useLabel(CF_AssocTree_46initAT)
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v570)
,};
Node FN_Prelude_46Show_46AssocTree_46AssocTree_46show[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG_ARG,1)
, bytes2word(2,HEAP_CVAL_I4,HEAP_ARG,3)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I5,HEAP_OFF_N1,6)
, bytes2word(HEAP_OFF_N1,4,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
,	/* CT_v570: (byte 0) */
  HW(3,3)
, 0
,};
Node F0_Prelude_46Show_46AssocTree_46AssocTree_46show[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46show),3)
, VAPTAG(useLabel(FN_Prelude_46Show_46Prelude_462))
, VAPTAG(useLabel(FN_AssocTree_46listAT))
, VAPTAG(useLabel(FN_Prelude_46Show_46Prelude_46_91_93_46show))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v571)
,};
Node FN_Prelude_46Show_46AssocTree_46AssocTree_46showsType[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG_ARG,1)
, bytes2word(2,PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1)
, bytes2word(4,HEAP_ARG,3,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v571: (byte 0) */
  HW(2,3)
, 0
,};
Node F0_Prelude_46Show_46AssocTree_46AssocTree_46showsType[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showsType),3)
, VAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree))
, VAPTAG(useLabel(FN_Prelude_46_95_46showsType))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v572)
,};
Node FN_Prelude_46Show_46AssocTree_46AssocTree_46showList[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG_ARG,1)
, bytes2word(2,PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1)
, bytes2word(4,HEAP_ARG,3,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v572: (byte 0) */
  HW(2,3)
, 0
,};
Node F0_Prelude_46Show_46AssocTree_46AssocTree_46showList[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showList),3)
, VAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree))
, VAPTAG(useLabel(FN_Prelude_46_95_46showList))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v573)
,};
Node FN_Prelude_46Show_46AssocTree_46AssocTree_46showsPrec[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG_ARG,1)
, bytes2word(2,PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1)
, bytes2word(4,HEAP_ARG_ARG_RET_EVAL,3,4)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v573: (byte 0) */
  HW(2,4)
, 0
,};
Node F0_Prelude_46Show_46AssocTree_46AssocTree_46showsPrec[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showsPrec),4)
, VAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree))
, VAPTAG(useLabel(FN_Prelude_46_95_46showsPrec))
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v574)
,};
Node FN_Prelude_46Show_46AssocTree_46AssocTree[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG_ARG)
, bytes2word(1,2,PUSH_HEAP,HEAP_CVAL_I4)
, bytes2word(HEAP_ARG_ARG,1,2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I5,HEAP_ARG_ARG,1,2)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,6,HEAP_ARG_ARG)
, bytes2word(1,2,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_P1,4,HEAP_P1)
, bytes2word(3,HEAP_I2,HEAP_I1,RETURN)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,4,0)
,	/* CT_v574: (byte 0) */
  HW(4,2)
, 0
,};
Node F0_Prelude_46Show_46AssocTree_46AssocTree[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree),2)
, CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showsPrec),2)
, CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showsType),1)
, CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46showList),1)
, CAPTAG(useLabel(FN_Prelude_46Show_46AssocTree_46AssocTree_46show),1)
,};

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].