PWD
* PWD ( -- )

calls system's getcwd and prints it to the screen
 : PWD  $CWD TYPE ;

EXTENSIONS shell ordinary primitive