new accessors

db4
Doug Coleman 2008-08-29 17:09:19 -05:00
parent 313b68f600
commit 922e1f4371
1 changed files with 1 additions and 1 deletions

View File

@ -324,7 +324,7 @@ TUPLE: pathname string ;
C: <pathname> pathname
M: pathname <=> [ pathname-string ] compare ;
M: pathname <=> [ string>> ] compare ;
! Home directory
HOOK: home os ( -- dir )