Changeset 13093 in project
- Timestamp:
- 01/26/09 00:54:39 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
chicken/trunk/posixunix.scm
r12937 r13093 1528 1528 (define read-symbolic-link 1529 1529 (let ([substring substring] 1530 [buf (make-string (fx+ _filename_max 1))] )1530 [buf (make-string (fx+ _filename_max 1))] ) 1531 1531 (lambda (fname) 1532 1532 (##sys#check-string fname 'read-symbolic-link)
Note: See TracChangeset
for help on using the changeset viewer.