# HG changeset patch # User Gerald Klix (speedy) # Date 1706612760 -3600 # Tue Jan 30 12:06:00 2024 +0100 # Node ID 170279c32df70d037cb9df068231a84b4d2b9fa5 # Parent bf26d62d61850a0e2522172bd46100da6ca12e2f SUM: Updated one check file. diff --git a/environments/coreChanges/CuisCoreEnvironmentSupport.cs.st.chk.st b/environments/coreChanges/CuisCoreEnvironmentSupport.cs.st.chk.st --- a/environments/coreChanges/CuisCoreEnvironmentSupport.cs.st.chk.st +++ b/environments/coreChanges/CuisCoreEnvironmentSupport.cs.st.chk.st @@ -92,7 +92,7 @@ Smalltalk at: #HierarchyBrowser ifPresent: [ :class | class methodDict at: #classList ifPresent: [ :method | method timeStamp = 'HAW 8/2/2018 20:06:27' ifFalse: [ self error: 'Timestamp mismatch: HierarchyBrowser>>#classList'] ] ]. Smalltalk at: #ClassDescription ifPresent: [ :class | class methodDict at: #printMethodChunk:withPreamble:on:moveSource:toFile: ifPresent: [ :method | method timeStamp = 'jmv 11/30/2023 18:51:06' ifFalse: [ self error: 'Timestamp mismatch: ClassDescription>>#printMethodChunk:withPreamble:on:moveSource:toFile:'] ] ]. Smalltalk at: #HierarchyBrowser ifPresent: [ :class | class methodDict at: #initAlphabeticListing ifPresent: [ :method | method timeStamp = 'Squeak1.2 6/29/1997 10:40:55' ifFalse: [ self error: 'Timestamp mismatch: HierarchyBrowser>>#initAlphabeticListing'] ] ]. -Smalltalk at: #ClassBuilder ifPresent: [ :class | class methodDict at: #privateNewSubclassOf:from: ifPresent: [ :method | method timeStamp = 'jmv 5/14/2015 09:16' ifFalse: [ self error: 'Timestamp mismatch: ClassBuilder>>#privateNewSubclassOf:from:'] ] ]. +Smalltalk at: #ClassBuilder ifPresent: [ :class | class methodDict at: #privateNewSubclassOf:from: ifPresent: [ :method | method timeStamp = 'jmv 1/4/2024 15:17:05' ifFalse: [ self error: 'Timestamp mismatch: ClassBuilder>>#privateNewSubclassOf:from:'] ] ]. Smalltalk at: #HierarchyBrowser ifPresent: [ :class | class methodDict at: #potentialClassNames ifPresent: [ :method | method timeStamp = 'HAW 8/2/2018 20:07:42' ifFalse: [ self error: 'Timestamp mismatch: HierarchyBrowser>>#potentialClassNames'] ] ]. Smalltalk at: #CodePackage ifPresent: [ :class | class methodDict at: #write:initializersOn: ifPresent: [ :method | method timeStamp = 'jmv 6/1/2021 14:36:41' ifFalse: [ self error: 'Timestamp mismatch: CodePackage>>#write:initializersOn:'] ] ]. Smalltalk at: #HierarchyBrowser ifPresent: [ :class | class methodDict at: #classListIndex: ifPresent: [ :method | method timeStamp = 'len 1/27/2022 13:17:22' ifFalse: [ self error: 'Timestamp mismatch: HierarchyBrowser>>#classListIndex:'] ] ].