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

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


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

#define CT_v621	((void*)startLabel+104)
#define FN_GcodeSpec_46createProfs	((void*)startLabel+152)
#define CT_v625	((void*)startLabel+288)
#define F0_GcodeSpec_46createProfs	((void*)startLabel+296)
#define v627	((void*)startLabel+344)
#define v628	((void*)startLabel+349)
#define CT_v630	((void*)startLabel+424)
#define v632	((void*)startLabel+464)
#define v633	((void*)startLabel+469)
#define CT_v635	((void*)startLabel+572)
#define FN_LAMBDA612	((void*)startLabel+660)
#define v636	((void*)startLabel+677)
#define CT_v638	((void*)startLabel+696)
#define F0_LAMBDA612	((void*)startLabel+704)
#define FN_LAMBDA611	((void*)startLabel+732)
#define v641	((void*)startLabel+774)
#define CT_v644	((void*)startLabel+800)
#define F0_LAMBDA611	((void*)startLabel+808)
#define FN_LAMBDA610	((void*)startLabel+836)
#define CT_v648	((void*)startLabel+880)
#define F0_LAMBDA610	((void*)startLabel+888)
#define FN_LAMBDA609	((void*)startLabel+912)
#define v649	((void*)startLabel+953)
#define CT_v651	((void*)startLabel+980)
#define F0_LAMBDA609	((void*)startLabel+988)
#define FN_LAMBDA608	((void*)startLabel+1020)
#define CT_v652	((void*)startLabel+1044)
#define F0_LAMBDA608	((void*)startLabel+1052)
#define FN_LAMBDA607	((void*)startLabel+1068)
#define CT_v653	((void*)startLabel+1092)
#define F0_LAMBDA607	((void*)startLabel+1100)
extern Node CF_GcodeLow_46profstatic[];
extern Node FN_IntState_46miIS[];
extern Node FN_Prelude_46Enum_46Id_46Id_46fromEnum[];
extern Node CF_GcodeLow_46profmodule[];
extern Node CF_GcodeLow_46profproducer[];
extern Node CF_GcodeLow_46profconstructor[];
extern Node FN_Prelude_46Enum_46Id_46Id_46toEnum[];
extern Node FN_IntState_46strIS[];
extern Node FN_IntState_46lookupIS[];
extern Node FN_Prelude_46_46[];
extern Node F0_Maybe_46fromJust[];
extern Node FN_NHC_46Internal_46_95apply1[];
extern Node FN_Info_46expI[];
extern Node FN_Prelude_46zip[];
extern Node FN_Info_46constrsI[];
extern Node FN_Prelude_46Enum_46Prelude_46Int_46enumFrom[];
extern Node FN_NHC_46Internal_46_95apply2[];
extern Node FN_Prelude_46map[];
extern Node FN_Prelude_46_43_43[];
extern Node CF_GcodeLow_46con0[];
extern Node FN_IntState_46arityIS[];
extern Node FN_Prelude_46Eq_46Prelude_46Int_46_61_61[];
extern Node FN_Prelude_46elem[];
extern Node CF_Prelude_46Eq_46Info_46IE[];

static Node startLabel[] = {
  bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v621)
,};
Node FN_GcodeSpec_46fixProfstatic[] = {
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,UNPACK)
, bytes2word(2,PUSH_P1,0,ZAP_STACK_P1)
, bytes2word(1,EVAL,NEEDHEAP_I32,UNPACK)
, bytes2word(2,HEAP_CVAL_N1,1,HEAP_CVAL_I3)
, bytes2word(HEAP_P1,3,HEAP_CVAL_I4,HEAP_ARG)
, bytes2word(1,HEAP_CVAL_I5,HEAP_OFF_N1,3)
, bytes2word(HEAP_CVAL_N1,2,HEAP_CVAL_P1,6)
, bytes2word(HEAP_OFF_N1,4,HEAP_CVAL_N1,2)
, bytes2word(HEAP_CVAL_P1,7,HEAP_P1,0)
, bytes2word(HEAP_CVAL_N1,2,HEAP_CVAL_P1,8)
, bytes2word(HEAP_I1,HEAP_CVAL_IN3,HEAP_CVAL_N1,4)
, bytes2word(HEAP_OFF_N1,5,HEAP_OFF_N1,3)
, bytes2word(HEAP_CVAL_N1,4,HEAP_OFF_N1,11)
, bytes2word(HEAP_OFF_N1,5,HEAP_CVAL_N1,4)
, bytes2word(HEAP_OFF_N1,17,HEAP_OFF_N1,5)
, bytes2word(PUSH_HEAP,HEAP_CVAL_N1,4,HEAP_OFF_N1)
, bytes2word(27,HEAP_OFF_N1,5,RETURN)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, CONSTR(1,2,0)
, CONSTR(0,0,0)
, CONSTR(72,2,0)
, CONSTR(4,2,0)
,	/* CT_v621: (byte 0) */
  HW(6,2)
, 0
,};
Node F0_GcodeSpec_46fixProfstatic[] = {
  CAPTAG(useLabel(FN_GcodeSpec_46fixProfstatic),2)
, useLabel(CF_GcodeLow_46profstatic)
, VAPTAG(useLabel(FN_IntState_46miIS))
, VAPTAG(useLabel(FN_Prelude_46Enum_46Id_46Id_46fromEnum))
, useLabel(CF_GcodeLow_46profmodule)
, useLabel(CF_GcodeLow_46profproducer)
, useLabel(CF_GcodeLow_46profconstructor)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v625)
,	/* FN_GcodeSpec_46createProfs: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_P1)
, bytes2word(51,UNPACK,3,HEAP_CVAL_N1)
, bytes2word(1,HEAP_CVAL_I3,HEAP_I1,HEAP_CVAL_N1)
, bytes2word(1,HEAP_CVAL_I4,HEAP_I1,HEAP_CVAL_I5)
, bytes2word(HEAP_I1,HEAP_CVAL_P1,6,HEAP_ARG)
, bytes2word(1,HEAP_OFF_N1,4,HEAP_CVAL_N1)
, bytes2word(2,HEAP_OFF_N1,4,HEAP_CVAL_IN3)
, bytes2word(HEAP_CVAL_N1,4,HEAP_CVAL_P1,7)
, bytes2word(HEAP_I1,HEAP_CVAL_N1,5,HEAP_CVAL_I3)
, bytes2word(HEAP_I1,HEAP_CVAL_N1,5,HEAP_CVAL_I3)
, bytes2word(HEAP_I1,HEAP_CVAL_N1,5,HEAP_CVAL_I4)
, bytes2word(HEAP_I1,HEAP_CVAL_N1,6,HEAP_CVAL_N1)
, bytes2word(7,HEAP_OFF_N1,5,HEAP_OFF_N1)
, bytes2word(3,HEAP_CVAL_N1,7,HEAP_OFF_N1)
, bytes2word(11,HEAP_OFF_N1,5,HEAP_CVAL_N1)
, bytes2word(7,HEAP_OFF_N1,17,HEAP_OFF_N1)
, bytes2word(5,HEAP_CVAL_N1,7,HEAP_OFF_N1)
, bytes2word(23,HEAP_OFF_N1,5,HEAP_CVAL_N1)
, bytes2word(7,HEAP_OFF_N1,27,HEAP_OFF_N1)
, bytes2word(5,HEAP_CVAL_N1,7,HEAP_OFF_N1)
, bytes2word(32,HEAP_OFF_N1,5,HEAP_CVAL_N1)
, bytes2word(7,HEAP_OFF_N1,43,HEAP_OFF_N1)
, bytes2word(5,PUSH_HEAP,HEAP_CVAL_N1,7)
, bytes2word(HEAP_OFF_N1,49,HEAP_OFF_N1,5)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(1,2,0)
, CONSTR(0,0,0)
, CONSTR(72,2,0)
, CONSTR(4,2,0)
, CONSTR(60,0,0)
, CONSTR(66,1,0)
, CONSTR(5,2,0)
,	/* CT_v625: (byte 0) */
  HW(5,2)
, 0
,	/* F0_GcodeSpec_46createProfs: (byte 0) */
  CAPTAG(useLabel(FN_GcodeSpec_46createProfs),2)
, useLabel(CF_GcodeLow_46profproducer)
, useLabel(CF_GcodeLow_46profconstructor)
, VAPTAG(useLabel(FN_Prelude_46Enum_46Id_46Id_46toEnum))
, VAPTAG(useLabel(FN_IntState_46strIS))
, useLabel(CF_GcodeLow_46profstatic)
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v630)
,};
Node FN_GcodeSpec_46compilerProfstatic[] = {
  bytes2word(ZAP_ARG_I2,NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL)
, bytes2word(NEEDHEAP_I32,TABLESWITCH,2,NOP)
,	/* v627: (byte 4) */
  bytes2word(TOP(4),BOT(4),TOP(9),BOT(9))
, bytes2word(POP_I1,PUSH_HEAP,HEAP_CVAL_N1,1)
,	/* v628: (byte 1) */
  bytes2word(RETURN,POP_I1,HEAP_CVAL_N1,2)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,3,HEAP_CVAL_IN3)
, bytes2word(HEAP_CVAL_N1,4,HEAP_INT_P1,0)
, bytes2word(HEAP_CVAL_N1,4,HEAP_INT_P1,0)
, bytes2word(HEAP_CVAL_N1,1,HEAP_CVAL_N1,5)
, bytes2word(HEAP_OFF_N1,4,HEAP_OFF_N1,3)
, bytes2word(HEAP_CVAL_N1,5,HEAP_OFF_N1,9)
, bytes2word(HEAP_OFF_N1,5,HEAP_CVAL_N1,5)
, bytes2word(HEAP_OFF_N1,13,HEAP_OFF_N1,5)
, bytes2word(PUSH_HEAP,HEAP_CVAL_N1,5,HEAP_OFF_N1)
, bytes2word(19,HEAP_OFF_N1,5,RETURN)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(1,2,0)
, CONSTR(65,1,0)
, CONSTR(62,0,0)
, CONSTR(72,2,0)
, CONSTR(0,0,0)
,	/* CT_v630: (byte 0) */
  HW(1,3)
, 0
,};
Node F0_GcodeSpec_46compilerProfstatic[] = {
  CAPTAG(useLabel(FN_GcodeSpec_46compilerProfstatic),3)
, useLabel(CF_GcodeLow_46profstatic)
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v635)
,};
Node FN_GcodeSpec_46gcodeZCon[] = {
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I3,EVAL,NEEDHEAP_P1)
, bytes2word(47,TABLESWITCH,2,NOP)
,	/* v632: (byte 4) */
  bytes2word(TOP(4),BOT(4),TOP(9),BOT(9))
, bytes2word(POP_I1,PUSH_HEAP,HEAP_CVAL_N1,1)
,	/* v633: (byte 1) */
  bytes2word(RETURN,UNPACK,2,HEAP_CVAL_I3)
, bytes2word(HEAP_ARG,2,HEAP_CVAL_I4,HEAP_CVAL_I5)
, bytes2word(HEAP_OFF_N1,4,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(6,HEAP_OFF_N1,4,HEAP_I1)
, bytes2word(HEAP_CVAL_P1,7,HEAP_P1,0)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,8,HEAP_OFF_N1)
, bytes2word(3,HEAP_CVAL_P1,9,HEAP_ARG)
, bytes2word(2,HEAP_CVAL_P1,10,HEAP_CVAL_P1)
, bytes2word(11,HEAP_I1,HEAP_CVAL_P1,12)
, bytes2word(HEAP_INT_P1,0,HEAP_CVAL_P1,13)
, bytes2word(HEAP_OFF_N1,6,HEAP_OFF_N1,6)
, bytes2word(HEAP_OFF_N1,5,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(14,HEAP_OFF_N1,12,HEAP_OFF_N1)
, bytes2word(6,HEAP_CVAL_P1,15,HEAP_I1)
, bytes2word(HEAP_ARG_ARG,1,2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,14,HEAP_OFF_N1,5)
, bytes2word(HEAP_I1,HEAP_CVAL_P1,16,HEAP_ARG_ARG)
, bytes2word(1,2,HEAP_I1,HEAP_CVAL_P1)
, bytes2word(17,HEAP_ARG_ARG,1,2)
, bytes2word(HEAP_P1,5,HEAP_CVAL_P1,18)
, bytes2word(HEAP_OFF_N1,9,HEAP_OFF_N1,6)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,18,HEAP_I1)
, bytes2word(HEAP_OFF_N1,5,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,0,0)
,	/* CT_v635: (byte 0) */
  HW(16,3)
, 0
,};
Node F0_GcodeSpec_46gcodeZCon[] = {
  CAPTAG(useLabel(FN_GcodeSpec_46gcodeZCon),3)
, CAPTAG(useLabel(FN_IntState_46lookupIS),1)
, VAPTAG(useLabel(FN_Prelude_46_46))
, useLabel(F0_Maybe_46fromJust)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Info_46expI))
, VAPTAG(useLabel(FN_LAMBDA609))
, CAPTAG(useLabel(FN_LAMBDA610),1)
, VAPTAG(useLabel(FN_Prelude_46zip))
, VAPTAG(useLabel(FN_Info_46constrsI))
, VAPTAG(useLabel(FN_Prelude_46Enum_46Prelude_46Int_46enumFrom))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, VAPTAG(useLabel(FN_Prelude_46map))
, CAPTAG(useLabel(FN_LAMBDA611),1)
, VAPTAG(useLabel(FN_LAMBDA612))
, VAPTAG(useLabel(FN_GcodeSpec_46gcodeZCon))
, VAPTAG(useLabel(FN_Prelude_46_43_43))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v638)
,	/* FN_LAMBDA612: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I1,EVAL,NEEDHEAP_I32)
, bytes2word(JUMPFALSE,12,0,HEAP_CVAL_I3)
, bytes2word(HEAP_ARG,2,PUSH_HEAP,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,3,HEAP_ARG,3)
,	/* v636: (byte 1) */
  bytes2word(RETURN_EVAL,PUSH_HEAP,HEAP_CVAL_N1,1)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,0,0)
,	/* CT_v638: (byte 0) */
  HW(2,3)
, 0
,	/* F0_LAMBDA612: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA612),3)
, CAPTAG(useLabel(FN_GcodeSpec_46createProfs),1)
, VAPTAG(useLabel(FN_Prelude_46map))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v644)
,	/* FN_LAMBDA611: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG,4,EVAL)
, bytes2word(UNPACK,3,PUSH_P1,0)
, bytes2word(EVAL,NEEDHEAP_I32,JUMPFALSE,31)
, bytes2word(0,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I4,HEAP_I1,HEAP_CVAL_N1,1)
, bytes2word(HEAP_INT_P1,0,HEAP_I2,HEAP_CVAL_I5)
, bytes2word(HEAP_ARG_ARG,2,3,HEAP_I1)
, bytes2word(HEAP_CVAL_N1,2,HEAP_OFF_N1,8)
, bytes2word(HEAP_OFF_N1,6,PUSH_HEAP,HEAP_CVAL_N1)
, bytes2word(2,HEAP_OFF_N1,15,HEAP_OFF_N1)
,	/* v641: (byte 2) */
  bytes2word(5,RETURN,PUSH_HEAP,HEAP_CVAL_IN3)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,0,0)
, CONSTR(1,2,0)
, CONSTR(75,2,0)
,	/* CT_v644: (byte 0) */
  HW(3,4)
, 0
,	/* F0_LAMBDA611: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA611),4)
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, useLabel(CF_GcodeLow_46con0)
, VAPTAG(useLabel(FN_GcodeSpec_46compilerProfstatic))
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v648)
,	/* FN_LAMBDA610: (byte 0) */
  bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_I32)
, bytes2word(UNPACK,2,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,HEAP_P1,0,HEAP_CVAL_I4)
, bytes2word(HEAP_INT_P1,0,HEAP_OFF_N1,5)
, bytes2word(HEAP_CVAL_I5,HEAP_P1,0,PUSH_HEAP)
, bytes2word(HEAP_CVAL_N1,1,HEAP_OFF_N1,6)
, bytes2word(HEAP_OFF_N1,4,HEAP_I2,RETURN)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(0,3,0)
,	/* CT_v648: (byte 0) */
  HW(3,2)
, 0
,	/* F0_LAMBDA610: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA610),2)
, VAPTAG(useLabel(FN_IntState_46arityIS))
, VAPTAG(useLabel(FN_Prelude_46Eq_46Prelude_46Int_46_61_61))
, VAPTAG(useLabel(FN_Prelude_46Enum_46Id_46Id_46fromEnum))
, bytes2word(1,0,0,1)
, useLabel(CT_v651)
,	/* FN_LAMBDA609: (byte 0) */
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_N1,1,HEAP_CVAL_N1)
, bytes2word(2,HEAP_CVAL_IN3,HEAP_CVAL_N1,4)
, bytes2word(HEAP_OFF_N1,3,HEAP_OFF_N1,3)
, bytes2word(PUSH_HEAP,HEAP_CVAL_N1,4,HEAP_OFF_N1)
, bytes2word(7,HEAP_OFF_N1,5,PUSH_P1)
, bytes2word(0,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(HEAP_ARG,1,ZAP_ARG_I1,EVAL)
, bytes2word(NEEDHEAP_I32,APPLY,1,SLIDE_P1)
, bytes2word(1,EVAL,NEEDHEAP_I32,JUMPFALSE)
, bytes2word(5,0,PUSH_HEAP,HEAP_CVAL_I5)
,	/* v649: (byte 1) */
  bytes2word(RETURN,PUSH_HEAP,HEAP_CVAL_P1,6)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTR(1,2,0)
, CONSTR(0,0,0)
, CONSTR(2,0,0)
, CONSTR(4,0,0)
,	/* CT_v651: (byte 0) */
  HW(4,1)
, 0
,	/* F0_LAMBDA609: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA609),1)
, VAPTAG(useLabel(FN_Prelude_46elem))
, useLabel(CF_Prelude_46Eq_46Info_46IE)
, CAPTAG(useLabel(FN_LAMBDA607),2)
, CAPTAG(useLabel(FN_LAMBDA608),2)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v652)
,	/* FN_LAMBDA608: (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(4,2,0)
,	/* CT_v652: (byte 0) */
  HW(0,2)
, 0
,	/* F0_LAMBDA608: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA608),2)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v653)
,	/* FN_LAMBDA607: (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(5,2,0)
,	/* CT_v653: (byte 0) */
  HW(0,2)
, 0
,	/* F0_LAMBDA607: (byte 0) */
  CAPTAG(useLabel(FN_LAMBDA607),2)
,};

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