Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/List/Unzip6.hc

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


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

#define CT_v287	((void*)startLabel+56)
#define FN_LAMBDA285	((void*)startLabel+88)
#define CT_v291	((void*)startLabel+192)
#define F0_LAMBDA285	((void*)startLabel+200)
#define FN_LAMBDA284	((void*)startLabel+240)
#define CT_v292	((void*)startLabel+252)
#define F0_LAMBDA284	((void*)startLabel+260)
#define FN_LAMBDA283	((void*)startLabel+272)
#define CT_v293	((void*)startLabel+284)
#define F0_LAMBDA283	((void*)startLabel+292)
#define FN_LAMBDA282	((void*)startLabel+304)
#define CT_v294	((void*)startLabel+316)
#define F0_LAMBDA282	((void*)startLabel+324)
#define FN_LAMBDA281	((void*)startLabel+336)
#define CT_v295	((void*)startLabel+348)
#define F0_LAMBDA281	((void*)startLabel+356)
#define FN_LAMBDA280	((void*)startLabel+368)
#define CT_v296	((void*)startLabel+380)
#define F0_LAMBDA280	((void*)startLabel+388)
#define FN_LAMBDA279	((void*)startLabel+400)
#define CT_v297	((void*)startLabel+412)
#define F0_LAMBDA279	((void*)startLabel+420)
#define FN_LAMBDA278	((void*)startLabel+432)
#define CT_v301	((void*)startLabel+468)
#define F0_LAMBDA278	((void*)startLabel+476)
extern Node FN_Prelude_46foldr[];

static Node startLabel[] = {
  bytes2word(0,0,0,0)
, useLabel(CT_v287)
,};
Node FN_List_46unzip6[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_N1,1,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_N1,1,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_N1,1,HEAP_CVAL_N1,2)
, bytes2word(HEAP_OFF_N1,7,HEAP_OFF_N1,7)
, bytes2word(HEAP_OFF_N1,7,HEAP_OFF_N1,7)
, bytes2word(HEAP_OFF_N1,7,HEAP_OFF_N1,7)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1,15)
, bytes2word(HEAP_OFF_N1,9,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, CONSTR(0,6,0)
, CONSTR(0,0,0)
,	/* CT_v287: (byte 0) */
  HW(2,0)
, 0
,};
Node CF_List_46unzip6[] = {
  VAPTAG(useLabel(FN_List_46unzip6))
, CAPTAG(useLabel(FN_LAMBDA285),2)
, CAPTAG(useLabel(FN_Prelude_46foldr),1)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v291)
,	/* FN_LAMBDA285: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL,NEEDHEAP_P1)
, bytes2word(39,UNPACK,6,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I4,HEAP_OFF_N1,3,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,5,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,6,HEAP_OFF_N1,7)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,7,HEAP_OFF_N1)
, bytes2word(9,PUSH_HEAP,HEAP_CVAL_P1,8)
, bytes2word(HEAP_OFF_N1,11,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(9,HEAP_OFF_N1,13,HEAP_CVAL_N1)
, bytes2word(1,HEAP_P1,7,HEAP_P1)
, bytes2word(0,HEAP_CVAL_N1,1,HEAP_P1)
, bytes2word(8,HEAP_I1,HEAP_CVAL_N1,1)
, bytes2word(HEAP_P1,9,HEAP_I2,HEAP_CVAL_N1)
, bytes2word(1,HEAP_P1,10,HEAP_P1)
, bytes2word(3,HEAP_CVAL_N1,1,HEAP_P1)
, bytes2word(11,HEAP_P1,4,HEAP_CVAL_N1)
, bytes2word(1,HEAP_P1,12,HEAP_P1)
, bytes2word(5,PUSH_HEAP,HEAP_CVAL_N1,2)
, bytes2word(HEAP_OFF_N1,19,HEAP_OFF_N1,17)
, bytes2word(HEAP_OFF_N1,15,HEAP_OFF_N1,13)
, bytes2word(HEAP_OFF_N1,11,HEAP_OFF_N1,9)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTR(0,6,0)
, CONSTR(1,2,0)
,	/* CT_v291: (byte 0) */
  HW(7,2)
, 0
,	/* F0_LAMBDA285: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA285),2)
, VAPTAG(useLabel(FN_LAMBDA278))
, VAPTAG(useLabel(FN_LAMBDA279))
, VAPTAG(useLabel(FN_LAMBDA280))
, VAPTAG(useLabel(FN_LAMBDA281))
, VAPTAG(useLabel(FN_LAMBDA282))
, VAPTAG(useLabel(FN_LAMBDA283))
, VAPTAG(useLabel(FN_LAMBDA284))
, bytes2word(1,0,0,1)
, useLabel(CT_v292)
,	/* FN_LAMBDA284: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,6)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v292: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA284: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA284),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v293)
,	/* FN_LAMBDA283: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,5)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v293: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA283: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA283),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v294)
,	/* FN_LAMBDA282: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,4)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v294: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA282: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA282),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v295)
,	/* FN_LAMBDA281: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,3)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v295: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA281: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA281),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v296)
,	/* FN_LAMBDA280: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,2)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v296: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA280: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA280),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v297)
,	/* FN_LAMBDA279: (byte 0) */
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,1)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v297: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA279: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA279),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v301)
,	/* FN_LAMBDA278: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,6,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(1,HEAP_P1,6,HEAP_P1)
, bytes2word(5,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,6,0)
,	/* CT_v301: (byte 0) */
  HW(0,1)
, 0
,	/* F0_LAMBDA278: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA278),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].