Rev 3467 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3467 | Rev 3877 | ||
---|---|---|---|
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 ( $test fpath_atr.attr, 4 ) return 1; else return 0; |
170 | if (TestBit( fpath_atr.attr, 4)) return 1; else return 0; |
- | 171 | } |
|
171 | } |
172 | |
172 | :int GetFile(dword buf, filesize, read_path) |
173 | :int GetFile(dword buf, filesize, read_path) |
173 | { |
174 | { |
174 | BDVK ReadFile_atr; |
175 | BDVK ReadFile_atr; |
175 | dword rBuf; |
176 | dword rBuf; |