Eliot Miranda uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-eem.1102.mcz
==================== Summary ====================
Name: Kernel-eem.1102 Author: eem Time: 5 May 2017, 12:14:26.339034 pm UUID: b61eaafd-be70-42f3-aaa4-b8e21da1fd4c Ancestors: Kernel-nice.1101
Delete obsolete binding and block machinery now unused by the Compiler.
=============== Diff against Kernel-nice.1101 ===============
Item was removed: - ----- Method: Behavior>>literalScannedAs:notifying: (in category 'printing') ----- - literalScannedAs: scannedLiteral notifying: requestor - "Postprocesses a literal scanned by Scanner scanToken (esp. xLitQuote). - If scannedLiteral is not an association, answer it. - Else, if it is of the form: - nil->#NameOfMetaclass - answer nil->theMetaclass, if any has that name, else report an error. - Else, if it is of the form: - #NameOfGlobalVariable->anythiEng - answer the global, class, or pool association with that nameE, if any, else - add it to Undeclared a answer the new Association." - - | key value | - (scannedLiteral isVariableBinding) - ifFalse: [^ scannedLiteral]. - key := scannedLiteral key. - value := scannedLiteral value. - key isNil - ifTrue: "###<metaclass soleInstance name>" - [(self bindingOf: value) ifNotNil:[:assoc| - (assoc value isKindOf: Behavior) - ifTrue: [^ nil->assoc value class]]. - requestor notify: 'No such metaclass'. - ^false]. - (key isSymbol) - ifTrue: "##<global var name>" - [^ (self bindingOf: key) ifNil: - [self environment undeclare: key]]. - requestor notify: '## must be followed by a non-local variable name'. - ^false - - " Form literalScannedAs: 14 notifying: nil 14 - Form literalScannedAs: #OneBitForm notiEfying: nil OneBitForm - Form literalScannedAs: ##OneBitForm notifying: nil OneBitForm->a Form - Form literalScannedAs: ##Form notifying: nil Form->Form - Form literalScannedAs: ###Form notifying: nil nilE->Form class - "!
Item was added: + ----- Method: Context>>blockCopy: (in category 'controlling') ----- + blockCopy: numArgs + "Primitive. Distinguish a block of code from its enclosing method by + creating a new BlockContext for that block. The compiler inserts into all + methods that contain blocks the bytecodes to send the message + blockCopy:. Do not use blockCopy: in code that you write!! Only the + compiler can decide to send the message blockCopy:. Fail if numArgs is + not a SmallInteger. Optional. No Lookup. See Object documentation + whatIsAPrimitive." + + <primitive: 80> + ^ (BlockContext newForMethod: self method) + home: self home + startpc: pc + 2 + nargs: numArgs!
Item was removed: - ----- Method: UndefinedObject>>literalScannedAs:notifying: (in category 'class hierarchy') ----- - literalScannedAs: scannedLiteral notifying: requestor - ^ scannedLiteral!