Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/libraries/base/Control/Monad/Fix.hc

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


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

#define CT_v283	((void*)startLabel+20)
#define FN_LAMBDA279	((void*)startLabel+48)
#define CT_v284	((void*)startLabel+68)
#define F0_LAMBDA279	((void*)startLabel+76)
#define CT_v285	((void*)startLabel+104)
#define v287	((void*)startLabel+146)
#define v288	((void*)startLabel+151)
#define CT_v290	((void*)startLabel+184)
#define CT_v291	((void*)startLabel+248)
#define FN_Control_46Monad_46Fix_46Prelude_46166_46unJust	((void*)startLabel+276)
#define v296	((void*)startLabel+286)
#define v295	((void*)startLabel+290)
#define v292	((void*)startLabel+295)
#define CT_v297	((void*)startLabel+308)
#define F0_Control_46Monad_46Fix_46Prelude_46166_46unJust	((void*)startLabel+316)
#define FN_LAMBDA280	((void*)startLabel+336)
#define CT_v299	((void*)startLabel+356)
#define CF_LAMBDA280	((void*)startLabel+364)
#define CT_v300	((void*)startLabel+400)
#define FN_LAMBDA281	((void*)startLabel+428)
#define CT_v302	((void*)startLabel+448)
#define CF_LAMBDA281	((void*)startLabel+456)
#define CT_v303	((void*)startLabel+480)
#define CT_v304	((void*)startLabel+512)
#define CT_v305	((void*)startLabel+552)
#define CT_v306	((void*)startLabel+600)
#define CT_v307	((void*)startLabel+648)
#define CT_v308	((void*)startLabel+696)
#define ST_v298	((void*)startLabel+716)
#define ST_v301	((void*)startLabel+785)
extern Node FN_NHC_46Internal_46_95apply2[];
extern Node FN_NHC_46IOExtras_46fixIO[];
extern Node FN_Prelude_46_46[];
extern Node F0_Prelude_46head[];
extern Node FN_Data_46Function_46fix[];
extern Node F0_Prelude_46tail[];
extern Node FN_NHC_46Internal_46_95apply1[];
extern Node FN_NHC_46Internal_46_95patternMatchFail[];
extern Node FN_NHC_46Internal_46_95noMethodError[];
extern Node CF_Prelude_46Monad_46Prelude_46Maybe[];
extern Node CF_Prelude_46Monad_46Prelude_46_91_93[];
extern Node CF_Prelude_46Monad_46NHC_46Internal_46IO[];
extern Node CF_Prelude_46Monad_46Prelude_46_45_62[];

static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v283)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62_46mfix[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,RETURN,ENDCODE,0)
, bytes2word(0,0,0,0)
,	/* CT_v283: (byte 0) */
  HW(1,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62_46mfix),1)
, CAPTAG(useLabel(FN_LAMBDA279),1)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v284)
,	/* FN_LAMBDA279: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,HEAP_OFF_N1,2,HEAP_ARG)
, bytes2word(2,PUSH_P1,0,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v284: (byte 0) */
  HW(1,2)
, 0
,	/* F0_LAMBDA279: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA279),2)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, bytes2word(1,0,0,1)
, useLabel(CT_v285)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO_46mfix[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
,	/* CT_v285: (byte 0) */
  HW(1,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO_46mfix),1)
, VAPTAG(useLabel(FN_NHC_46IOExtras_46fixIO))
, bytes2word(1,0,0,1)
, useLabel(CT_v290)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93_46mfix[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I4,PUSH_HEAP,HEAP_CVAL_I5,HEAP_OFF_N1)
, bytes2word(4,EVAL,NEEDHEAP_I32,TABLESWITCH)
, bytes2word(2,NOP,TOP(4),BOT(4))
,	/* v287: (byte 2) */
  bytes2word(TOP(9),BOT(9),POP_I1,PUSH_HEAP)
,	/* v288: (byte 3) */
  bytes2word(HEAP_CVAL_N1,1,RETURN,UNPACK)
, bytes2word(2,HEAP_CVAL_I3,HEAP_CVAL_P1,6)
, bytes2word(HEAP_ARG,1,HEAP_CVAL_P1,7)
, bytes2word(HEAP_OFF_N1,4,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(2,HEAP_I1,HEAP_OFF_N1,4)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTR(1,2,0)
, CONSTR(0,0,0)
,	/* CT_v290: (byte 0) */
  HW(5,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93_46mfix),1)
, VAPTAG(useLabel(FN_Prelude_46_46))
, useLabel(F0_Prelude_46head)
, VAPTAG(useLabel(FN_Data_46Function_46fix))
, useLabel(F0_Prelude_46tail)
, VAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93_46mfix))
, bytes2word(1,0,0,1)
, useLabel(CT_v291)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe_46mfix[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_CVAL_I4,HEAP_OFF_N1)
, bytes2word(2,HEAP_OFF_P1,1,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG,1,HEAP_OFF_N1)
, bytes2word(5,PUSH_P1,0,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v291: (byte 0) */
  HW(2,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe_46mfix),1)
, CAPTAG(useLabel(FN_Control_46Monad_46Fix_46Prelude_46166_46unJust),1)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, bytes2word(1,0,0,1)
, useLabel(CT_v297)
,	/* FN_Control_46Monad_46Fix_46Prelude_46166_46unJust: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL,NEEDHEAP_I32)
, bytes2word(TABLESWITCH,2,TOP(4),BOT(4))
,	/* v296: (byte 2) */
  bytes2word(TOP(8),BOT(8),POP_I1,JUMP)
,	/* v295: (byte 2) */
  bytes2word(7,0,UNPACK,1)
,	/* v292: (byte 3) */
  bytes2word(PUSH_P1,0,RETURN_EVAL,HEAP_CVAL_I3)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1,2)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v297: (byte 0) */
  HW(2,1)
, 0
,	/* F0_Control_46Monad_46Fix_46Prelude_46166_46unJust: (byte 0) */
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46Prelude_46166_46unJust),1)
, VAPTAG(useLabel(FN_LAMBDA280))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95patternMatchFail))
, bytes2word(0,0,0,0)
, useLabel(CT_v299)
,	/* 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_v298)
,	/* CT_v299: (byte 0) */
  HW(0,0)
, 0
,	/* CF_LAMBDA280: (byte 0) */
  VAPTAG(useLabel(FN_LAMBDA280))
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v300)
,};
Node FN_Control_46Monad_46Fix_46_95_46mfix[] = {
  bytes2word(ZAP_ARG_I1,NEEDHEAP_I32,PUSH_ARG_I2,HEAP_CVAL_I3)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1,2)
, bytes2word(ZAP_ARG_I2,EVAL,NEEDHEAP_I32,APPLY)
, bytes2word(1,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
,	/* CT_v300: (byte 0) */
  HW(2,2)
, 0
,};
Node F0_Control_46Monad_46Fix_46_95_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46_95_46mfix),2)
, VAPTAG(useLabel(FN_LAMBDA281))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95noMethodError))
, bytes2word(0,0,0,0)
, useLabel(CT_v302)
,	/* FN_LAMBDA281: (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_LAMBDA281: (byte 0) */
  VAPTAG(useLabel(FN_LAMBDA281))
, bytes2word(1,0,0,1)
, useLabel(CT_v303)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Monad[] = {
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,1)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v303: (byte 0) */
  HW(0,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46Monad[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Monad),1)
, bytes2word(1,0,0,1)
, useLabel(CT_v304)
,};
Node FN_Control_46Monad_46Fix_46mfix[] = {
  bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,2)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
,	/* CT_v304: (byte 0) */
  HW(0,1)
, 0
,};
Node F0_Control_46Monad_46Fix_46mfix[] = {
  CAPTAG(useLabel(FN_Control_46Monad_46Fix_46mfix),1)
, bytes2word(0,0,0,0)
, useLabel(CT_v305)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_I3,HEAP_CVAL_I4,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v305: (byte 0) */
  HW(2,0)
, 0
,};
Node CF_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe[] = {
  VAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe))
, useLabel(CF_Prelude_46Monad_46Prelude_46Maybe)
, useLabel(F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46Maybe_46mfix)
, bytes2word(0,0,0,0)
, useLabel(CT_v306)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_I3,HEAP_CVAL_I4,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v306: (byte 0) */
  HW(2,0)
, 0
,};
Node CF_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93[] = {
  VAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93))
, useLabel(CF_Prelude_46Monad_46Prelude_46_91_93)
, useLabel(F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46_91_93_46mfix)
, bytes2word(0,0,0,0)
, useLabel(CT_v307)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_I3,HEAP_CVAL_I4,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v307: (byte 0) */
  HW(2,0)
, 0
,};
Node CF_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO[] = {
  VAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO))
, useLabel(CF_Prelude_46Monad_46NHC_46Internal_46IO)
, useLabel(F0_Control_46Monad_46Fix_46MonadFix_46NHC_46Internal_46IO_46mfix)
, bytes2word(0,0,0,0)
, useLabel(CT_v308)
,};
Node FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62[] = {
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(HEAP_CVAL_I3,HEAP_CVAL_I4,RETURN,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,2,0)
,	/* CT_v308: (byte 0) */
  HW(2,0)
, 0
,};
Node CF_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62[] = {
  VAPTAG(useLabel(FN_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62))
, useLabel(CF_Prelude_46Monad_46Prelude_46_45_62)
, useLabel(F0_Control_46Monad_46Fix_46MonadFix_46Prelude_46_45_62_46mfix)
,	/* ST_v298: (byte 0) */
  bytes2word(67,111,110,116)
, bytes2word(114,111,108,46)
, bytes2word(77,111,110,97)
, bytes2word(100,46,70,105)
, bytes2word(120,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(54,53,58,50)
, bytes2word(48,45,54,53)
, bytes2word(58,51,56,46)
,	/* ST_v301: (byte 1) */
  bytes2word(0,78,111,32)
, bytes2word(100,101,102,97)
, bytes2word(117,108,116,32)
, bytes2word(100,101,102,105)
, bytes2word(110,105,116,105)
, bytes2word(111,110,32,102)
, bytes2word(111,114,32,99)
, bytes2word(108,97,115,115)
, bytes2word(32,109,101,116)
, bytes2word(104,111,100,32)
, bytes2word(109,102,105,120)
, bytes2word(0,0,0,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].