Subversion Repositories Kolibri OS

Rev

Rev 4867 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4867 Rev 9587
Line 2... Line 2...
2 
 
 2 
 
3 
: setwd ( uaddr)
 3 
: setwd ( uaddr)
Line 4... Line 4...
4 
	COUNT 1+ SWAP 1- SWAP wd SWAP CMOVE ;
 4 
	COUNT 1+ SWAP 1- SWAP wd SWAP CMOVE ;
5 
 
 5 
 
Line 6... Line 6...
6 
: _wd
 6 
: _wd
Line 7... Line 7...
7 
	$" /rd/1/" setwd ; _wd
 7 
	$" /sys/" setwd ; _wd
8 
 
 8