1 /* voc 2.1.0 [2019/11/01]. Bootstrapping compiler for address size 8, alignment 8. xrtspaSF */ 2 3 #ifndef Files__h 4 #define Files__h 5 6 #include "SYSTEM.h" 7 8 typedef 9 struct Files_FileDesc *Files_File; 10 11 typedef 12 struct Files_FileDesc { 13 INT32 _prvt0; 14 char _prvt1[568]; 15 } Files_FileDesc; 16 17 typedef 18 struct Files_Rider { 19 INT32 res; 20 BOOLEAN eof; 21 char _prvt0[15]; 22 } Files_Rider; 23 24 25 import INT16 Files_MaxPathLength, Files_MaxNameLength; 26 27 import ADDRESS *Files_FileDesc__typ; 28 import ADDRESS *Files_Rider__typ; 29 30 import Files_File Files_Base (Files_Rider *r, ADDRESS *r__typ); 31 import void Files_ChangeDirectory (CHAR *path, ADDRESS path__len, INT16 *res); 32 import void Files_Close (Files_File f); 33 import void Files_Delete (CHAR *name, ADDRESS name__len, INT16 *res); 34 import void Files_GetDate (Files_File f, INT32 *t, INT32 *d); 35 import void Files_GetName (Files_File f, CHAR *name, ADDRESS name__len); 36 import INT32 Files_Length (Files_File f); 37 import Files_File Files_New (CHAR *name, ADDRESS name__len); 38 import Files_File Files_Old (CHAR *name, ADDRESS name__len); 39 import INT32 Files_Pos (Files_Rider *r, ADDRESS *r__typ); 40 import void Files_Purge (Files_File f); 41 import void Files_Read (Files_Rider *r, ADDRESS *r__typ, SYSTEM_BYTE *x); 42 import void Files_ReadBool (Files_Rider *R, ADDRESS *R__typ, BOOLEAN *x); 43 import void Files_ReadBytes (Files_Rider *r, ADDRESS *r__typ, SYSTEM_BYTE *x, ADDRESS x__len, INT32 n); 44 import void Files_ReadInt (Files_Rider *R, ADDRESS *R__typ, INT16 *x); 45 import void Files_ReadLInt (Files_Rider *R, ADDRESS *R__typ, INT32 *x); 46 import void Files_ReadLReal (Files_Rider *R, ADDRESS *R__typ, LONGREAL *x); 47 import void Files_ReadLine (Files_Rider *R, ADDRESS *R__typ, CHAR *x, ADDRESS x__len); 48 import void Files_ReadNum (Files_Rider *R, ADDRESS *R__typ, SYSTEM_BYTE *x, ADDRESS x__len); 49 import void Files_ReadReal (Files_Rider *R, ADDRESS *R__typ, REAL *x); 50 import void Files_ReadSet (Files_Rider *R, ADDRESS *R__typ, UINT32 *x); 51 import void Files_ReadString (Files_Rider *R, ADDRESS *R__typ, CHAR *x, ADDRESS x__len); 52 import void Files_Register (Files_File f); 53 import void Files_Rename (CHAR *old, ADDRESS old__len, CHAR *new, ADDRESS new__len, INT16 *res); 54 import void Files_Set (Files_Rider *r, ADDRESS *r__typ, Files_File f, INT32 pos); 55 import void Files_SetSearchPath (CHAR *path, ADDRESS path__len); 56 import void Files_Write (Files_Rider *r, ADDRESS *r__typ, SYSTEM_BYTE x); 57 import void Files_WriteBool (Files_Rider *R, ADDRESS *R__typ, BOOLEAN x); 58 import void Files_WriteBytes (Files_Rider *r, ADDRESS *r__typ, SYSTEM_BYTE *x, ADDRESS x__len, INT32 n); 59 import void Files_WriteInt (Files_Rider *R, ADDRESS *R__typ, INT16 x); 60 import void Files_WriteLInt (Files_Rider *R, ADDRESS *R__typ, INT32 x); 61 import void Files_WriteLReal (Files_Rider *R, ADDRESS *R__typ, LONGREAL x); 62 import void Files_WriteNum (Files_Rider *R, ADDRESS *R__typ, INT64 x); 63 import void Files_WriteReal (Files_Rider *R, ADDRESS *R__typ, REAL x); 64 import void Files_WriteSet (Files_Rider *R, ADDRESS *R__typ, UINT32 x); 65 import void Files_WriteString (Files_Rider *R, ADDRESS *R__typ, CHAR *x, ADDRESS x__len); 66 import void *Files__init(void); 67 68 69 #endif // Files 70