|
1 | 1 | /* Automatically generated by |
2 | | -CCodeGenerator VMMaker.oscog-eem.3721 uuid:f3895c70-5b57-4684-92f6-72aee920c70e |
| 2 | +CCodeGenerator VMMaker.oscog-eem.3724 uuid:4f19a1df-89b9-4dc2-9096-99d4c29a72b7 |
3 | 3 | (* Cog-eem.507, Compiler-eem.527) |
4 | 4 | from |
5 | | -SistaCogit VMMaker.oscog-eem.3721 uuid:f3895c70-5b57-4684-92f6-72aee920c70e |
| 5 | +SistaCogit VMMaker.oscog-eem.3724 uuid:4f19a1df-89b9-4dc2-9096-99d4c29a72b7 |
6 | 6 | */ |
7 | | -static char __buildInfo[] = "SistaCogit VMMaker.oscog-eem.3721 uuid:f3895c70-5b57-4684-92f6-72aee920c70e " __DATE__ ; |
| 7 | +static char __buildInfo[] = "SistaCogit VMMaker.oscog-eem.3724 uuid:4f19a1df-89b9-4dc2-9096-99d4c29a72b7 " __DATE__ ; |
8 | 8 | char *__cogitBuildInfo = __buildInfo; |
9 | 9 |
|
10 | 10 |
|
@@ -943,7 +943,7 @@ static sqInt genPrimitiveStringAtPut(void); |
943 | 943 | static NoDbgRegParms sqInt genRemoveSmallIntegerTagsInScratchReg(sqInt scratchReg); |
944 | 944 | static NoDbgRegParms sqInt genShiftAwaySmallIntegerTagsInScratchReg(sqInt scratchReg); |
945 | 945 | static NoDbgRegParms sqInt getLiteralCountOfplusOneinBytesintoscratch(sqInt methodReg, sqInt plusOne, sqInt inBytes, sqInt litCountReg, sqInt scratchReg); |
946 | | -static NoDbgRegParmssqInt inlineCacheTagForInstance(sqInt oop); |
| 946 | +static NoDbgRegParmsusqInt inlineCacheTagForInstance(sqInt oop); |
947 | 947 | static NoDbgRegParms AbstractInstruction * jumpNotSmallIntegerUnsignedValueInRegister(sqInt reg); |
948 | 948 | static NoDbgRegParms sqInt markAndTraceCacheTagLiteralinatpc(sqInt literal, CogMethod *cogMethodOrNil, usqInt address); |
949 | 949 | static NoDbgRegParms usqInt numCountersFor(usqInt theCounters); |
@@ -8494,7 +8494,7 @@ callCogCodePopReceiverAndClassRegs(void) |
8494 | 8494 | static NoDbgRegParms sqInt |
8495 | 8495 | ceCPICMissreceiver(CogMethod *cPIC, sqInt receiver) |
8496 | 8496 | { |
8497 | | -sqInt cacheTag; |
| 8497 | +usqInt cacheTag; |
8498 | 8498 | int errorSelectorOrNil; |
8499 | 8499 | sqInt methodOrSelectorIndex; |
8500 | 8500 | sqInt newTargetMethodOrNil; |
@@ -8603,7 +8603,7 @@ l1:; |
8603 | 8603 | static NoDbgRegParms sqInt |
8604 | 8604 | ceSICMiss(sqInt receiver) |
8605 | 8605 | { |
8606 | | -sqInt cacheTag; |
| 8606 | +usqInt cacheTag; |
8607 | 8607 | int errorSelectorOrNil; |
8608 | 8608 | sqInt extent; |
8609 | 8609 | usqInt innerReturn; |
@@ -13728,7 +13728,7 @@ void |
13728 | 13728 | linkSendAtintooffsetreceiver(sqInt callSiteReturnAddress, CogMethod *sendingMethod, CogMethod *targetMethod, sqInt theEntryOffset, sqInt receiver) |
13729 | 13729 | { |
13730 | 13730 | sqInt extent; |
13731 | | -sqInt inlineCacheTag; |
| 13731 | +usqInt inlineCacheTag; |
13732 | 13732 |
|
13733 | 13733 | assert((theEntryOffset == cmEntryOffset) |
13734 | 13734 | || (theEntryOffset == cmNoCheckEntryOffset)); |
@@ -16703,7 +16703,7 @@ l1:; |
16703 | 16703 | if (((cogMethod->cmType)) == CMOpenPIC) { |
16704 | 16704 | /* begin setCodeModified */ |
16705 | 16705 | codeModified = 1; |
16706 | | -addToOpenPICList(cogMethod); |
| 16706 | +addToOpenPICList(((CogMethod *) ((((usqInt)cogMethod)) + codeToDataDelta))); |
16707 | 16707 | } |
16708 | 16708 | } |
16709 | 16709 | cogMethod = ((CogMethod *) (roundUpToMethodAlignment(backEnd, (((usqInt)cogMethod)) + ((cogMethod->blockSize))))); |
@@ -23667,7 +23667,7 @@ getLiteralCountOfplusOneinBytesintoscratch(sqInt methodReg, sqInt plusOne, sqInt |
23667 | 23667 | c.f. getInlineCacheClassTagFrom:into: & inlineCacheTagForClass: */ |
23668 | 23668 |
|
23669 | 23669 | /* CogObjectRepresentationFor32BitSpur>>#inlineCacheTagForInstance: */ |
23670 | | -static NoDbgRegParmssqInt |
| 23670 | +static NoDbgRegParmsusqInt |
23671 | 23671 | inlineCacheTagForInstance(sqInt oop) |
23672 | 23672 | { |
23673 | 23673 | return (isImmediate(oop) |
@@ -33052,7 +33052,7 @@ genBinaryInlineComparisonopFalsedestReg(sqInt opTrue, sqInt opFalse, sqInt destR |
33052 | 33052 | AbstractInstruction *jump; |
33053 | 33053 | void *jumpTarget; |
33054 | 33054 | sqInt nExts; |
33055 | | -sqInt nextPC; |
| 33055 | +int nextPC; |
33056 | 33056 | sqInt nextPCSqInt; |
33057 | 33057 | sqInt postBranchPC; |
33058 | 33058 | sqInt postBranchPCSqInt; |
@@ -33787,7 +33787,7 @@ genByteEqualsInlinePrimitiveResultreturnReg(AbstractInstruction *jmp, sqInt reg) |
33787 | 33787 | void *jumpTarget; |
33788 | 33788 | AbstractInstruction *localJump; |
33789 | 33789 | sqInt nExts; |
33790 | | -sqInt nextPC; |
| 33790 | +int nextPC; |
33791 | 33791 | sqInt nextPCSqInt; |
33792 | 33792 | sqInt postBranchPC; |
33793 | 33793 | sqInt postBranchPCSqInt; |
|