14 lines
278 B
Plaintext
14 lines
278 B
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
FUNCTION Main()
|
|
|
|
OutStd( CurDir() + Chr(13) + Chr(10) )
|
|
OutStd( CurDir("C") + Chr(13) + Chr(10) )
|
|
OutStd( CurDir("C:") + Chr(13) + Chr(10) )
|
|
OutStd( CurDir("D:") + Chr(13) + Chr(10) )
|
|
OutStd( CurDir("A") + Chr(13) + Chr(10) )
|
|
|
|
RETURN NIL
|