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

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


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

#define FN_ListUtils_46isSuffixOf	((void*)startLabel+12)
#define CT_v282	((void*)startLabel+52)
#define F0_ListUtils_46isSuffixOf	((void*)startLabel+60)
#define v292	((void*)startLabel+106)
#define v286	((void*)startLabel+110)
#define v283	((void*)startLabel+115)
#define v290	((void*)startLabel+148)
#define v291	((void*)startLabel+158)
#define CT_v295	((void*)startLabel+188)
#define v296	((void*)startLabel+261)
#define v298	((void*)startLabel+271)
#define CT_v300	((void*)startLabel+284)
#define FN_LAMBDA279	((void*)startLabel+332)
#define CT_v302	((void*)startLabel+352)
#define CF_LAMBDA279	((void*)startLabel+360)
#define v323	((void*)startLabel+386)
#define v306	((void*)startLabel+390)
#define v303	((void*)startLabel+397)
#define v324	((void*)startLabel+406)
#define v310	((void*)startLabel+410)
#define v307	((void*)startLabel+415)
#define v325	((void*)startLabel+422)
#define v314	((void*)startLabel+426)
#define v326	((void*)startLabel+436)
#define v318	((void*)startLabel+440)
#define v319	((void*)startLabel+469)
#define v321	((void*)startLabel+481)
#define v315	((void*)startLabel+486)
#define v311	((void*)startLabel+491)
#define CT_v327	((void*)startLabel+512)
#define FN_LAMBDA280	((void*)startLabel+552)
#define CT_v329	((void*)startLabel+572)
#define CF_LAMBDA280	((void*)startLabel+580)
#define ST_v328	((void*)startLabel+584)
#define ST_v301	((void*)startLabel+644)
extern Node FN_Prelude_46reverse[];
extern Node FN_NHC_46Internal_46_95apply1[];
extern Node FN_Prelude_46length[];
extern Node FN_Prelude_46take[];
extern Node FN_Prelude_46Eq_46Prelude_46_91_93_46_61_61[];
extern Node FN_Prelude_46_61_61[];
extern Node FN_Prelude_46flip[];
extern Node FN_Prelude_46break[];
extern Node FN_Prelude_46Num_46Prelude_46Int_46_45[];
extern Node CF_Prelude_46otherwise[];
extern Node FN_NHC_46Internal_46_95patternMatchFail[];

static Node startLabel[] = {
  bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v282)
,	/* FN_ListUtils_46isSuffixOf: (byte 0) */
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_CVAL_I4,HEAP_OFF_N1)
, bytes2word(2,HEAP_ARG,2,HEAP_CVAL_I5)
, bytes2word(HEAP_ARG,2,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,2,HEAP_ARG,3)
, bytes2word(HEAP_CVAL_P1,6,HEAP_OFF_N1,7)
, bytes2word(HEAP_OFF_N1,5,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(7,HEAP_ARG,1,HEAP_OFF_N1)
, bytes2word(14,HEAP_OFF_N1,6,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v282: (byte 0) */
  HW(5,3)
, 0
,	/* F0_ListUtils_46isSuffixOf: (byte 0) */
  CAPTAG(useLabel(FN_ListUtils_46isSuffixOf),3)
, VAPTAG(useLabel(FN_Prelude_46reverse))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Prelude_46length))
, VAPTAG(useLabel(FN_Prelude_46take))
, VAPTAG(useLabel(FN_Prelude_46Eq_46Prelude_46_91_93_46_61_61))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v295)
,};
Node FN_ListUtils_46split[] = {
  bytes2word(NEEDSTACK_I16,PUSH_ARG_I3,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(8),BOT(8))
,	/* v292: (byte 2) */
  bytes2word(TOP(4),BOT(4),POP_I1,JUMP)
,	/* v286: (byte 2) */
  bytes2word(7,0,POP_I1,PUSH_HEAP)
,	/* v283: (byte 3) */
  bytes2word(HEAP_CVAL_N1,1,RETURN,PUSH_ARG_I3)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,1,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,3,HEAP_ARG,2)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I5,HEAP_OFF_N1,4)
, bytes2word(ZAP_ARG_I3,EVAL,NEEDHEAP_I32,APPLY)
, bytes2word(1,EVAL,UNPACK,2)
, bytes2word(PUSH_I1,ZAP_STACK_P1,2,EVAL)
, bytes2word(NEEDHEAP_I32,TABLESWITCH,2,NOP)
,	/* v290: (byte 4) */
  bytes2word(TOP(4),BOT(4),TOP(14),BOT(14))
, bytes2word(POP_I1,HEAP_CVAL_N1,1,PUSH_HEAP)
, bytes2word(HEAP_CVAL_N1,2,HEAP_I1,HEAP_OFF_N1)
,	/* v291: (byte 2) */
  bytes2word(3,RETURN,UNPACK,2)
, bytes2word(HEAP_CVAL_P1,6,HEAP_ARG_ARG,1)
, bytes2word(2,HEAP_I1,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(2,HEAP_P1,3,HEAP_OFF_N1)
, bytes2word(6,RETURN,ENDCODE,0)
, bytes2word(0,0,0,0)
, CONSTR(1,2,0)
, CONSTR(0,0,0)
,	/* CT_v295: (byte 0) */
  HW(4,3)
, 0
,};
Node F0_ListUtils_46split[] = {
  CAPTAG(useLabel(FN_ListUtils_46split),3)
, VAPTAG(useLabel(FN_Prelude_46_61_61))
, CAPTAG(useLabel(FN_Prelude_46flip),1)
, VAPTAG(useLabel(FN_Prelude_46break))
, VAPTAG(useLabel(FN_ListUtils_46split))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v300)
,};
Node FN_ListUtils_46dropSuffix[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG_ARG)
, bytes2word(1,3,HEAP_ARG,2)
, bytes2word(ZAP_ARG_I1,EVAL,NEEDHEAP_I32,JUMPFALSE)
, bytes2word(21,0,HEAP_CVAL_I4,HEAP_ARG)
, bytes2word(2,HEAP_CVAL_I4,HEAP_ARG,3)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,5,HEAP_OFF_N1)
, bytes2word(4,PUSH_HEAP,HEAP_CVAL_P1,6)
, bytes2word(HEAP_OFF_N1,4,HEAP_ARG,2)
,	/* v296: (byte 1) */
  bytes2word(RETURN_EVAL,PUSH_CVAL_P1,7,ZAP_ARG_I3)
, bytes2word(EVAL,NEEDHEAP_I32,JUMPFALSE,4)
,	/* v298: (byte 3) */
  bytes2word(0,PUSH_ARG_I2,RETURN_EVAL,HEAP_CVAL_P1)
, bytes2word(8,PUSH_HEAP,HEAP_CVAL_P1,9)
, bytes2word(HEAP_OFF_N1,2,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
,	/* CT_v300: (byte 0) */
  HW(7,3)
, 0
,};
Node F0_ListUtils_46dropSuffix[] = {
  CAPTAG(useLabel(FN_ListUtils_46dropSuffix),3)
, VAPTAG(useLabel(FN_ListUtils_46isSuffixOf))
, VAPTAG(useLabel(FN_Prelude_46length))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Int_46_45))
, VAPTAG(useLabel(FN_Prelude_46take))
, useLabel(CF_Prelude_46otherwise)
, VAPTAG(useLabel(FN_LAMBDA279))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95patternMatchFail))
, bytes2word(0,0,0,0)
, useLabel(CT_v302)
,	/* FN_LAMBDA279: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,2,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, useLabel(ST_v301)
,	/* CT_v302: (byte 0) */
  HW(0,0)
, 0
,	/* CF_LAMBDA279: (byte 0) */
  VAPTAG(useLabel(FN_LAMBDA279))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v327)
,};
Node FN_ListUtils_46prefix[] = {
  bytes2word(NEEDSTACK_I16,PUSH_ARG_I2,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(8),BOT(8))
,	/* v323: (byte 2) */
  bytes2word(TOP(4),BOT(4),POP_I1,JUMP)
,	/* v306: (byte 2) */
  bytes2word(9,0,POP_I1,PUSH_HEAP)
, bytes2word(HEAP_CVAL_N1,1,HEAP_ARG,3)
,	/* v303: (byte 1) */
  bytes2word(RETURN,PUSH_ARG_I3,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(8),BOT(8))
,	/* v324: (byte 2) */
  bytes2word(TOP(4),BOT(4),POP_I1,JUMP)
,	/* v310: (byte 2) */
  bytes2word(7,0,POP_I1,PUSH_HEAP)
,	/* v307: (byte 3) */
  bytes2word(HEAP_CVAL_N1,2,RETURN,PUSH_ARG_I2)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v325: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v314: (byte 2) */
  bytes2word(67,0,UNPACK,2)
, bytes2word(PUSH_ARG_I3,TABLESWITCH,2,NOP)
,	/* v326: (byte 4) */
  bytes2word(TOP(4),BOT(4),TOP(8),BOT(8))
,	/* v318: (byte 4) */
  bytes2word(POP_I1,JUMP,48,0)
, bytes2word(UNPACK,2,PUSH_P1,0)
, bytes2word(PUSH_P1,3,PUSH_HEAP,HEAP_CVAL_I3)
, bytes2word(HEAP_ARG,1,ZAP_ARG_I2,ZAP_ARG_I3)
, bytes2word(EVAL,NEEDHEAP_I32,APPLY,2)
, bytes2word(EVAL,NEEDHEAP_I32,JUMPFALSE,10)
, bytes2word(0,PUSH_HEAP,HEAP_CVAL_I4,HEAP_ARG)
, bytes2word(1,HEAP_P1,4,HEAP_I2)
,	/* v319: (byte 1) */
  bytes2word(RETURN_EVAL,PUSH_CVAL_P1,5,ZAP_ARG_I1)
, bytes2word(EVAL,NEEDHEAP_I32,JUMPFALSE,6)
, bytes2word(0,PUSH_HEAP,HEAP_CVAL_N1,2)
,	/* v321: (byte 1) */
  bytes2word(RETURN,POP_P1,2,JUMP)
,	/* v315: (byte 2) */
  bytes2word(2,0,POP_P1,2)
,	/* v311: (byte 3) */
  bytes2word(JUMP,2,0,HEAP_CVAL_P1)
, bytes2word(6,PUSH_HEAP,HEAP_CVAL_P1,7)
, bytes2word(HEAP_OFF_N1,2,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
, CONSTR(0,0,0)
, CONSTR(1,1,0)
,	/* CT_v327: (byte 0) */
  HW(5,3)
, 0
,};
Node F0_ListUtils_46prefix[] = {
  CAPTAG(useLabel(FN_ListUtils_46prefix),3)
, VAPTAG(useLabel(FN_Prelude_46_61_61))
, VAPTAG(useLabel(FN_ListUtils_46prefix))
, useLabel(CF_Prelude_46otherwise)
, VAPTAG(useLabel(FN_LAMBDA280))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95patternMatchFail))
, bytes2word(0,0,0,0)
, useLabel(CT_v329)
,	/* FN_LAMBDA280: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,2,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, useLabel(ST_v328)
,	/* CT_v329: (byte 0) */
  HW(0,0)
, 0
,	/* CF_LAMBDA280: (byte 0) */
  VAPTAG(useLabel(FN_LAMBDA280))
,	/* ST_v328: (byte 0) */
  bytes2word(76,105,115,116)
, bytes2word(85,116,105,108)
, bytes2word(115,58,32,80)
, bytes2word(97,116,116,101)
, bytes2word(114,110,32,109)
, bytes2word(97,116,99,104)
, bytes2word(32,102,97,105)
, bytes2word(108,117,114,101)
, bytes2word(32,105,110,32)
, bytes2word(102,117,110,99)
, bytes2word(116,105,111,110)
, bytes2word(32,97,116,32)
, bytes2word(49,49,58,49)
, bytes2word(45,49,53,58)
,	/* ST_v301: (byte 4) */
  bytes2word(50,51,46,0)
, bytes2word(76,105,115,116)
, bytes2word(85,116,105,108)
, bytes2word(115,58,32,80)
, bytes2word(97,116,116,101)
, bytes2word(114,110,32,109)
, bytes2word(97,116,99,104)
, bytes2word(32,102,97,105)
, bytes2word(108,117,114,101)
, bytes2word(32,105,110,32)
, bytes2word(102,117,110,99)
, bytes2word(116,105,111,110)
, bytes2word(32,97,116,32)
, bytes2word(49,56,58,49)
, bytes2word(45,50,48,58)
, bytes2word(50,54,46,0)
,};

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