paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 14:27:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed filesystem handling in libogc

Browse Source 
git-svn-id: trunk@28300 -
This commit is contained in:
Legolas 2014-08-02 15:34:58 +00:00
parent a52e51d0b7
commit c09d2e2096
2 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
packages/libogcfpc/src/fat.pp
View File

@ -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

2
packages/libogcfpc/src/ogc/usbgecko.inc
View File

@ -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}