Rev 3444 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3444 | Rev 3467 | ||
---|---|---|---|
Line 165... | Line 165... | ||
165 | 165 | ||
166 | char isdir(dword fpath) |
166 | char isdir(dword fpath) |
167 | { |
167 | { |
168 | BDVK fpath_atr; |
168 | BDVK fpath_atr; |
169 | GetFileInfo(fpath, #fpath_atr); |
169 | GetFileInfo(fpath, #fpath_atr); |
170 | if (TestBit(fpath_atr.attr, 4)==1) return 1; else return 0; |
170 | if ( $test fpath_atr.attr, 4 ) return 1; else return 0; |
171 | } |
171 | } |
172 | :int GetFile(dword buf, filesize, read_path) |
172 | :int GetFile(dword buf, filesize, read_path) |
173 | { |
173 | { |
174 | BDVK ReadFile_atr; |
174 | BDVK ReadFile_atr; |