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

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


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

#define v271	((void*)startLabel+34)
#define v246	((void*)startLabel+38)
#define v272	((void*)startLabel+50)
#define v250	((void*)startLabel+54)
#define v273	((void*)startLabel+66)
#define v254	((void*)startLabel+70)
#define v274	((void*)startLabel+82)
#define v258	((void*)startLabel+86)
#define v275	((void*)startLabel+98)
#define v262	((void*)startLabel+102)
#define v276	((void*)startLabel+114)
#define v266	((void*)startLabel+118)
#define v277	((void*)startLabel+130)
#define v270	((void*)startLabel+134)
#define v267	((void*)startLabel+179)
#define v263	((void*)startLabel+184)
#define v259	((void*)startLabel+189)
#define v255	((void*)startLabel+194)
#define v251	((void*)startLabel+199)
#define v247	((void*)startLabel+204)
#define v243	((void*)startLabel+209)
#define CT_v278	((void*)startLabel+228)
extern Node FN_NHC_46Internal_46_95apply4[];
extern Node FN_NHC_46Internal_46_95apply3[];

static Node startLabel[] = {
  bytes2word(0,0,8,0)
, bytes2word(7,1,6,2)
, bytes2word(5,3,4,4)
, bytes2word(3,5,2,6)
, bytes2word(1,7,0,8)
, useLabel(CT_v278)
,};
Node FN_List_46zipWith7[] = {
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v271: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v246: (byte 2) */
  bytes2word(173,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG_I3,EVAL,NEEDHEAP_I32,TABLESWITCH)
, bytes2word(2,NOP,TOP(4),BOT(4))
,	/* v272: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v250: (byte 2) */
  bytes2word(152,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG,4,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v273: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v254: (byte 2) */
  bytes2word(131,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG,5,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v274: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v258: (byte 2) */
  bytes2word(110,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG,6,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v275: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v262: (byte 2) */
  bytes2word(89,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG,7,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v276: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v266: (byte 2) */
  bytes2word(68,0,UNPACK,2)
, bytes2word(PUSH_ZAP_ARG,8,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v277: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v270: (byte 2) */
  bytes2word(47,0,UNPACK,2)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,1,HEAP_P1)
, bytes2word(12,HEAP_P1,10,HEAP_P1)
, bytes2word(8,HEAP_P1,6,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,7,HEAP_P1,4)
, bytes2word(HEAP_I2,HEAP_P1,0,HEAP_CVAL_I5)
, bytes2word(HEAP_ARG,1,HEAP_P1,13)
, bytes2word(HEAP_P1,11,HEAP_P1,9)
, bytes2word(HEAP_P1,7,HEAP_P1,5)
, bytes2word(HEAP_P1,3,HEAP_I1,PUSH_HEAP)
, bytes2word(HEAP_CVAL_N1,1,HEAP_OFF_N1,15)
,	/* v267: (byte 3) */
  bytes2word(HEAP_OFF_N1,11,RETURN,POP_P1)
,	/* v263: (byte 4) */
  bytes2word(2,JUMP,2,0)
, bytes2word(POP_P1,2,JUMP,2)
,	/* v259: (byte 1) */
  bytes2word(0,POP_P1,2,JUMP)
,	/* v255: (byte 2) */
  bytes2word(2,0,POP_P1,2)
,	/* v251: (byte 3) */
  bytes2word(JUMP,2,0,POP_P1)
,	/* v247: (byte 4) */
  bytes2word(2,JUMP,2,0)
, bytes2word(POP_P1,2,JUMP,2)
,	/* v243: (byte 1) */
  bytes2word(0,PUSH_HEAP,HEAP_CVAL_N1,2)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTR(0,0,0)
, CONSTR(1,2,0)
,	/* CT_v278: (byte 0) */
  HW(3,8)
, 0
,};
Node F0_List_46zipWith7[] = {
  CAPTAG(useLabel(FN_List_46zipWith7),8)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply4))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply3))
, VAPTAG(useLabel(FN_List_46zipWith7))
,};

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].