1182 |
1182 |
1183 addChangeRecordForPrimitiveVariables:aClass to:aStream |
1183 addChangeRecordForPrimitiveVariables:aClass to:aStream |
1184 "append a primitiveVariables-record to aStream" |
1184 "append a primitiveVariables-record to aStream" |
1185 |
1185 |
1186 aStream nextPutAll:aClass name |
1186 aStream nextPutAll:aClass name |
1187 , ' primitiveVariables: ' |
1187 , ' primitiveVariables:' |
1188 , aClass primitiveVariablesString storeString. |
1188 , aClass primitiveVariablesString storeString. |
1189 aStream nextPutChunkSeparator. |
1189 aStream nextPutChunkSeparator. |
1190 ! |
1190 ! |
1191 |
1191 |
1192 addChangeRecordForPrimitiveDefinitions:aClass to:aStream |
1192 addChangeRecordForPrimitiveDefinitions:aClass to:aStream |
1193 "append a primitiveDefinitions-record to aStream" |
1193 "append a primitiveDefinitions-record to aStream" |
1194 |
1194 |
1195 aStream nextPutAll:aClass name |
1195 aStream nextPutAll:aClass name |
1196 , ' primitiveDefinitions: ' |
1196 , ' primitiveDefinitions:' |
1197 , aClass primitiveDefinitionsString storeString. |
1197 , aClass primitiveDefinitionsString storeString. |
1198 aStream nextPutChunkSeparator. |
1198 aStream nextPutChunkSeparator. |
1199 ! |
1199 ! |
1200 |
1200 |
1201 addChangeRecordForPrimitiveFunctions:aClass to:aStream |
1201 addChangeRecordForPrimitiveFunctions:aClass to:aStream |
1202 "append a primitiveFunctions-record to aStream" |
1202 "append a primitiveFunctions-record to aStream" |
1203 |
1203 |
1204 aStream nextPutAll:aClass name |
1204 aStream nextPutAll:aClass name |
1205 , ' primitiveFunctions: ' |
1205 , ' primitiveFunctions:' |
1206 , aClass primitiveFunctionsString storeString. |
1206 , aClass primitiveFunctionsString storeString. |
1207 aStream nextPutChunkSeparator. |
1207 aStream nextPutChunkSeparator. |
1208 ! |
1208 ! |
1209 |
1209 |
1210 addChangeRecordForClassRename:oldName to:newName to:aStream |
1210 addChangeRecordForClassRename:oldName to:newName to:aStream |