[Vm-dev] VM Maker: VMMaker-dtl.430.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Aug 7 15:06:52 UTC 2021
David T. Lewis uploaded a new version of VMMaker to project VM Maker:
http://source.squeak.org/VMMaker/VMMaker-dtl.430.mcz
==================== Summary ====================
Name: VMMaker-dtl.430
Author: dtl
Time: 7 August 2021, 11:06:41.117 am
UUID: d4216d8c-e7c8-43ea-aea9-33b5c7542efc
Ancestors: VMMaker-dtl.429
Run FixUnderscores on PrimitiveTableHistory. This is the historical record of changing primitive table assignments. Update the old methods so as not to require the underscore assignment preference.
=============== Diff against VMMaker-dtl.429 ===============
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19961028Squeak11 (in category 'initialization history') -----
initializePrimitiveTable19961028Squeak11
"From changes file of Squeak 1.1, and remaining in effect through Squeak 1.17"
"'From Squeak 1.1 of September 21, 1996 on 23 September 1996 at 8:34:59 pm'!!"
"initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"Note: This table will be used to generate a C switch statement."
+ PrimitiveTable := Array new: 256.
- PrimitiveTable _ Array new: 256.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 59 primitiveFail)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveFail)
(119 primitiveFail)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"AppleSmalltalk Primitives Start Here"
"Apple Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 149 primitiveFail)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveFail)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence)
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 199 primitiveFail)
"Unimplemented Primitives (200-249)"
(200 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveFail)
(255 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19970118Squeak118 (in category 'initialization history') -----
initializePrimitiveTable19970118Squeak118
"From changes file of Squeak 1.18"
"initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"Note: This table will be used to generate a C switch statement."
+ PrimitiveTable := Array new: 256.
- PrimitiveTable _ Array new: 256.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveFail)
(119 primitiveFail)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"AppleSmalltalk Primitives Start Here"
"Apple Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveFail)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveFail)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence)
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 199 primitiveFail)
"Unimplemented Primitives (200-249)"
(200 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveFail)
(255 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19970617jm (in category 'initialization history') -----
initializePrimitiveTable19970617jm
"From changes file of Squeak 1.20"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 6/17/97 07:07'!!
initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"Note: This table will be used to generate a C switch statement."
+ PrimitiveTable := Array new: 256.
- PrimitiveTable _ Array new: 256.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveFail)
(119 primitiveFail)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveFail)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence)
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Unimplemented Primitives (230-249)"
(230 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveFail)
(255 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19970918jm (in category 'initialization history') -----
initializePrimitiveTable19970918jm
"From changes file of Squeak 1.22"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 9/18/97 21:09'!!
initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"This table generates a C switch statement."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 699.
+ PrimitiveTable := Array new: MaxPrimitiveIndex+1.
- MaxPrimitiveIndex _ 699.
- PrimitiveTable _ Array new: MaxPrimitiveIndex+1.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveFail)
(119 primitiveFail)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"Unassigned Primitives"
(520 primitiveBeep) "test of new primitive indices"
(521 699 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19980114ikp (in category 'initialization history') -----
initializePrimitiveTable19980114ikp
"From changes file of Squeak 13"
"!!Interpreter class methodsFor: 'initialization' stamp: 'ikp 1/14/98 21:00'!!
initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"This table generates a C switch statement."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex+1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex+1.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"Unassigned Primitives"
(520 primitiveBeep) "test of new primitive indices"
(521 700 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19980121jm (in category 'initialization history') -----
initializePrimitiveTable19980121jm
"From changes file of Squeak 131"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 1/21/98 17:47'!!
initializePrimitiveTable"
"Interpreter initializePrimitiveTable"
"This table generates a C switch statement."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex+1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex+1.
self table: PrimitiveTable from:
#(
"Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
(126 primitiveFail)
(127 primitiveFail)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"Unassigned Primitives"
(520 primitiveBeep) "test of new primitive indices"
(521 700 primitiveFail)
).!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19980518jm (in category 'initialization history') -----
initializePrimitiveTable19980518jm
"From sources file of Squeak 2.0 SqueakV2.sources"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 5/18/1998 13:01'!!
initializePrimitiveTable"
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail)
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 primitiveSerialPortOpen)
(239 primitiveSerialPortClose)
(240 primitiveSerialPortWrite)
(241 primitiveSerialPortRead)
(242 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 primitiveFail)
(521 primitiveMIDIClosePort)
(522 primitiveMIDIGetClock)
(523 primitiveMIDIGetPortCount)
(524 primitiveMIDIGetPortDirectionality)
(525 primitiveMIDIGetPortName)
(526 primitiveMIDIOpenPort)
(527 primitiveMIDIParameterGetOrSet)
(528 primitiveMIDIRead)
(529 primitiveMIDIWrite)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Unassigned Primitives"
(540 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19980628jm (in category 'initialization history') -----
initializePrimitiveTable19980628jm
"From changes file of Squeak 2.1"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 6/28/1998 12:49'!!
initializePrimitiveTable"
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 primitiveSerialPortOpen)
(239 primitiveSerialPortClose)
(240 primitiveSerialPortWrite)
(241 primitiveSerialPortRead)
(242 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 primitiveFail)
(521 primitiveMIDIClosePort)
(522 primitiveMIDIGetClock)
(523 primitiveMIDIGetPortCount)
(524 primitiveMIDIGetPortDirectionality)
(525 primitiveMIDIGetPortName)
(526 primitiveMIDIOpenPort)
(527 primitiveMIDIParameterGetOrSet)
(528 primitiveMIDIRead)
(529 primitiveMIDIWrite)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives"
(540 primitiveAsyncFileClose)
(541 primitiveAsyncFileOpen)
(542 primitiveAsyncFileReadResult)
(543 primitiveAsyncFileReadStart)
(544 primitiveAsyncFileWriteResult)
(545 primitiveAsyncFileWriteStart)
"Unassigned Primitives"
(546 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19980922jm (in category 'initialization history') -----
initializePrimitiveTable19980922jm
"From changes file of Squeak 2.2"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 9/22/1998 16:52'!!
initializePrimitiveTable"
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveFail) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveFail) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveFail) "Blue Book: primitiveBlockCopy"
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFail)
(117 primitiveFail)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 primLoopedSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(185 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 primitiveSerialPortOpen)
(239 primitiveSerialPortClose)
(240 primitiveSerialPortWrite)
(241 primitiveSerialPortRead)
(242 primitiveFail)
(243 primStringtranslatefromtotable)
(244 primStringfindFirstInStringinSetstartingAt)
(245 primStringindexOfAsciiinStringstartingAt)
(246 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveFail)
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 primitiveFail)
(521 primitiveMIDIClosePort)
(522 primitiveMIDIGetClock)
(523 primitiveMIDIGetPortCount)
(524 primitiveMIDIGetPortDirectionality)
(525 primitiveMIDIGetPortName)
(526 primitiveMIDIOpenPort)
(527 primitiveMIDIParameterGetOrSet)
(528 primitiveMIDIRead)
(529 primitiveMIDIWrite)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives"
(540 primitiveAsyncFileClose)
(541 primitiveAsyncFileOpen)
(542 primitiveAsyncFileReadResult)
(543 primitiveAsyncFileReadStart)
(544 primitiveAsyncFileWriteResult)
(545 primitiveAsyncFileWriteStart)
"Unassigned Primitives"
(546 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19990128di (in category 'initialization history') -----
initializePrimitiveTable19990128di
"From changes file of Squeak 2.3"
"!!Interpreter class methodsFor: 'initialization' stamp: 'di 1/11/1999 10:44'!!
initializePrimitiveTable"
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveFail) "Blue Book: primitiveTimeWordsInto"
(99 primitiveFail) "Blue Book: primitiveTickWordsInto"
(100 primitiveFail) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 primLoopedSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(185 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 primitiveSerialPortOpen)
(239 primitiveSerialPortClose)
(240 primitiveSerialPortWrite)
(241 primitiveSerialPortRead)
(242 primitiveFail)
(243 primStringtranslatefromtotable)
(244 primStringfindFirstInStringinSetstartingAt)
(245 primStringindexOfAsciiinStringstartingAt)
(246 primStringfindSubstringinstartingAtmatchTable)
(247 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 primitiveFail)
(521 primitiveMIDIClosePort)
(522 primitiveMIDIGetClock)
(523 primitiveMIDIGetPortCount)
(524 primitiveMIDIGetPortDirectionality)
(525 primitiveMIDIGetPortName)
(526 primitiveMIDIOpenPort)
(527 primitiveMIDIParameterGetOrSet)
(528 primitiveMIDIRead)
(529 primitiveMIDIWrite)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives"
(540 primitiveAsyncFileClose)
(541 primitiveAsyncFileOpen)
(542 primitiveAsyncFileReadResult)
(543 primitiveAsyncFileReadStart)
(544 primitiveAsyncFileWriteResult)
(545 primitiveAsyncFileWriteStart)
"Unassigned Primitives"
(546 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19990421jm (in category 'initialization history') -----
initializePrimitiveTable19990421jm
"From changes file of Squeak 2.4"
"!!Interpreter class methodsFor: 'initialization' stamp: 'jm 4/10/1999 12:27'!!
initializePrimitiveTable "
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveFail) "Blue Book: primitiveCursorLocPut"
(92 primitiveFail) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveCopyBits)
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveDrawLoop)
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveFail)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveReadJoystick)
(147 primitiveWarpBits)
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 primitiveFileAtEnd)
(151 primitiveFileClose)
(152 primitiveFileGetPosition)
(153 primitiveFileOpen)
(154 primitiveFileRead)
(155 primitiveFileSetPosition)
(156 primitiveFileDelete)
(157 primitiveFileSize)
(158 primitiveFileWrite)
(159 primitiveFileRename)
(160 primitiveDirectoryCreate)
(161 primitiveDirectoryDelimitor)
(162 primitiveDirectoryLookup)
(163 primitiveDirectoryDelete)
(164 168 primitiveFail)
(169 primitiveDirectorySetMacTypeAndCreator)
"Sound Primitives (170-199)"
(170 primitiveSoundStart)
(171 primitiveSoundStartWithSemaphore)
(172 primitiveSoundStop)
(173 primitiveSoundAvailableSpace)
(174 primitiveSoundPlaySamples)
(175 primitiveSoundPlaySilence) "obsolete; will be removed in the future"
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 primLoopedSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(185 188 primitiveFail)
(189 primitiveSoundInsertSamples)
(190 primitiveSoundStartRecording)
(191 primitiveSoundStopRecording)
(192 primitiveSoundGetRecordingSampleRate)
(193 primitiveSoundRecordSamples)
(194 primitiveSoundSetRecordLevel)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 primitiveInitializeNetwork)
(201 primitiveResolverStartNameLookup)
(202 primitiveResolverNameLookupResult)
(203 primitiveResolverStartAddressLookup)
(204 primitiveResolverAddressLookupResult)
(205 primitiveResolverAbortLookup)
(206 primitiveResolverLocalAddress)
(207 primitiveResolverStatus)
(208 primitiveResolverError)
(209 primitiveSocketCreate)
(210 primitiveSocketDestroy)
(211 primitiveSocketConnectionStatus)
(212 primitiveSocketError)
(213 primitiveSocketLocalAddress)
(214 primitiveSocketLocalPort)
(215 primitiveSocketRemoteAddress)
(216 primitiveSocketRemotePort)
(217 primitiveSocketConnectToPort)
(218 primitiveSocketListenOnPort)
(219 primitiveSocketCloseConnection)
(220 primitiveSocketAbortConnection)
(221 primitiveSocketReceiveDataBufCount)
(222 primitiveSocketReceiveDataAvailable)
(223 primitiveSocketSendDataBufCount)
(224 primitiveSocketSendDone)
(225 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 primitiveSerialPortOpen)
(239 primitiveSerialPortClose)
(240 primitiveSerialPortWrite)
(241 primitiveSerialPortRead)
(242 primitiveFail)
(243 primStringtranslatefromtotable)
(244 primStringfindFirstInStringinSetstartingAt)
(245 primStringindexOfAsciiinStringstartingAt)
(246 primStringfindSubstringinstartingAtmatchTable)
(247 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 primitiveFail)
(521 primitiveMIDIClosePort)
(522 primitiveMIDIGetClock)
(523 primitiveMIDIGetPortCount)
(524 primitiveMIDIGetPortDirectionality)
(525 primitiveMIDIGetPortName)
(526 primitiveMIDIOpenPort)
(527 primitiveMIDIParameterGetOrSet)
(528 primitiveMIDIRead)
(529 primitiveMIDIWrite)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives"
(540 primitiveAsyncFileClose)
(541 primitiveAsyncFileOpen)
(542 primitiveAsyncFileReadResult)
(543 primitiveAsyncFileReadStart)
(544 primitiveAsyncFileWriteResult)
(545 primitiveAsyncFileWriteStart)
(546 547 primitiveFail)
"Pen Tablet Primitives"
(548 primitiveGetTabletParameters)
(549 primitiveReadTablet)
"Sound Codec Primitives"
(550 primADPCMCodecprivateDecodeMono)
(551 primADPCMCodecprivateDecodeStereo)
(552 primADPCMCodecprivateEncodeMono)
(553 primADPCMCodecprivateEncodeStereo)
(554 569 primitiveFail) "reserved for additional codec primitives"
"Unassigned Primitives"
(570 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable19990920ar (in category 'initialization history') -----
(excessive size, no diff calculated)
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20000119ar (in category 'initialization history') -----
(excessive size, no diff calculated)
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20000906tpr (in category 'initialization history') -----
initializePrimitiveTable20000906tpr
"From changes file of Squeak 2.8"
"!!Interpreter class methodsFor: 'initialization' stamp: 'TPR 5/23/2000 22:02'!!
initializePrimitiveTable "
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveFail) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169)"
(150 163 primitiveObsoleteIndexedPrimitive)
(164 168 primitiveFail)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199)"
(170 175 primitiveObsoleteIndexedPrimitive)
(176 primWaveTableSoundmixSampleCountintostartingAtpan)
(177 primFMSoundmixSampleCountintostartingAtpan)
(178 primPluckedSoundmixSampleCountintostartingAtpan)
(179 primSampledSoundmixSampleCountintostartingAtpan)
(180 primFMSoundmixSampleCountintostartingAtleftVolrightVol)
(181 primPluckedSoundmixSampleCountintostartingAtleftVolrightVol)
(182 oldprimSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(183 primReverbSoundapplyReverbTostartingAtcount)
(184 primLoopedSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(185 primSampledSoundmixSampleCountintostartingAtleftVolrightVol)
(186 188 primitiveFail)
(189 194 primitiveObsoleteIndexedPrimitive)
(195 199 primitiveFail)
"Networking Primitives (200-229)"
(200 225 primitiveObsoleteIndexedPrimitive)
(226 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primBitmapdecompressfromByteArrayat)
(235 primStringcomparewithcollated)
(236 primSampledSoundconvert8bitSignedFromto16Bit)
(237 primBitmapcompresstoByteArray)
(238 241 primitiveObsoleteIndexedPrimitive)
(242 primitiveFail)
(243 primStringtranslatefromtotable)
(244 primStringfindFirstInStringinSetstartingAt)
(245 primStringindexOfAsciiinStringstartingAt)
(246 primStringfindSubstringinstartingAtmatchTable)
(247 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539)"
(520 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives"
(550 primADPCMCodecprivateDecodeMono)
(551 primADPCMCodecprivateDecodeStereo)
(552 primADPCMCodecprivateEncodeMono)
(553 primADPCMCodecprivateEncodeStereo)
(554 569 primitiveFail) "reserved for additional codec primitives"
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20010203ar (in category 'initialization history') -----
initializePrimitiveTable20010203ar
"From sources file of Squeak 3.0"
"!!Interpreter class methodsFor: 'initialization' stamp: 'ar 2/3/2001 16:22'!!
initializePrimitiveTable "
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveGetNextEvent) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveFail) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveFail)
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169) - NO LONGER INDEXED"
(150 164 primitiveObsoleteIndexedPrimitive)
(165 168 primitiveFail)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199) - NO LONGER INDEXED"
(170 185 primitiveObsoleteIndexedPrimitive)
(186 188 primitiveFail)
(189 194 primitiveObsoleteIndexedPrimitive)
(195 199 primitiveFail)
"Networking Primitives (200-229) - NO LONGER INDEXED"
(200 225 primitiveObsoleteIndexedPrimitive)
(226 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primitiveObsoleteIndexedPrimitive) "primBitmapdecompressfromByteArrayat"
(235 primitiveObsoleteIndexedPrimitive) "primStringcomparewithcollated"
(236 primitiveObsoleteIndexedPrimitive) "primSampledSoundconvert8bitSignedFromto16Bit"
(237 primitiveObsoleteIndexedPrimitive) "primBitmapcompresstoByteArray"
(238 241 primitiveObsoleteIndexedPrimitive) "serial port primitives"
(242 primitiveFail)
(243 primitiveObsoleteIndexedPrimitive) "primStringtranslatefromtotable"
(244 primitiveObsoleteIndexedPrimitive) "primStringfindFirstInStringinSetstartingAt"
(245 primitiveObsoleteIndexedPrimitive) "primStringindexOfAsciiinStringstartingAt"
(246 primitiveObsoleteIndexedPrimitive) "primStringfindSubstringinstartingAtmatchTable"
(247 primitiveSnapshotEmbedded)
(248 249 primitiveFail)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539) - NO LONGER INDEXED"
(520 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives - NO LONGER INDEXED"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives - NO LONGER INDEXED"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives - NO LONGER INDEXED"
(550 553 primitiveObsoleteIndexedPrimitive)
(554 569 primitiveFail)
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20040211tpr (in category 'initialization history') -----
initializePrimitiveTable20040211tpr
"This table generates a C switch statement for primitive dispatching."
"NOTE: The real limit here is 2047, but our C compiler currently barfs over 700"
+ MaxPrimitiveIndex := 700.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 700.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveGetNextEvent) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveChangeClass) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveValueUninterruptably) "@@@: Remove this when all VMs have support"
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
"NOTE: When removing the obsolete indexed primitives,
the following two should go become #primitiveIntegerAt / atPut"
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169) - NO LONGER INDEXED"
(150 164 primitiveObsoleteIndexedPrimitive)
(165 primitiveIntegerAt) "hacked in here for now"
(166 primitiveIntegerAtPut)
(167 primitiveYield)
(168 primitiveCopyObject)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199) - NO LONGER INDEXED"
(170 185 primitiveObsoleteIndexedPrimitive)
"Closure primitives"
(186 primitiveClosureValue)
(187 primitiveClosureValueWithArgs)
(188 primitiveExecuteMethod)
"Sound Primitives (continued) - NO LONGER INDEXED"
(189 194 primitiveObsoleteIndexedPrimitive)
"Unwind primitives"
(195 primitiveFindNextUnwindContext)
(196 primitiveTerminateTo)
(197 primitiveFindHandlerContext)
(198 primitiveMarkUnwindMethod)
(199 primitiveMarkHandlerMethod)
"Networking Primitives (200-229) - NO LONGER INDEXED"
(200 225 primitiveObsoleteIndexedPrimitive)
(226 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primitiveObsoleteIndexedPrimitive) "primBitmapdecompressfromByteArrayat"
(235 primitiveObsoleteIndexedPrimitive) "primStringcomparewithcollated"
(236 primitiveObsoleteIndexedPrimitive) "primSampledSoundconvert8bitSignedFromto16Bit"
(237 primitiveObsoleteIndexedPrimitive) "primBitmapcompresstoByteArray"
(238 241 primitiveObsoleteIndexedPrimitive) "serial port primitives"
(242 primitiveFail)
(243 primitiveObsoleteIndexedPrimitive) "primStringtranslatefromtotable"
(244 primitiveObsoleteIndexedPrimitive) "primStringfindFirstInStringinSetstartingAt"
(245 primitiveObsoleteIndexedPrimitive) "primStringindexOfAsciiinStringstartingAt"
(246 primitiveObsoleteIndexedPrimitive) "primStringfindSubstringinstartingAtmatchTable"
(247 primitiveSnapshotEmbedded)
(248 primitiveInvokeObjectAsMethod)
(249 primitiveArrayBecomeOneWayCopyHash)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539) - NO LONGER INDEXED"
(520 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives - NO LONGER INDEXED"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives - NO LONGER INDEXED"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives - NO LONGER INDEXED"
(550 553 primitiveObsoleteIndexedPrimitive)
(554 569 primitiveFail)
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 700 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20040324tpr (in category 'initialization history') -----
initializePrimitiveTable20040324tpr
"This table generates a C function address table use in primitiveResponse along with dispatchFunctionPointerOn:in:"
"NOTE: The real limit here is 2047 because of the method header layout but there is no point in going over the needed size"
+ MaxPrimitiveIndex := 575.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 575.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveGetNextEvent) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveChangeClass) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveValueUninterruptably) "@@@: Remove this when all VMs have support"
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
"NOTE: When removing the obsolete indexed primitives,
the following two should go become #primitiveIntegerAt / atPut"
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169) - NO LONGER INDEXED"
(150 164 primitiveObsoleteIndexedPrimitive)
(165 primitiveIntegerAt) "hacked in here for now"
(166 primitiveIntegerAtPut)
(167 primitiveYield)
(168 primitiveCopyObject)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199) - NO LONGER INDEXED"
(170 185 primitiveObsoleteIndexedPrimitive)
"Closure primitives"
(186 primitiveClosureValue)
(187 primitiveClosureValueWithArgs)
(188 primitiveExecuteMethod)
"Sound Primitives (continued) - NO LONGER INDEXED"
(189 194 primitiveObsoleteIndexedPrimitive)
"Unwind primitives"
(195 primitiveFindNextUnwindContext)
(196 primitiveTerminateTo)
(197 primitiveFindHandlerContext)
(198 primitiveMarkUnwindMethod)
(199 primitiveMarkHandlerMethod)
"Networking Primitives (200-229) - NO LONGER INDEXED"
(200 225 primitiveObsoleteIndexedPrimitive)
(226 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primitiveObsoleteIndexedPrimitive) "primBitmapdecompressfromByteArrayat"
(235 primitiveObsoleteIndexedPrimitive) "primStringcomparewithcollated"
(236 primitiveObsoleteIndexedPrimitive) "primSampledSoundconvert8bitSignedFromto16Bit"
(237 primitiveObsoleteIndexedPrimitive) "primBitmapcompresstoByteArray"
(238 241 primitiveObsoleteIndexedPrimitive) "serial port primitives"
(242 primitiveFail)
(243 primitiveObsoleteIndexedPrimitive) "primStringtranslatefromtotable"
(244 primitiveObsoleteIndexedPrimitive) "primStringfindFirstInStringinSetstartingAt"
(245 primitiveObsoleteIndexedPrimitive) "primStringindexOfAsciiinStringstartingAt"
(246 primitiveObsoleteIndexedPrimitive) "primStringfindSubstringinstartingAtmatchTable"
(247 primitiveSnapshotEmbedded)
(248 primitiveInvokeObjectAsMethod)
(249 primitiveArrayBecomeOneWayCopyHash)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539) - NO LONGER INDEXED"
(520 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives - NO LONGER INDEXED"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives - NO LONGER INDEXED"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives - NO LONGER INDEXED"
(550 553 primitiveObsoleteIndexedPrimitive)
(554 569 primitiveFail)
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20040719ajh (in category 'initialization history') -----
initializePrimitiveTable20040719ajh
"This table generates a C function address table use in primitiveResponse along with dispatchFunctionPointerOn:in:"
"NOTE: The real limit here is 2047 because of the method header layout but there is no point in going over the needed size"
+ MaxPrimitiveIndex := 575.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 575.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveGetNextEvent) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveChangeClass) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveValueUninterruptably) "@@@: Remove this when all VMs have support"
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
"NOTE: When removing the obsolete indexed primitives,
the following two should go become #primitiveIntegerAt / atPut"
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169) - NO LONGER INDEXED"
(150 164 primitiveObsoleteIndexedPrimitive)
(165 primitiveIntegerAt) "hacked in here for now"
(166 primitiveIntegerAtPut)
(167 primitiveYield)
(168 primitiveCopyObject)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199) - NO LONGER INDEXED"
(170 185 primitiveObsoleteIndexedPrimitive)
"Old closure primitives"
(186 primitiveFail) "was primitiveClosureValue"
(187 primitiveFail) "was primitiveClosureValueWithArgs"
"Perform method directly"
(188 primitiveExecuteMethodArgsArray)
(189 primitiveExecuteMethod)
"Sound Primitives (continued) - NO LONGER INDEXED"
(190 194 primitiveObsoleteIndexedPrimitive)
"Unwind primitives"
(195 primitiveFindNextUnwindContext)
(196 primitiveTerminateTo)
(197 primitiveFindHandlerContext)
(198 primitiveMarkUnwindMethod)
(199 primitiveMarkHandlerMethod)
"Networking Primitives (200-229) - NO LONGER INDEXED"
(200 225 primitiveObsoleteIndexedPrimitive)
(226 229 primitiveFail)
"Other Primitives (230-249)"
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primitiveObsoleteIndexedPrimitive) "primBitmapdecompressfromByteArrayat"
(235 primitiveObsoleteIndexedPrimitive) "primStringcomparewithcollated"
(236 primitiveObsoleteIndexedPrimitive) "primSampledSoundconvert8bitSignedFromto16Bit"
(237 primitiveObsoleteIndexedPrimitive) "primBitmapcompresstoByteArray"
(238 241 primitiveObsoleteIndexedPrimitive) "serial port primitives"
(242 primitiveFail)
(243 primitiveObsoleteIndexedPrimitive) "primStringtranslatefromtotable"
(244 primitiveObsoleteIndexedPrimitive) "primStringfindFirstInStringinSetstartingAt"
(245 primitiveObsoleteIndexedPrimitive) "primStringindexOfAsciiinStringstartingAt"
(246 primitiveObsoleteIndexedPrimitive) "primStringfindSubstringinstartingAtmatchTable"
(247 primitiveSnapshotEmbedded)
(248 primitiveInvokeObjectAsMethod)
(249 primitiveArrayBecomeOneWayCopyHash)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
"MIDI Primitives (520-539) - NO LONGER INDEXED"
(520 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives - NO LONGER INDEXED"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives - NO LONGER INDEXED"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives - NO LONGER INDEXED"
(550 553 primitiveObsoleteIndexedPrimitive)
(554 569 primitiveFail)
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 primitiveFail)).
!
Item was changed:
----- Method: PrimitiveTableHistory class>>initializePrimitiveTable20050127JMM (in category 'initialization history') -----
initializePrimitiveTable20050127JMM
"This table generates a C function address table use in primitiveResponse along with dispatchFunctionPointerOn:in:"
"NOTE: The real limit here is 2047 because of the method header layout but there is no point in going over the needed size"
+ MaxPrimitiveIndex := 575.
+ PrimitiveTable := Array new: MaxPrimitiveIndex + 1.
- MaxPrimitiveIndex _ 575.
- PrimitiveTable _ Array new: MaxPrimitiveIndex + 1.
self table: PrimitiveTable from:
#( "Integer Primitives (0-19)"
(0 primitiveFail)
(1 primitiveAdd)
(2 primitiveSubtract)
(3 primitiveLessThan)
(4 primitiveGreaterThan)
(5 primitiveLessOrEqual)
(6 primitiveGreaterOrEqual)
(7 primitiveEqual)
(8 primitiveNotEqual)
(9 primitiveMultiply)
(10 primitiveDivide)
(11 primitiveMod)
(12 primitiveDiv)
(13 primitiveQuo)
(14 primitiveBitAnd)
(15 primitiveBitOr)
(16 primitiveBitXor)
(17 primitiveBitShift)
(18 primitiveMakePoint)
(19 primitiveFail) "Guard primitive for simulation -- *must* fail"
"LargeInteger Primitives (20-39)"
"32-bit logic is aliased to Integer prims above"
(20 39 primitiveFail)
"Float Primitives (40-59)"
(40 primitiveAsFloat)
(41 primitiveFloatAdd)
(42 primitiveFloatSubtract)
(43 primitiveFloatLessThan)
(44 primitiveFloatGreaterThan)
(45 primitiveFloatLessOrEqual)
(46 primitiveFloatGreaterOrEqual)
(47 primitiveFloatEqual)
(48 primitiveFloatNotEqual)
(49 primitiveFloatMultiply)
(50 primitiveFloatDivide)
(51 primitiveTruncated)
(52 primitiveFractionalPart)
(53 primitiveExponent)
(54 primitiveTimesTwoPower)
(55 primitiveSquareRoot)
(56 primitiveSine)
(57 primitiveArctan)
(58 primitiveLogN)
(59 primitiveExp)
"Subscript and Stream Primitives (60-67)"
(60 primitiveAt)
(61 primitiveAtPut)
(62 primitiveSize)
(63 primitiveStringAt)
(64 primitiveStringAtPut)
(65 primitiveNext)
(66 primitiveNextPut)
(67 primitiveAtEnd)
"StorageManagement Primitives (68-79)"
(68 primitiveObjectAt)
(69 primitiveObjectAtPut)
(70 primitiveNew)
(71 primitiveNewWithArg)
(72 primitiveArrayBecomeOneWay) "Blue Book: primitiveBecome"
(73 primitiveInstVarAt)
(74 primitiveInstVarAtPut)
(75 primitiveAsOop)
(76 primitiveStoreStackp) "Blue Book: primitiveAsObject"
(77 primitiveSomeInstance)
(78 primitiveNextInstance)
(79 primitiveNewMethod)
"Control Primitives (80-89)"
(80 primitiveBlockCopy)
(81 primitiveValue)
(82 primitiveValueWithArgs)
(83 primitivePerform)
(84 primitivePerformWithArgs)
(85 primitiveSignal)
(86 primitiveWait)
(87 primitiveResume)
(88 primitiveSuspend)
(89 primitiveFlushCache)
"Input/Output Primitives (90-109)"
(90 primitiveMousePoint)
(91 primitiveTestDisplayDepth) "Blue Book: primitiveCursorLocPut"
(92 primitiveSetDisplayMode) "Blue Book: primitiveCursorLink"
(93 primitiveInputSemaphore)
(94 primitiveGetNextEvent) "Blue Book: primitiveSampleInterval"
(95 primitiveInputWord)
(96 primitiveObsoleteIndexedPrimitive) "primitiveCopyBits"
(97 primitiveSnapshot)
(98 primitiveStoreImageSegment)
(99 primitiveLoadImageSegment)
(100 primitivePerformInSuperclass) "Blue Book: primitiveSignalAtTick"
(101 primitiveBeCursor)
(102 primitiveBeDisplay)
(103 primitiveScanCharacters)
(104 primitiveObsoleteIndexedPrimitive) "primitiveDrawLoop"
(105 primitiveStringReplace)
(106 primitiveScreenSize)
(107 primitiveMouseButtons)
(108 primitiveKbdNext)
(109 primitiveKbdPeek)
"System Primitives (110-119)"
(110 primitiveEquivalent)
(111 primitiveClass)
(112 primitiveBytesLeft)
(113 primitiveQuit)
(114 primitiveExitToDebugger)
(115 primitiveChangeClass) "Blue Book: primitiveOopsLeft"
(116 primitiveFlushCacheByMethod)
(117 primitiveExternalCall)
(118 primitiveDoPrimitiveWithArgs)
(119 primitiveFlushCacheSelective)
"Squeak 2.2 and earlier use 119. Squeak 2.3 and later use 116.
Both are supported for backward compatibility."
"Miscellaneous Primitives (120-127)"
(120 primitiveCalloutToFFI)
(121 primitiveImageName)
(122 primitiveNoop) "Blue Book: primitiveImageVolume"
(123 primitiveValueUninterruptably) "@@@: Remove this when all VMs have support"
(124 primitiveLowSpaceSemaphore)
(125 primitiveSignalAtBytesLeft)
"Squeak Primitives Start Here"
"Squeak Miscellaneous Primitives (128-149)"
(126 primitiveDeferDisplayUpdates)
(127 primitiveShowDisplayRect)
(128 primitiveArrayBecome)
(129 primitiveSpecialObjectsOop)
(130 primitiveFullGC)
(131 primitiveIncrementalGC)
(132 primitiveObjectPointsTo)
(133 primitiveSetInterruptKey)
(134 primitiveInterruptSemaphore)
(135 primitiveMillisecondClock)
(136 primitiveSignalAtMilliseconds)
(137 primitiveSecondsClock)
(138 primitiveSomeObject)
(139 primitiveNextObject)
(140 primitiveBeep)
(141 primitiveClipboardText)
(142 primitiveVMPath)
(143 primitiveShortAt)
(144 primitiveShortAtPut)
(145 primitiveConstantFill)
"NOTE: When removing the obsolete indexed primitives,
the following two should go become #primitiveIntegerAt / atPut"
(146 primitiveObsoleteIndexedPrimitive) "primitiveReadJoystick"
(147 primitiveObsoleteIndexedPrimitive) "primitiveWarpBits"
(148 primitiveClone)
(149 primitiveGetAttribute)
"File Primitives (150-169) - NO LONGER INDEXED"
(150 164 primitiveObsoleteIndexedPrimitive)
(165 primitiveIntegerAt) "hacked in here for now"
(166 primitiveIntegerAtPut)
(167 primitiveYield)
(168 primitiveCopyObject)
(169 primitiveObsoleteIndexedPrimitive)
"Sound Primitives (170-199) - NO LONGER INDEXED"
(170 185 primitiveObsoleteIndexedPrimitive)
"Old closure primitives"
(186 primitiveFail) "was primitiveClosureValue"
(187 primitiveFail) "was primitiveClosureValueWithArgs"
"Perform method directly"
(188 primitiveExecuteMethodArgsArray)
(189 primitiveExecuteMethod)
"Sound Primitives (continued) - NO LONGER INDEXED"
(190 194 primitiveObsoleteIndexedPrimitive)
"Unwind primitives"
(195 primitiveFindNextUnwindContext)
(196 primitiveTerminateTo)
(197 primitiveFindHandlerContext)
(198 primitiveMarkUnwindMethod)
(199 primitiveMarkHandlerMethod)
"Networking Primitives (200-225) - NO LONGER INDEXED"
(200 225 primitiveObsoleteIndexedPrimitive)
"Other Primitives (226-249)"
(226 primitiveFail)
(227 primitiveFail)
(228 primitiveFail)
(229 primitiveFail)
(230 primitiveRelinquishProcessor)
(231 primitiveForceDisplayUpdate)
(232 primitiveFormPrint)
(233 primitiveSetFullScreen)
(234 primitiveObsoleteIndexedPrimitive) "primBitmapdecompressfromByteArrayat"
(235 primitiveObsoleteIndexedPrimitive) "primStringcomparewithcollated"
(236 primitiveObsoleteIndexedPrimitive) "primSampledSoundconvert8bitSignedFromto16Bit"
(237 primitiveObsoleteIndexedPrimitive) "primBitmapcompresstoByteArray"
(238 241 primitiveObsoleteIndexedPrimitive) "serial port primitives"
(242 primitiveFail)
(243 primitiveObsoleteIndexedPrimitive) "primStringtranslatefromtotable"
(244 primitiveObsoleteIndexedPrimitive) "primStringfindFirstInStringinSetstartingAt"
(245 primitiveObsoleteIndexedPrimitive) "primStringindexOfAsciiinStringstartingAt"
(246 primitiveObsoleteIndexedPrimitive) "primStringfindSubstringinstartingAtmatchTable"
(247 primitiveSnapshotEmbedded)
(248 primitiveInvokeObjectAsMethod)
(249 primitiveArrayBecomeOneWayCopyHash)
"VM Implementor Primitives (250-255)"
(250 clearProfile)
(251 dumpProfile)
(252 startProfiling)
(253 stopProfiling)
(254 primitiveVMParameter)
(255 primitiveInstVarsPutFromStack) "Never used except in Disney tests. Remove after 2.3 release."
"Quick Push Const Methods"
(256 primitivePushSelf)
(257 primitivePushTrue)
(258 primitivePushFalse)
(259 primitivePushNil)
(260 primitivePushMinusOne)
(261 primitivePushZero)
(262 primitivePushOne)
(263 primitivePushTwo)
"Quick Push Const Methods"
(264 519 primitiveLoadInstVar)
(520 primitiveFail)
"MIDI Primitives (521-539) - NO LONGER INDEXED"
(521 529 primitiveObsoleteIndexedPrimitive)
(530 539 primitiveFail) "reserved for extended MIDI primitives"
"Experimental Asynchrous File Primitives - NO LONGER INDEXED"
(540 545 primitiveObsoleteIndexedPrimitive)
(546 547 primitiveFail)
"Pen Tablet Primitives - NO LONGER INDEXED"
(548 primitiveObsoleteIndexedPrimitive)
(549 primitiveObsoleteIndexedPrimitive)
"Sound Codec Primitives - NO LONGER INDEXED"
(550 553 primitiveObsoleteIndexedPrimitive)
(554 569 primitiveFail)
"External primitive support primitives"
(570 primitiveFlushExternalPrimitives)
(571 primitiveUnloadModule)
(572 primitiveListBuiltinModule)
(573 primitiveListExternalModule)
(574 primitiveFail) "reserved for addl. external support prims"
"Unassigned Primitives"
(575 primitiveFail)).
!
More information about the Vm-dev
mailing list