* Fixed filesystem handling in libogc

git-svn-id: trunk@28300 -

packages/libogcfpc/src/fat.pp

@@ -19,6 +19,23 @@ function fatMount(name_: pcchar; interface_: PDISC_INTERFACE; startSector: sec_t
 procedure fatUnmount(name_: pcchar); cdecl; external;
 procedure fatGetVolumeLabel(name_, label_: pcchar); cdecl; external;
 
+// File attributes
+const
+  ATTR_ARCHIVE = $20;         // Archive
+  ATTR_DIRECTORY = $10;       // Directory
+  ATTR_VOLUME = $08;          // Volume
+  ATTR_SYSTEM = $04;          // System
+  ATTR_HIDDEN = $02;          // Hidden
+  ATTR_READONLY = $01;        // Read only
+
+(*
+Methods to modify DOS File Attributes
+*)
+function FAT_getAttr(const _file: pcchar): cint; cdecl; external;
+function FAT_setAttr(const _file: pcchar; attr: cint): cint; cdecl; external;
+
+
+
 implementation
 
 initialization

packages/libogcfpc/src/ogc/usbgecko.inc

@@ -26,7 +26,7 @@ function usb_sendbuffer_safe_ex(chn: cint32; buffer: pointer;
   
   
 function usb_flashread(chn: cint32; offset: cuint32; buffer: pointer; length: cint): cint; cdecl; external;
-function usb_flashwrite(chn: cint32; offset: cuint32; const buffer: pointer, length: cint): cint; cdecl; external;
+function usb_flashwrite(chn: cint32; offset: cuint32; const buffer: pointer; length: cint): cint; cdecl; external;
 function usb_flashverify(chn: cint32): cint; cdecl; external;
 
 {$ENDIF OGC_INTERFACE}