equal
deleted
inserted
replaced
953 invalidate |
953 invalidate |
954 super invalidate. |
954 super invalidate. |
955 moduleHandle := nil. |
955 moduleHandle := nil. |
956 ! |
956 ! |
957 |
957 |
|
958 setModuleHandle:aHandle |
|
959 "set the moduleHandle. |
|
960 This is a private interface for the objectFileLoader; not for public use." |
|
961 |
|
962 moduleHandle := aHandle |
|
963 ! |
|
964 |
958 setName:aString moduleHandle:aHandle |
965 setName:aString moduleHandle:aHandle |
959 "set the name & moduleHandle. |
966 "set the name & moduleHandle. |
960 This is a private interface for the objectFileLoader; not for public use." |
967 This is a private interface for the objectFileLoader; not for public use." |
961 |
968 |
962 name := aString. |
969 name := aString. |
964 ! ! |
971 ! ! |
965 |
972 |
966 !ExternalFunction class methodsFor:'documentation'! |
973 !ExternalFunction class methodsFor:'documentation'! |
967 |
974 |
968 version |
975 version |
969 ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunction.st,v 1.25 2006-06-22 15:21:29 ca Exp $' |
976 ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunction.st,v 1.26 2006-06-22 16:14:33 ca Exp $' |
970 ! ! |
977 ! ! |
971 |
978 |
972 ExternalFunction initialize! |
979 ExternalFunction initialize! |