#include "newmacros.h"
#include "runtime.h"
#define FN_Directory_46hs_95setperms_35 ((void*)startLabel+16)
#define CT_v257 ((void*)startLabel+56)
#define F0_Directory_46hs_95setperms_35 ((void*)startLabel+64)
#define FN_Directory_46hs_95setperms ((void*)startLabel+92)
#define CT_v261 ((void*)startLabel+144)
#define CF_Directory_46hs_95setperms ((void*)startLabel+152)
#define FN_Directory_46setperms ((void*)startLabel+192)
#define CT_v271 ((void*)startLabel+452)
#define F0_Directory_46setperms ((void*)startLabel+460)
#define FN_LAMBDA252 ((void*)startLabel+516)
#define CT_v274 ((void*)startLabel+536)
#define F0_LAMBDA252 ((void*)startLabel+544)
#define FN_LAMBDA251 ((void*)startLabel+572)
#define CT_v277 ((void*)startLabel+592)
#define F0_LAMBDA251 ((void*)startLabel+600)
#define FN_LAMBDA250 ((void*)startLabel+628)
#define CT_v280 ((void*)startLabel+648)
#define F0_LAMBDA250 ((void*)startLabel+656)
#define FN_LAMBDA249 ((void*)startLabel+684)
#define CT_v283 ((void*)startLabel+704)
#define F0_LAMBDA249 ((void*)startLabel+712)
#define CT_v289 ((void*)startLabel+856)
#define FN_LAMBDA253 ((void*)startLabel+904)
#define CT_v293 ((void*)startLabel+948)
#define CF_LAMBDA253 ((void*)startLabel+956)
#define PP_Directory_46hs_95setperms ((void*)startLabel+976)
#define PC_Directory_46hs_95setperms ((void*)startLabel+976)
#define ST_v259 ((void*)startLabel+976)
#define PP_Directory_46hs_95setperms_35 ((void*)startLabel+998)
#define PC_Directory_46hs_95setperms_35 ((void*)startLabel+998)
#define ST_v256 ((void*)startLabel+998)
#define ST_v285 ((void*)startLabel+1024)
#define PP_LAMBDA253 ((void*)startLabel+1049)
#define PC_LAMBDA253 ((void*)startLabel+1049)
#define ST_v291 ((void*)startLabel+1049)
#define PP_Directory_46setperms ((void*)startLabel+1086)
#define PC_Directory_46setperms ((void*)startLabel+1086)
#define ST_v263 ((void*)startLabel+1086)
#define PP_LAMBDA249 ((void*)startLabel+1105)
#define PC_LAMBDA249 ((void*)startLabel+1105)
#define ST_v282 ((void*)startLabel+1105)
#define PP_LAMBDA250 ((void*)startLabel+1130)
#define PC_LAMBDA250 ((void*)startLabel+1130)
#define ST_v279 ((void*)startLabel+1130)
#define PP_LAMBDA251 ((void*)startLabel+1155)
#define PC_LAMBDA251 ((void*)startLabel+1155)
#define ST_v276 ((void*)startLabel+1155)
#define PP_LAMBDA252 ((void*)startLabel+1180)
#define PC_LAMBDA252 ((void*)startLabel+1180)
#define ST_v273 ((void*)startLabel+1180)
#define ST_v292 ((void*)startLabel+1205)
#define PS_v260 ((void*)startLabel+1220)
#define PS_v258 ((void*)startLabel+1232)
#define PS_v269 ((void*)startLabel+1244)
#define PS_v264 ((void*)startLabel+1256)
#define PS_v270 ((void*)startLabel+1268)
#define PS_v262 ((void*)startLabel+1280)
#define PS_v265 ((void*)startLabel+1292)
#define PS_v266 ((void*)startLabel+1304)
#define PS_v267 ((void*)startLabel+1316)
#define PS_v268 ((void*)startLabel+1328)
#define PS_v288 ((void*)startLabel+1340)
#define PS_v287 ((void*)startLabel+1352)
#define PS_v284 ((void*)startLabel+1364)
#define PS_v286 ((void*)startLabel+1376)
#define PS_v255 ((void*)startLabel+1388)
#define PS_v281 ((void*)startLabel+1400)
#define PS_v278 ((void*)startLabel+1412)
#define PS_v275 ((void*)startLabel+1424)
#define PS_v272 ((void*)startLabel+1436)
#define PS_v290 ((void*)startLabel+1448)
void FR_Directory_46hs_95setperms_35(void);
extern Node FN_NHC_46Internal_46_95mkIOok5[];
extern Node FN_Directory_46fromPerm[];
extern Node FN_CString_46toCString[];
extern Node FN_Directory_46patchIOErrorF[];
extern Node PM_Directory[];
extern Node PC_NHC_46Internal_46_95mkIOok5[];
extern Node PC_CString_46toCString[];
extern Node PC_Directory_46fromPerm[];
extern Node PC_Directory_46patchIOErrorF[];
static Node startLabel[] = {
bytes2word(5,0,4,1)
, bytes2word(3,2,2,3)
, bytes2word(1,4,0,5)
, useLabel(CT_v257)
, /* FN_Directory_46hs_95setperms_35: (byte 0) */
bytes2word(PUSH_ARG_I1,EVAL,POP_I1,PUSH_ARG_I2)
, bytes2word(EVAL,POP_I1,PUSH_ARG_I3,EVAL)
, bytes2word(POP_I1,PUSH_ARG,4,EVAL)
, bytes2word(POP_I1,PUSH_ARG,5,EVAL)
, bytes2word(POP_I1,PRIMITIVE,NOP,NOP)
, useLabel(FR_Directory_46hs_95setperms_35)
, bytes2word(RETURN_EVAL,ENDCODE,0,0)
, bytes2word(0,0,0,0)
, 80001
, useLabel(ST_v256)
, /* CT_v257: (byte 0) */
HW(0,5)
, 0
, /* F0_Directory_46hs_95setperms_35: (byte 0) */
CAPTAG(useLabel(FN_Directory_46hs_95setperms_35),5)
, useLabel(PS_v255)
, 0
, 0
, 0
, bytes2word(0,0,0,0)
, useLabel(CT_v261)
, /* FN_Directory_46hs_95setperms: (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_v260)
, 0
, 0
, 0
, 0
, 80001
, useLabel(ST_v259)
, /* CT_v261: (byte 0) */
HW(2,0)
, 0
, /* CF_Directory_46hs_95setperms: (byte 0) */
VAPTAG(useLabel(FN_Directory_46hs_95setperms))
, useLabel(PS_v258)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_NHC_46Internal_46_95mkIOok5))
, useLabel(F0_Directory_46hs_95setperms_35)
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v271)
, /* FN_Directory_46setperms: (byte 0) */
bytes2word(NEEDHEAP_P1,53,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(7,HEAP_CVAL_N1,7,HEAP_CREATE)
, bytes2word(HEAP_SPACE,HEAP_SPACE,HEAP_ARG,1)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,8,HEAP_CVAL_N1)
, bytes2word(12,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_OFF_N1,11,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(9,HEAP_CVAL_N1,17,HEAP_CREATE)
, bytes2word(HEAP_SPACE,HEAP_SPACE,HEAP_OFF_N1,17)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,10,HEAP_CVAL_N1)
, bytes2word(22,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_OFF_N1,23,PUSH_HEAP,HEAP_CVAL_P1)
, bytes2word(11,HEAP_CVAL_N1,27,HEAP_CREATE)
, bytes2word(HEAP_SPACE,HEAP_SPACE,HEAP_OFF_N1,29)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,12,HEAP_CVAL_N1)
, bytes2word(32,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_ARG,2,PUSH_P1,0)
, bytes2word(PUSH_P1,2,PUSH_P1,4)
, bytes2word(PUSH_P1,6,PUSH_P1,8)
, bytes2word(PUSH_HEAP,HEAP_CVAL_P1,13,HEAP_CVAL_N1)
, bytes2word(37,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(ZAP_ARG_I1,ZAP_ARG_I2,ZAP_STACK_P1,11)
, bytes2word(ZAP_STACK_P1,10,ZAP_STACK_P1,9)
, bytes2word(ZAP_STACK_P1,8,ZAP_STACK_P1,7)
, bytes2word(ZAP_STACK_P1,6,EVAL,NEEDHEAP_P1)
, bytes2word(45,APPLY,5,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, useLabel(PS_v270)
, 0
, 0
, 0
, 0
, useLabel(PS_v269)
, 0
, 0
, 0
, 0
, useLabel(PS_v268)
, 0
, 0
, 0
, 0
, useLabel(PS_v267)
, 0
, 0
, 0
, 0
, useLabel(PS_v266)
, 0
, 0
, 0
, 0
, useLabel(PS_v265)
, 0
, 0
, 0
, 0
, useLabel(PS_v264)
, 0
, 0
, 0
, 0
, 110001
, useLabel(ST_v263)
, /* CT_v271: (byte 0) */
HW(7,2)
, 0
, /* F0_Directory_46setperms: (byte 0) */
CAPTAG(useLabel(FN_Directory_46setperms),2)
, useLabel(PS_v262)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_Directory_46fromPerm))
, VAPTAG(useLabel(FN_LAMBDA249))
, VAPTAG(useLabel(FN_LAMBDA250))
, VAPTAG(useLabel(FN_LAMBDA251))
, VAPTAG(useLabel(FN_LAMBDA252))
, VAPTAG(useLabel(FN_CString_46toCString))
, VAPTAG(useLabel(FN_Directory_46hs_95setperms))
, bytes2word(1,0,0,1)
, useLabel(CT_v274)
, /* FN_LAMBDA252: (byte 0) */
bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,4)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 120017
, useLabel(ST_v273)
, /* CT_v274: (byte 0) */
HW(0,1)
, 0
, /* F0_LAMBDA252: (byte 0) */
CAPTAG(useLabel(FN_LAMBDA252),1)
, useLabel(PS_v272)
, 0
, 0
, 0
, bytes2word(1,0,0,1)
, useLabel(CT_v277)
, /* FN_LAMBDA251: (byte 0) */
bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,3)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 120015
, useLabel(ST_v276)
, /* CT_v277: (byte 0) */
HW(0,1)
, 0
, /* F0_LAMBDA251: (byte 0) */
CAPTAG(useLabel(FN_LAMBDA251),1)
, useLabel(PS_v275)
, 0
, 0
, 0
, bytes2word(1,0,0,1)
, useLabel(CT_v280)
, /* FN_LAMBDA250: (byte 0) */
bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,2)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 120013
, useLabel(ST_v279)
, /* CT_v280: (byte 0) */
HW(0,1)
, 0
, /* F0_LAMBDA250: (byte 0) */
CAPTAG(useLabel(FN_LAMBDA250),1)
, useLabel(PS_v278)
, 0
, 0
, 0
, bytes2word(1,0,0,1)
, useLabel(CT_v283)
, /* FN_LAMBDA249: (byte 0) */
bytes2word(NEEDSTACK_I16,SELECTOR_EVAL,SELECT,1)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 120011
, useLabel(ST_v282)
, /* CT_v283: (byte 0) */
HW(0,1)
, 0
, /* F0_LAMBDA249: (byte 0) */
CAPTAG(useLabel(FN_LAMBDA249),1)
, useLabel(PS_v281)
, 0
, 0
, 0
, bytes2word(0,0,2,0)
, bytes2word(1,1,0,2)
, useLabel(CT_v289)
,};
Node FN_Directory_46setPermissions[] = {
bytes2word(NEEDHEAP_I32,HEAP_CVAL_P1,7,HEAP_CVAL_N1)
, bytes2word(7,HEAP_CREATE,HEAP_SPACE,HEAP_SPACE)
, bytes2word(HEAP_CVAL_P1,8,HEAP_CVAL_N1,12)
, bytes2word(HEAP_CREATE,HEAP_SPACE,HEAP_SPACE,HEAP_ARG)
, bytes2word(2,PUSH_HEAP,HEAP_CVAL_P1,9)
, bytes2word(HEAP_CVAL_N1,17,HEAP_CREATE,HEAP_SPACE)
, bytes2word(HEAP_SPACE,HEAP_OFF_N1,16,HEAP_ARG)
, bytes2word(1,HEAP_OFF_N1,13,RETURN_EVAL)
, bytes2word(ENDCODE,0,0,0)
, bytes2word(0,0,0,0)
, 0
, useLabel(PS_v288)
, 0
, 0
, 0
, 0
, useLabel(PS_v287)
, 0
, 0
, 0
, 0
, useLabel(PS_v286)
, 0
, 0
, 0
, 0
, 190001
, useLabel(ST_v285)
, /* CT_v289: (byte 0) */
HW(3,2)
, 0
,};
Node F0_Directory_46setPermissions[] = {
CAPTAG(useLabel(FN_Directory_46setPermissions),2)
, useLabel(PS_v284)
, 0
, 0
, 0
, VAPTAG(useLabel(FN_LAMBDA253))
, CAPTAG(useLabel(FN_Directory_46setperms),1)
, VAPTAG(useLabel(FN_Directory_46patchIOErrorF))
, bytes2word(0,0,0,0)
, useLabel(CT_v293)
, /* FN_LAMBDA253: (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
, 0
, 0
, useLabel(ST_v292)
, 190038
, useLabel(ST_v291)
, /* CT_v293: (byte 0) */
HW(0,0)
, 0
, /* CF_LAMBDA253: (byte 0) */
VAPTAG(useLabel(FN_LAMBDA253))
, useLabel(PS_v290)
, 0
, 0
, 0
, /* PP_Directory_46hs_95setperms: (byte 0) */
/* PC_Directory_46hs_95setperms: (byte 0) */
/* ST_v259: (byte 0) */
bytes2word(68,105,114,101)
, bytes2word(99,116,111,114)
, bytes2word(121,46,104,115)
, bytes2word(95,115,101,116)
, bytes2word(112,101,114,109)
, /* PP_Directory_46hs_95setperms_35: (byte 2) */
/* PC_Directory_46hs_95setperms_35: (byte 2) */
/* ST_v256: (byte 2) */
bytes2word(115,0,68,105)
, bytes2word(114,101,99,116)
, bytes2word(111,114,121,46)
, bytes2word(104,115,95,115)
, bytes2word(101,116,112,101)
, bytes2word(114,109,115,35)
, bytes2word(0,0,0,0)
,};
Node PP_Directory_46setPermissions[] = {
};
Node PC_Directory_46setPermissions[] = {
/* ST_v285: (byte 0) */
bytes2word(68,105,114,101)
, bytes2word(99,116,111,114)
, bytes2word(121,46,115,101)
, bytes2word(116,80,101,114)
, bytes2word(109,105,115,115)
, bytes2word(105,111,110,115)
, /* PP_LAMBDA253: (byte 1) */
/* PC_LAMBDA253: (byte 1) */
/* ST_v291: (byte 1) */
bytes2word(0,68,105,114)
, bytes2word(101,99,116,111)
, bytes2word(114,121,46,115)
, bytes2word(101,116,80,101)
, bytes2word(114,109,105,115)
, bytes2word(115,105,111,110)
, bytes2word(115,58,49,57)
, bytes2word(58,51,56,45)
, bytes2word(49,57,58,53)
, /* PP_Directory_46setperms: (byte 2) */
/* PC_Directory_46setperms: (byte 2) */
/* ST_v263: (byte 2) */
bytes2word(51,0,68,105)
, bytes2word(114,101,99,116)
, bytes2word(111,114,121,46)
, bytes2word(115,101,116,112)
, bytes2word(101,114,109,115)
, /* PP_LAMBDA249: (byte 1) */
/* PC_LAMBDA249: (byte 1) */
/* ST_v282: (byte 1) */
bytes2word(0,68,105,114)
, bytes2word(101,99,116,111)
, bytes2word(114,121,46,115)
, bytes2word(101,116,112,101)
, bytes2word(114,109,115,58)
, bytes2word(49,50,58,49)
, /* PP_LAMBDA250: (byte 2) */
/* PC_LAMBDA250: (byte 2) */
/* ST_v279: (byte 2) */
bytes2word(49,0,68,105)
, bytes2word(114,101,99,116)
, bytes2word(111,114,121,46)
, bytes2word(115,101,116,112)
, bytes2word(101,114,109,115)
, bytes2word(58,49,50,58)
, /* PP_LAMBDA251: (byte 3) */
/* PC_LAMBDA251: (byte 3) */
/* ST_v276: (byte 3) */
bytes2word(49,51,0,68)
, bytes2word(105,114,101,99)
, bytes2word(116,111,114,121)
, bytes2word(46,115,101,116)
, bytes2word(112,101,114,109)
, bytes2word(115,58,49,50)
, /* PP_LAMBDA252: (byte 4) */
/* PC_LAMBDA252: (byte 4) */
/* ST_v273: (byte 4) */
bytes2word(58,49,53,0)
, bytes2word(68,105,114,101)
, bytes2word(99,116,111,114)
, bytes2word(121,46,115,101)
, bytes2word(116,112,101,114)
, bytes2word(109,115,58,49)
, bytes2word(50,58,49,55)
, /* ST_v292: (byte 1) */
bytes2word(0,115,101,116)
, bytes2word(80,101,114,109)
, bytes2word(105,115,115,105)
, bytes2word(111,110,115,0)
, /* PS_v260: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46hs_95setperms)
, useLabel(PC_NHC_46Internal_46_95mkIOok5)
, /* PS_v258: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46hs_95setperms)
, useLabel(PC_Directory_46hs_95setperms)
, /* PS_v269: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_CString_46toCString)
, /* PS_v264: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_Directory_46fromPerm)
, /* PS_v270: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_Directory_46hs_95setperms)
, /* PS_v262: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_Directory_46setperms)
, /* PS_v265: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_LAMBDA249)
, /* PS_v266: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_LAMBDA250)
, /* PS_v267: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_LAMBDA251)
, /* PS_v268: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setperms)
, useLabel(PC_LAMBDA252)
, /* PS_v288: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setPermissions)
, useLabel(PC_Directory_46patchIOErrorF)
, /* PS_v287: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setPermissions)
, useLabel(PC_Directory_46setperms)
, /* PS_v284: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setPermissions)
, useLabel(PC_Directory_46setPermissions)
, /* PS_v286: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46setPermissions)
, useLabel(PC_LAMBDA253)
, /* PS_v255: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_Directory_46hs_95setperms_35)
, useLabel(PC_Directory_46hs_95setperms_35)
, /* PS_v281: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_LAMBDA249)
, useLabel(PC_LAMBDA249)
, /* PS_v278: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_LAMBDA250)
, useLabel(PC_LAMBDA250)
, /* PS_v275: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_LAMBDA251)
, useLabel(PC_LAMBDA251)
, /* PS_v272: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_LAMBDA252)
, useLabel(PC_LAMBDA252)
, /* PS_v290: (byte 0) */
useLabel(PM_Directory)
, useLabel(PP_LAMBDA253)
, useLabel(PC_LAMBDA253)
,};
#include <haskell2c.h>
#include <HsFFI.h>
/* foreign import ccall "hs_setperms" Directory.hs_setperms# 5 :: Prelude.Bool -> Prelude.Bool -> Prelude.Bool -> Prelude.Bool -> PackedString.PackedString -> Prelude.Int */
extern HsInt hs_setperms(HsBool,HsBool,HsBool,HsBool,char*);
#ifdef PROFILE
static SInfo pf_Directory_46hs_95setperms_35 = {"Directory","Directory.hs_setperms#","Prelude.Int"};
#endif
C_HEADER(FR_Directory_46hs_95setperms_35) {
NodePtr nodeptr;
HsInt result;
HsBool arg1;
HsBool arg2;
HsBool arg3;
HsBool arg4;
char* arg5;
nodeptr = C_GETARG1(1);
IND_REMOVE(nodeptr);
arg1 = (HsBool)GET_BOOL_VALUE(nodeptr);
nodeptr = C_GETARG1(2);
IND_REMOVE(nodeptr);
arg2 = (HsBool)GET_BOOL_VALUE(nodeptr);
nodeptr = C_GETARG1(3);
IND_REMOVE(nodeptr);
arg3 = (HsBool)GET_BOOL_VALUE(nodeptr);
nodeptr = C_GETARG1(4);
IND_REMOVE(nodeptr);
arg4 = (HsBool)GET_BOOL_VALUE(nodeptr);
nodeptr = C_GETARG1(5);
IND_REMOVE(nodeptr);
arg5 = (char*)nhc_getPackedString(nodeptr);
result = hs_setperms(arg1,arg2,arg3,arg4,arg5);
nodeptr = nhc_mkInt(result);
INIT_PROFINFO(nodeptr,&pf_Directory_46hs_95setperms_35);
C_RETURN(nodeptr);
}
|