File: DiskRoot.m

package info (click to toggle)
psychtoolbox-3 3.0.14.20170103%2Bgit6-g605ff5c.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 103,044 kB
  • ctags: 69,483
  • sloc: ansic: 167,371; cpp: 11,232; objc: 4,708; sh: 1,875; python: 383; php: 344; makefile: 207; java: 113
file content (13 lines) | stat: -rw-r--r-- 286 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
function ThisDisk = DiskRoot
% DiskName = DiskRoot
%
% Purpose:  Find the name of the disk for the current working directory.

% History:
% 1/24/08		mpr scavenged the code from his personal files

CurDir = pwd;
SepPos = find(CurDir == filesep);
ThisDisk = CurDir(1:SepPos(1));

return;