equal
deleted
inserted
replaced
501 type := type , ' (' , fmt ,')' |
501 type := type , ' (' , fmt ,')' |
502 ] |
502 ] |
503 ] |
503 ] |
504 ]. |
504 ]. |
505 ^ type |
505 ^ type |
506 ! |
506 ! ! |
507 |
507 |
508 !OpenVMSFilename methodsFor:'queries'! |
508 !OpenVMSFilename methodsFor:'queries'! |
509 |
509 |
510 isExecutableProgram |
510 isExecutableProgram |
511 "return true, if such a file exists and is an executable program. |
511 "return true, if such a file exists and is an executable program. |
1168 ! ! |
1168 ! ! |
1169 |
1169 |
1170 !OpenVMSFilename class methodsFor:'documentation'! |
1170 !OpenVMSFilename class methodsFor:'documentation'! |
1171 |
1171 |
1172 version |
1172 version |
1173 ^ '$Header: /cvs/stx/stx/libbasic/OpenVMSFilename.st,v 1.17 1997-10-02 13:27:20 cg Exp $' |
1173 ^ '$Header: /cvs/stx/stx/libbasic/OpenVMSFilename.st,v 1.18 1997-10-16 10:41:25 cg Exp $' |
1174 ! ! |
1174 ! ! |