bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Ignore start address in cbm_opendir. Rearrange the code somewhat to make it

Browse Source 
shorter.


git-svn-id: svn://svn.cc65.org/cc65/trunk@4319 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-10-03 18:38:39 +00:00
parent 82c312bd72
commit a3529cd048
1 changed files with 12 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
libsrc/cbm/cbm_dir.c
View File

@@ -13,20 +13,21 @@
unsigned char __fastcall__ cbm_opendir (unsigned char lfn, unsigned char device) unsigned char __fastcall__ cbm_opendir (unsigned char lfn, unsigned
{ char device) {
unsigned char status; unsigned char status;
if ((status = cbm_open (lfn, device, CBM_READ, "$")) == 0) { if ((status = cbm_open (lfn, device, CBM_READ, "$")) == 0) {
if (cbm_k_chkin (lfn) == 0) { if (cbm_k_chkin (lfn) == 0) {
if (cbm_k_basin () == 0x01) { /* Start address */ /* Ignore start address */
if (cbm_k_basin () == 0x04) { cbm_k_basin();
cbm_k_clrch (); cbm_k_basin();
return 0; if (cbm_k_readst()) {
} cbm_close(lfn);
status = 2;
cbm_k_clrch();
} else { } else {
cbm_close (lfn); status = 0;
cbm_k_clrch (); cbm_k_clrch();
return 2;
} }
} }
} }
@@ -40,7 +41,7 @@ unsigned char __fastcall__ cbm_readdir (unsigned char lfn, register struct cbm_d
unsigned char byte, i; unsigned char byte, i;
unsigned char rv; unsigned char rv;
unsigned char is_header; unsigned char is_header;
static const unsigned char types[] = { static const unsigned char types[] = {
CBM_T_OTHER, CBM_T_OTHER, CBM_T_CBM, CBM_T_DIR, /* a b c d */ CBM_T_OTHER, CBM_T_OTHER, CBM_T_CBM, CBM_T_DIR, /* a b c d */
CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, /* e f g h */ CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, /* e f g h */
CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, /* i j k l */ CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, CBM_T_OTHER, /* i j k l */