コード例 #1
0
ファイル: DigitToInt.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v209)
, 0
, 0
, 0
, 0
, 70001
, useLabel(ST_v208)
,	/* CT_v219: (byte 0) */
  HW(11,1)
, 0
,};
Node F0_Char_46digitToInt[] = {
  CAPTAG(useLabel(FN_Char_46digitToInt),1)
, useLabel(PS_v207)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Char_46isDigit))
, VAPTAG(useLabel(FN_Char_46ord))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_62_61))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_60_61))
, VAPTAG(useLabel(FN_Prelude_46_38_38))
, useLabel(CF_Prelude_46otherwise)
, VAPTAG(useLabel(FN_LAMBDA196))
, VAPTAG(useLabel(FN_Prelude_46error))
, VAPTAG(useLabel(FN_LAMBDA197))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95patternMatchFail))
コード例 #2
0
ファイル: ForeignObj.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, CONSTR(0,0,0)
, 0
, 0
, 0
, 0
, 770001
, useLabel(ST_v235)
,	/* CT_v238: (byte 0) */
  HW(1,1)
, 0
,};
Node F0_NHC_46FFI_46touchForeignObj[] = {
  CAPTAG(useLabel(FN_NHC_46FFI_46touchForeignObj),1)
, useLabel(PS_v234)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46return))
, bytes2word(1,0,0,1)
, useLabel(CT_v241)
,};
Node FN_NHC_46FFI_46foreignObjToAddr[] = {
  bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PRIMITIVE)
, useLabel(FR_NHC_46FFI_46foreignObjToAddr)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 430001
, useLabel(ST_v240)
コード例 #3
0
ファイル: RenameDirectory.z.c プロジェクト: 8l/nhc98
, bytes2word(1,1,0,2)
, useLabel(CT_v235)
,	/* FN_Directory_46rename_35: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PUSH_ARG_I2)
, bytes2word(EVAL,POP_I1,PRIMITIVE,NOP)
, useLabel(FR_Directory_46rename_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v234)
,	/* CT_v235: (byte 0) */
  HW(0,2)
, 0
,	/* F0_Directory_46rename_35: (byte 0) */
  CAPTAG(useLabel(FN_Directory_46rename_35),2)
, bytes2word(0,0,0,0)
, useLabel(CT_v237)
,	/* FN_Directory_46rename: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v236)
,	/* CT_v237: (byte 0) */
  HW(2,0)
, 0
,	/* CF_Directory_46rename: (byte 0) */
  VAPTAG(useLabel(FN_Directory_46rename))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok2))
コード例 #4
0
ファイル: ToLower.z.c プロジェクト: 8l/nhc98
  bytes2word(6,HEAP_OFF_N1,4,RETURN_EVAL)
, bytes2word(PUSH_CVAL_P1,7,EVAL,NEEDHEAP_I32)
, bytes2word(JUMPFALSE,4,0,PUSH_ARG_I1)
,	/* v187: (byte 1) */
  bytes2word(RETURN_EVAL,HEAP_CVAL_P1,8,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,9,HEAP_OFF_N1,2)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v189)
,	/* CT_v190: (byte 0) */
  HW(7,1)
, 0
,};
Node F0_Char_46toLower[] = {
  CAPTAG(useLabel(FN_Char_46toLower),1)
, VAPTAG(useLabel(FN_Char_46isUpper))
, VAPTAG(useLabel(FN_Prelude_46Enum_46Prelude_46Char_46fromEnum))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Int_46_45))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Int_46_43))
, useLabel(CF_Prelude_46otherwise)
, VAPTAG(useLabel(FN_LAMBDA183))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95patternMatchFail))
, bytes2word(0,0,0,0)
, useLabel(CT_v193)
,	/* FN_LAMBDA183: (byte 0) */
  useLabel(TMSUB_Char)
, bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,4,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
コード例 #5
0
ファイル: IsLower.z.c プロジェクト: 8l/nhc98
, bytes2word(HEAP_CHAR_P1,223,HEAP_CVAL_I4,HEAP_ARG)
, bytes2word(1,HEAP_CHAR_P1,246,HEAP_CVAL_I5)
, bytes2word(HEAP_OFF_N1,7,HEAP_OFF_N1,5)
, bytes2word(HEAP_CVAL_I3,HEAP_ARG,1,HEAP_CHAR_P1)
, bytes2word(248,HEAP_CVAL_I4,HEAP_ARG,1)
, bytes2word(HEAP_CHAR_P1,255,HEAP_CVAL_I5,HEAP_OFF_N1)
, bytes2word(7,HEAP_OFF_N1,5,HEAP_CVAL_P1)
, bytes2word(6,HEAP_OFF_N1,13,HEAP_OFF_N1)
, bytes2word(5,PUSH_HEAP,HEAP_CVAL_P1,6)
, bytes2word(HEAP_OFF_N1,25,HEAP_OFF_N1,5)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 70001
, useLabel(ST_v177)
,	/* CT_v178: (byte 0) */
  HW(4,1)
, 0
,};
Node F0_Char_46isLower[] = {
  CAPTAG(useLabel(FN_Char_46isLower),1)
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_62_61))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_60_61))
, VAPTAG(useLabel(FN_Prelude_46_38_38))
, VAPTAG(useLabel(FN_Prelude_46_124_124))
,	/* ST_v177: (byte 0) */
  bytes2word(67,104,97,114)
, bytes2word(46,105,115,76)
, bytes2word(111,119,101,114)
, bytes2word(0,0,0,0)
,};
コード例 #6
0
ファイル: CError.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v310)
, 0
, 0
, 0
, 0
, 140001
, useLabel(ST_v309)
,	/* CT_v312: (byte 0) */
  HW(1,4)
, 0
,};
Node F0_NHC_46FFI_46mkIOError[] = {
  CAPTAG(useLabel(FN_NHC_46FFI_46mkIOError),4)
, useLabel(PS_v308)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46Enum_46NHC_46DErrNo_46ErrNo_46toEnum))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v317)
,};
Node FN_NHC_46FFI_46throwIOError[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_P1,7,HEAP_CVAL_N1)
, bytes2word(7,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_ARG_ARG,1,2,HEAP_ARG_ARG)
, bytes2word(3,4,PUSH_HEAP,HEAP_CVAL_P1)
コード例 #7
0
ファイル: IsOctDigit.z.c プロジェクト: 8l/nhc98
static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v169)
,};
Node FN_Char_46isOctDigit[] = {
  useLabel(TM_Char)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CHAR_P1,48,HEAP_CVAL_I4,HEAP_ARG)
, bytes2word(1,HEAP_CHAR_P1,55,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,7,HEAP_OFF_N1)
, bytes2word(5,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 40001
, useLabel(ST_v168)
,	/* CT_v169: (byte 0) */
  HW(3,1)
, 0
,};
Node F0_Char_46isOctDigit[] = {
  CAPTAG(useLabel(FN_Char_46isOctDigit),1)
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_62_61))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Char_46_60_61))
, VAPTAG(useLabel(FN_Prelude_46_38_38))
,	/* ST_v168: (byte 0) */
  bytes2word(67,104,97,114)
, bytes2word(46,105,115,79)
, bytes2word(99,116,68,105)
, bytes2word(103,105,116,0)
,};
コード例 #8
0
ファイル: Show_Complex.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v284)
, 0
, 0
, 0
, 0
, 90005
, useLabel(ST_v283)
,	/* CT_v295: (byte 0) */
  HW(11,2)
, 0
,};
Node F0_Prelude_46Show_46Complex_46Complex_46showsType[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46Complex_46Complex_46showsType),2)
, useLabel(PS_v282)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46showString))
, VAPTAG(useLabel(FN_LAMBDA275))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Prelude_46RealFloat_46Prelude_46RealFrac))
, VAPTAG(useLabel(FN_Prelude_46RealFrac_46Prelude_46Real))
, VAPTAG(useLabel(FN_Prelude_46Real_46Prelude_46Num))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Show))
, VAPTAG(useLabel(FN_Prelude_46showsType))
, CAPTAG(useLabel(FN_Complex_46realPart),1)
, VAPTAG(useLabel(FN_Prelude_46_46))
, VAPTAG(useLabel(FN_Prelude_46showChar))
コード例 #9
0
ファイル: ImagPart.z.c プロジェクト: 8l/nhc98
#define CT_v184	((void*)startLabel+40)
#define ST_v182	((void*)startLabel+52)
extern Node TM_Complex[];

static Node startLabel[] = {
  bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v184)
,};
Node FN_Complex_46imagPart[] = {
  useLabel(TM_Complex)
, bytes2word(ZAP_ARG_I1,NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL)
, bytes2word(UNPACK,2,PUSH_I1,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v182)
,	/* CT_v184: (byte 0) */
  HW(0,2)
, 0
,};
Node F0_Complex_46imagPart[] = {
  CAPTAG(useLabel(FN_Complex_46imagPart),2)
,	/* ST_v182: (byte 0) */
  bytes2word(67,111,109,112)
, bytes2word(108,101,120,46)
, bytes2word(105,109,97,103)
, bytes2word(80,97,114,116)
, bytes2word(0,0,0,0)
,};
コード例 #10
0
ファイル: ArrayFun.z.c プロジェクト: 8l/nhc98
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,14,HEAP_OFF_N1)
,	/* v264: (byte 2) */
  bytes2word(4,RETURN_EVAL,HEAP_CVAL_P1,15)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,10,HEAP_OFF_N1)
, bytes2word(2,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, CONSTR(0,1,0)
, CONSTR(0,0,0)
, 100001
, useLabel(ST_v266)
,	/* CT_v267: (byte 0) */
  HW(13,3)
, 0
,};
Node F0_Array_46array[] = {
  CAPTAG(useLabel(FN_Array_46array),3)
, CAPTAG(useLabel(FN_LAMBDA255),2)
, VAPTAG(useLabel(FN_Prelude_46_95foldr))
, VAPTAG(useLabel(FN_Prelude_46and))
, VAPTAG(useLabel(FN_Array_46primNewVectorC))
, VAPTAG(useLabel(FN_Ix_46rangeSize))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_LAMBDA256))
, VAPTAG(useLabel(FN_Prelude_46error))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, CAPTAG(useLabel(FN_LAMBDA258),1)
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46_62_62_61))
, VAPTAG(useLabel(FN_NHC_46Internal_46unsafePerformIO))
, VAPTAG(useLabel(FN_LAMBDA259))
, bytes2word(0,0,0,0)
, useLabel(CT_v270)
コード例 #11
0
ファイル: Show_Array.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v392)
, 0
, 0
, 0
, 0
, 170005
, useLabel(ST_v391)
,	/* CT_v400: (byte 0) */
  HW(10,4)
, 0
,};
Node F0_Prelude_46Show_46Array_46Array_46showsType[] = {
  CAPTAG(useLabel(FN_Prelude_46Show_46Array_46Array_46showsType),4)
, useLabel(PS_v390)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46showString))
, VAPTAG(useLabel(FN_LAMBDA383))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Prelude_46showsType))
, CAPTAG(useLabel(FN_Array_46bounds),1)
, VAPTAG(useLabel(FN_Prelude_46_46))
, useLabel(F0_Prelude_46fst)
, VAPTAG(useLabel(FN_Prelude_46showChar))
, CAPTAG(useLabel(FN_Array_46elems),1)
, useLabel(F0_Prelude_46head)
, bytes2word(0,0,0,0)
コード例 #12
0
ファイル: Functor.z.c プロジェクト: 8l/nhc98
  bytes2word(1,0,0,1)
, useLabel(CT_v197)
,};
Node FN_Data_46Functor_46_60_36_62[] = {
  useLabel(TM_Data_46Functor)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG)
, bytes2word(1,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 320002
, useLabel(ST_v196)
,	/* CT_v197: (byte 0) */
  HW(1,1)
, 0
,};
Node F0_Data_46Functor_46_60_36_62[] = {
  CAPTAG(useLabel(FN_Data_46Functor_46_60_36_62),1)
, VAPTAG(useLabel(FN_Prelude_46fmap))
, bytes2word(1,0,0,1)
, useLabel(CT_v199)
,};
Node FN_Data_46Functor_46_60_36[] = {
  useLabel(TM_Data_46Functor)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1,3)
, bytes2word(HEAP_CVAL_I5,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 250002
, useLabel(ST_v198)
,	/* CT_v199: (byte 0) */
  HW(3,1)
, 0
コード例 #13
0
ファイル: IsPrint.z.c プロジェクト: 8l/nhc98
extern Node TM_Char[];
extern Node FN_Char_46isControl[];
extern Node FN_Prelude_46not[];

static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v169)
,};
Node FN_Char_46isPrint[] = {
  useLabel(TM_Char)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_OFF_N1,3)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v168)
,	/* CT_v169: (byte 0) */
  HW(2,1)
, 0
,};
Node F0_Char_46isPrint[] = {
  CAPTAG(useLabel(FN_Char_46isPrint),1)
, VAPTAG(useLabel(FN_Char_46isControl))
, VAPTAG(useLabel(FN_Prelude_46not))
,	/* ST_v168: (byte 0) */
  bytes2word(67,104,97,114)
, bytes2word(46,105,115,80)
, bytes2word(114,105,110,116)
, bytes2word(0,0,0,0)
,};
コード例 #14
0
ファイル: SeekBin.z.c プロジェクト: 8l/nhc98
, bytes2word(1,1,0,2)
, useLabel(CT_v211)
,	/* FN_NHC_46Binary_46hs_95seekBin_35: (byte 0) */
  useLabel(TM_NHC_46Binary)
, bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PUSH_ARG_I2)
, bytes2word(EVAL,POP_I1,PRIMITIVE,NOP)
, useLabel(FR_NHC_46Binary_46hs_95seekBin_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 110001
, useLabel(ST_v210)
,	/* CT_v211: (byte 0) */
  HW(0,2)
, 0
,	/* F0_NHC_46Binary_46hs_95seekBin_35: (byte 0) */
  CAPTAG(useLabel(FN_NHC_46Binary_46hs_95seekBin_35),2)
, bytes2word(0,0,0,0)
, useLabel(CT_v213)
,	/* FN_NHC_46Binary_46hs_95seekBin: (byte 0) */
  useLabel(TM_NHC_46Binary)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 110001
, useLabel(ST_v212)
,	/* CT_v213: (byte 0) */
  HW(2,0)
, 0
,	/* CF_NHC_46Binary_46hs_95seekBin: (byte 0) */
  VAPTAG(useLabel(FN_NHC_46Binary_46hs_95seekBin))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok2))
コード例 #15
0
ファイル: GetBits.p.c プロジェクト: 8l/nhc98
  bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v198)
,	/* FN_NHC_46Binary_46hs_95getBits_35: (byte 0) */
  bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PUSH_ARG_I2)
, bytes2word(EVAL,POP_I1,PRIMITIVE,NOP)
, useLabel(FR_NHC_46Binary_46hs_95getBits_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 90001
, useLabel(ST_v197)
,	/* CT_v198: (byte 0) */
  HW(0,2)
, 0
,	/* F0_NHC_46Binary_46hs_95getBits_35: (byte 0) */
  CAPTAG(useLabel(FN_NHC_46Binary_46hs_95getBits_35),2)
, useLabel(PS_v196)
, 0
, 0
, 0
, bytes2word(0,0,0,0)
, useLabel(CT_v202)
,	/* FN_NHC_46Binary_46hs_95getBits: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_P1,7)
, bytes2word(HEAP_CVAL_N1,7,HEAP_CREATE,HEAP_SPACE)
, bytes2word(HEAP_SPACE,HEAP_CVAL_P1,8,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, useLabel(PS_v201)
, 0
コード例 #16
0
ファイル: OpenBin.z.c プロジェクト: 8l/nhc98
, useLabel(CT_v252)
,	/* FN_NHC_46Binary_46hs_95openBin_35: (byte 0) */
  useLabel(TM_NHC_46Binary)
, bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PUSH_ARG_I2)
, bytes2word(EVAL,POP_I1,PUSH_ARG_I3,EVAL)
, bytes2word(POP_I1,PRIMITIVE,NOP,NOP)
, useLabel(FR_NHC_46Binary_46hs_95openBin_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 110001
, useLabel(ST_v251)
,	/* CT_v252: (byte 0) */
  HW(0,3)
, 0
,	/* F0_NHC_46Binary_46hs_95openBin_35: (byte 0) */
  CAPTAG(useLabel(FN_NHC_46Binary_46hs_95openBin_35),3)
, bytes2word(0,0,0,0)
, useLabel(CT_v254)
,	/* FN_NHC_46Binary_46hs_95openBin: (byte 0) */
  useLabel(TM_NHC_46Binary)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 110001
, useLabel(ST_v253)
,	/* CT_v254: (byte 0) */
  HW(2,0)
, 0
,	/* CF_NHC_46Binary_46hs_95openBin: (byte 0) */
  VAPTAG(useLabel(FN_NHC_46Binary_46hs_95openBin))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok3))
コード例 #17
0
ファイル: Magnitude.z.c プロジェクト: 8l/nhc98
, bytes2word(8,ZAP_STACK_P1,7,ZAP_STACK_P1)
, bytes2word(6,ZAP_STACK_P1,5,ZAP_STACK_P1)
, bytes2word(4,ZAP_STACK_P1,3,EVAL)
, bytes2word(NEEDHEAP_I32,APPLY,2,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, 2
, 60001
, useLabel(ST_v231)
,	/* CT_v233: (byte 0) */
  HW(16,2)
, 0
,};
Node F0_Complex_46magnitude[] = {
  CAPTAG(useLabel(FN_Complex_46magnitude),2)
, useLabel(CF_Prelude_46Integral_46Prelude_46Integer)
, VAPTAG(useLabel(FN_Prelude_46exponent))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46Int_46max))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Int_46negate))
, VAPTAG(useLabel(FN_Prelude_46RealFloat_46Prelude_46Floating))
, VAPTAG(useLabel(FN_Prelude_46sqrt))
, VAPTAG(useLabel(FN_Prelude_46RealFloat_46Prelude_46RealFrac))
, VAPTAG(useLabel(FN_Prelude_46RealFrac_46Prelude_46Real))
, VAPTAG(useLabel(FN_Prelude_46Real_46Prelude_46Num))
, VAPTAG(useLabel(FN_Prelude_46_43))
, VAPTAG(useLabel(FN_Prelude_46scaleFloat))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, VAPTAG(useLabel(FN_Prelude_46Integral_46Prelude_46Real))
, VAPTAG(useLabel(FN_Prelude_46fromInteger))
コード例 #18
0
ファイル: Wrappers.z.c プロジェクト: 8l/nhc98
  bytes2word(JUMP,2,0,POP_P1)
,	/* v576: (byte 4) */
  bytes2word(2,JUMP,2,0)
, bytes2word(HEAP_CVAL_P1,6,PUSH_HEAP,HEAP_CVAL_I5)
, bytes2word(HEAP_OFF_N1,2,RETURN_EVAL,ENDCODE)
, bytes2word(0,0,0,0)
, CONSTR(0,4,0)
, CONSTR(0,2,0)
, 780001
, useLabel(ST_v589)
,	/* CT_v594: (byte 0) */
  HW(4,2)
, 0
,};
Node F0_Text_46XML_46HaXml_46Wrappers_46onContent[] = {
  CAPTAG(useLabel(FN_Text_46XML_46HaXml_46Wrappers_46onContent),2)
, useLabel(CF_Prelude_46undefined)
, VAPTAG(useLabel(FN_LAMBDA542))
, VAPTAG(useLabel(FN_Prelude_46error))
, VAPTAG(useLabel(FN_LAMBDA543))
, bytes2word(0,0,0,0)
, useLabel(CT_v597)
,	/* FN_LAMBDA543: (byte 0) */
  useLabel(TMSUB_Text_46XML_46HaXml_46Wrappers)
, bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,4,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, useLabel(ST_v596)
, 820029
, useLabel(ST_v595)
コード例 #19
0
ファイル: IORef.z.c プロジェクト: 8l/nhc98
  useLabel(TM_Data_46IORef)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG_ARG,2,1)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,6,HEAP_OFF_N1)
, bytes2word(5,PUSH_HEAP,HEAP_CVAL_P1,6)
, bytes2word(HEAP_CVAL_P1,7,HEAP_OFF_N1,5)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 880001
, useLabel(ST_v235)
,	/* CT_v236: (byte 0) */
  HW(5,2)
, 0
,};
Node F0_Data_46IORef_46atomicModifyIORef[] = {
  CAPTAG(useLabel(FN_Data_46IORef_46atomicModifyIORef),2)
, VAPTAG(useLabel(FN_NHC_46IOExtras_46readIORef))
, CAPTAG(useLabel(FN_LAMBDA233),1)
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46_62_62_61))
, VAPTAG(useLabel(FN_Prelude_46_36))
, useLabel(F0_NHC_46IOExtras_46excludeFinalisers)
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v238)
,	/* FN_LAMBDA233: (byte 0) */
  useLabel(TMSUB_Data_46IORef)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_ARG_ARG)
, bytes2word(1,3,PUSH_HEAP,HEAP_CVAL_I4)
, bytes2word(HEAP_OFF_N1,4,PUSH_HEAP,HEAP_CVAL_I5)
, bytes2word(HEAP_OFF_N1,6,HEAP_CVAL_P1,6)
, bytes2word(HEAP_ARG,2,HEAP_I1,HEAP_CVAL_P1)
コード例 #20
0
ファイル: GetPermissions.z.c プロジェクト: 8l/nhc98
static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v256)
,	/* FN_Directory_46hs_95getperms_35: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PRIMITIVE)
, useLabel(FR_Directory_46hs_95getperms_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 90001
, useLabel(ST_v255)
,	/* CT_v256: (byte 0) */
  HW(0,1)
, 0
,	/* F0_Directory_46hs_95getperms_35: (byte 0) */
  CAPTAG(useLabel(FN_Directory_46hs_95getperms_35),1)
, bytes2word(0,0,0,0)
, useLabel(CT_v258)
,	/* FN_Directory_46hs_95getperms: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 90001
, useLabel(ST_v257)
,	/* CT_v258: (byte 0) */
  HW(2,0)
, 0
,	/* CF_Directory_46hs_95getperms: (byte 0) */
  VAPTAG(useLabel(FN_Directory_46hs_95getperms))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok1))
コード例 #21
0
ファイル: IsAlphaNum.z.c プロジェクト: 8l/nhc98
extern Node FN_Prelude_46_124_124[];

static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v170)
,};
Node FN_Char_46isAlphaNum[] = {
  useLabel(TM_Char)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(HEAP_CVAL_I4,HEAP_ARG,1,PUSH_HEAP)
, bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,5,HEAP_OFF_N1)
, bytes2word(4,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 70001
, useLabel(ST_v169)
,	/* CT_v170: (byte 0) */
  HW(3,1)
, 0
,};
Node F0_Char_46isAlphaNum[] = {
  CAPTAG(useLabel(FN_Char_46isAlphaNum),1)
, VAPTAG(useLabel(FN_Char_46isAlpha))
, VAPTAG(useLabel(FN_Char_46isDigit))
, VAPTAG(useLabel(FN_Prelude_46_124_124))
,	/* ST_v169: (byte 0) */
  bytes2word(67,104,97,114)
, bytes2word(46,105,115,65)
, bytes2word(108,112,104,97)
, bytes2word(78,117,109,0)
,};
コード例 #22
0
ファイル: MarshalError.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, CONSTR(0,0,0)
, 0
, 0
, 0
, 0
, 560001
, useLabel(ST_v290)
,	/* CT_v294: (byte 0) */
  HW(2,1)
, 0
,};
Node F0_NHC_46FFI_46void[] = {
  CAPTAG(useLabel(FN_NHC_46FFI_46void),1)
, useLabel(PS_v289)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46return))
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46_62_62))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v299)
,};
Node FN_NHC_46FFI_46throwIf[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_P1,7,HEAP_CVAL_N1)
, bytes2word(7,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_ARG_ARG,1,2,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,8,HEAP_CVAL_N1,12)
コード例 #23
0
ファイル: RemoveFile.z.c プロジェクト: 8l/nhc98
static Node startLabel[] = {
  bytes2word(1,0,0,1)
, useLabel(CT_v227)
,	/* FN_Directory_46unlink_35: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PRIMITIVE)
, useLabel(FR_Directory_46unlink_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v226)
,	/* CT_v227: (byte 0) */
  HW(0,1)
, 0
,	/* F0_Directory_46unlink_35: (byte 0) */
  CAPTAG(useLabel(FN_Directory_46unlink_35),1)
, bytes2word(0,0,0,0)
, useLabel(CT_v229)
,	/* FN_Directory_46unlink: (byte 0) */
  useLabel(TM_Directory)
, bytes2word(NEEDHEAP_I32,PUSH_HEAP,HEAP_CVAL_I3,HEAP_CVAL_I4)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 60001
, useLabel(ST_v228)
,	/* CT_v229: (byte 0) */
  HW(2,0)
, 0
,	/* CF_Directory_46unlink: (byte 0) */
  VAPTAG(useLabel(FN_Directory_46unlink))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok1))
コード例 #24
0
ファイル: Cmd.z.c プロジェクト: 8l/nhc98
, bytes2word(1,HEAP_CVAL_P1,6,HEAP_OFF_N1)
, bytes2word(5,PUSH_HEAP,HEAP_CVAL_N1,5)
, bytes2word(HEAP_CHAR_P1,34,HEAP_OFF_N1,4)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 0
, CONSTR(1,2,0)
, CONSTR(0,2,0)
, CONSTR(1,0,0)
, 350001
, useLabel(ST_v235)
,	/* CT_v236: (byte 0) */
  HW(4,1)
, 0
,	/* F0_System_46Cmd_46translate: (byte 0) */
  CAPTAG(useLabel(FN_System_46Cmd_46translate),1)
, CAPTAG(useLabel(FN_System_46Cmd_46Prelude_46168_46escape),2)
, VAPTAG(useLabel(FN_LAMBDA233))
, VAPTAG(useLabel(FN_Prelude_46foldr))
, VAPTAG(useLabel(FN_Prelude_46snd))
, bytes2word(0,0,0,0)
, useLabel(CT_v239)
,	/* FN_LAMBDA233: (byte 0) */
  useLabel(TMSUB_System_46Cmd)
, bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,4,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, useLabel(ST_v238)
, 350047
, useLabel(ST_v237)
コード例 #25
0
ファイル: Ord_Array.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v396)
, 0
, 0
, 0
, 0
, 90005
, useLabel(ST_v395)
,	/* CT_v400: (byte 0) */
  HW(4,4)
, 0
,};
Node F0_Prelude_46Ord_46Array_46Array_46_60_61[] = {
  CAPTAG(useLabel(FN_Prelude_46Ord_46Array_46Array_46_60_61),4)
, useLabel(PS_v394)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Ix_46Ix_46Prelude_46Ord))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_462))
, VAPTAG(useLabel(FN_Array_46assocs))
, VAPTAG(useLabel(FN_Prelude_46Ord_46Prelude_46_91_93_46_60_61))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v405)
,};
Node FN_Prelude_46Ord_46Array_46Array_46min[] = {
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_P1,7,HEAP_CVAL_N1)
コード例 #26
0
ファイル: PackedString.z.c プロジェクト: Davorak/HaRe
, useLabel(CT_v332)
,};
Node FN_Data_46PackedString_46joinPS[] = {
  useLabel(TM_Data_46PackedString)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_ARG,1)
, bytes2word(PUSH_HEAP,HEAP_CVAL_I4,HEAP_CVAL_I5,HEAP_OFF_N1)
, bytes2word(4,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 4350001
, useLabel(ST_v331)
,	/* CT_v332: (byte 0) */
  HW(3,1)
, 0
,};
Node F0_Data_46PackedString_46joinPS[] = {
  CAPTAG(useLabel(FN_Data_46PackedString_46joinPS),1)
, CAPTAG(useLabel(FN_List_46intersperse),1)
, VAPTAG(useLabel(FN_Prelude_46_46))
, useLabel(CF_Data_46PackedString_46concatPS)
, bytes2word(1,0,0,1)
, useLabel(CT_v334)
,};
Node FN_Data_46PackedString_46splitWithPS[] = {
  useLabel(TM_Data_46PackedString)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_CVAL_I4,HEAP_CVAL_I5)
, bytes2word(HEAP_CVAL_IN3,HEAP_CVAL_P1,6,HEAP_OFF_N1)
, bytes2word(3,HEAP_ARG,1,HEAP_OFF_N1)
, bytes2word(4,HEAP_CVAL_P1,7,HEAP_OFF_N1)
, bytes2word(5,HEAP_CVAL_P1,8,PUSH_HEAP)
, bytes2word(HEAP_CVAL_P1,7,HEAP_OFF_N1,12)
, bytes2word(HEAP_OFF_N1,5,RETURN_EVAL,ENDCODE)
コード例 #27
0
ファイル: Eq_Complex.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v233)
, 0
, 0
, 0
, 0
, 60003
, useLabel(ST_v230)
,	/* CT_v240: (byte 0) */
  HW(7,3)
, 0
,};
Node F0_Prelude_46Eq_46Complex_46Complex_46_61_61[] = {
  CAPTAG(useLabel(FN_Prelude_46Eq_46Complex_46Complex_46_61_61),3)
, useLabel(PS_v229)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Prelude_46RealFloat_46Prelude_46RealFrac))
, VAPTAG(useLabel(FN_Prelude_46RealFrac_46Prelude_46Real))
, VAPTAG(useLabel(FN_Prelude_46Real_46Prelude_46Num))
, VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Eq))
, VAPTAG(useLabel(FN_Prelude_46_61_61))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95apply2))
, VAPTAG(useLabel(FN_Prelude_46_38_38))
, bytes2word(3,0,2,1)
, bytes2word(1,2,0,3)
, useLabel(CT_v245)
,};
コード例 #28
0
ファイル: CBinary.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v254)
, 0
, 0
, 0
, 0
, 0
, useLabel(ST_v253)
,	/* CT_v256: (byte 0) */
  HW(2,2)
, 0
,};
Node F0_NHC_46Binary_46_95_46sizeOf[] = {
  CAPTAG(useLabel(FN_NHC_46Binary_46_95_46sizeOf),2)
, useLabel(PS_v252)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_LAMBDA247))
, VAPTAG(useLabel(FN_NHC_46Internal_46_95noMethodError))
, bytes2word(0,0,0,0)
, useLabel(CT_v260)
,	/* FN_LAMBDA247: (byte 0) */
  bytes2word(NEEDHEAP_I32,PUSH_CADR_N1,8,STRING)
, bytes2word(RETURN,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, CONSTRW(1,0)
, 0
, 0
コード例 #29
0
ファイル: PutAtEnd.p.c プロジェクト: 8l/nhc98
, 0
, 0
, 0
, useLabel(PS_v204)
, 0
, 0
, 0
, 0
, 120001
, useLabel(ST_v203)
,	/* CT_v207: (byte 0) */
  HW(3,3)
, 0
,};
Node F0_NHC_46Binary_46putAtEnd[] = {
  CAPTAG(useLabel(FN_NHC_46Binary_46putAtEnd),3)
, useLabel(PS_v202)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_NHC_46Binary_46endBin))
, CAPTAG(useLabel(FN_LAMBDA200),1)
, VAPTAG(useLabel(FN_Prelude_46Monad_46NHC_46Internal_46IO_46_62_62_61))
, bytes2word(0,0,4,0)
, bytes2word(3,1,2,2)
, bytes2word(1,3,0,4)
, useLabel(CT_v214)
,	/* FN_LAMBDA200: (byte 0) */
  bytes2word(NEEDHEAP_I32,HEAP_CVAL_P1,7,HEAP_CVAL_N1)
, bytes2word(7,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_ARG_ARG,2,4,HEAP_CVAL_P1)
コード例 #30
0
ファイル: Version.z.c プロジェクト: Davorak/HaRe
, bytes2word(HEAP_OFF_N1,4,HEAP_CVAL_P1,10)
, bytes2word(HEAP_CHAR_P1,46,HEAP_CVAL_P1,11)
, bytes2word(HEAP_OFF_N1,6,HEAP_OFF_N1,4)
, bytes2word(HEAP_CVAL_P1,12,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(13,HEAP_OFF_N1,5,HEAP_OFF_N1)
, bytes2word(3,RETURN_EVAL,ENDCODE,0)
, bytes2word(0,0,0,0)
, 1500001
, useLabel(ST_v623)
,	/* CT_v624: (byte 0) */
  HW(11,0)
, 0
,};
Node CF_Data_46Version_46parseVersion[] = {
  VAPTAG(useLabel(FN_Data_46Version_46parseVersion))
, CAPTAG(useLabel(FN_Prelude_46read),1)
, useLabel(CF_Prelude_46Read_46Prelude_46Int)
, CAPTAG(useLabel(FN_Control_46Monad_46liftM),1)
, useLabel(CF_Prelude_46Monad_46Text_46ParserCombinators_46ReadP_46ReadPN)
, VAPTAG(useLabel(FN_Text_46ParserCombinators_46ReadP_46munch1))
, useLabel(F0_Char_46isDigit)
, VAPTAG(useLabel(FN_Prelude_46_36))
, VAPTAG(useLabel(FN_Text_46ParserCombinators_46ReadP_46char))
, VAPTAG(useLabel(FN_Text_46ParserCombinators_46ReadP_46sepBy1))
, CAPTAG(useLabel(FN_LAMBDA603),1)
, VAPTAG(useLabel(FN_Prelude_46Monad_46Text_46ParserCombinators_46ReadP_46ReadPN_46_62_62_61))
, bytes2word(1,0,0,1)
, useLabel(CT_v626)
,	/* FN_LAMBDA603: (byte 0) */
  useLabel(TMSUB_Data_46Version)
, bytes2word(NEEDHEAP_I32,HEAP_CVAL_I3,HEAP_CHAR_P1,45)