diff options
| author | Richard Kistruck | 2006-04-07 15:56:43 +0100 |
|---|---|---|
| committer | Richard Kistruck | 2006-04-07 15:56:43 +0100 |
| commit | fc0b9bf4bacc4295a5c2d28740f56c6e29fa1bc3 (patch) | |
| tree | 3da68e5ba5660f9b96505e71ab63ab13e122a706 /mps/code | |
| parent | 75c828749cbd26057a4da970a63866ebf980be37 (diff) | |
| download | emacs-fc0b9bf4bacc4295a5c2d28740f56c6e29fa1bc3.tar.gz emacs-fc0b9bf4bacc4295a5c2d28740f56c6e29fa1bc3.zip | |
Mps: fix w3i3mv "all" build with vc6:
1. amsss.c: initialize ambigRoot (uninitialized warning);
2. commpost.nmk:
2a. drop long-vanished protcv.exe;
2b. mpmss.exe needs MVFF;
2c. locusss.exe had no build rule;
3. finaltest.c: main does not use argc,v so declare as main(void);
4. lockutw3.c: add parens to avoid operator-precedence warning;
5. protocol.h: s/interface/interfaceIn: suspected compiler bug.
Copied from Perforce
Change: 158054
ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code')
| -rw-r--r-- | mps/code/amsss.c | 2 | ||||
| -rw-r--r-- | mps/code/commpost.nmk | 12 | ||||
| -rw-r--r-- | mps/code/finaltest.c | 2 | ||||
| -rw-r--r-- | mps/code/lockutw3.c | 4 | ||||
| -rw-r--r-- | mps/code/protocol.h | 6 |
5 files changed, 15 insertions, 11 deletions
diff --git a/mps/code/amsss.c b/mps/code/amsss.c index 9c878a1934a..fa42abc2f05 100644 --- a/mps/code/amsss.c +++ b/mps/code/amsss.c | |||
| @@ -74,7 +74,7 @@ static mps_pool_debug_option_s freecheckOptions = | |||
| 74 | static void *test(void *arg, size_t haveAmbigous) | 74 | static void *test(void *arg, size_t haveAmbigous) |
| 75 | { | 75 | { |
| 76 | mps_pool_t pool; | 76 | mps_pool_t pool; |
| 77 | mps_root_t exactRoot, ambigRoot; | 77 | mps_root_t exactRoot, ambigRoot = NULL; |
| 78 | size_t lastStep = 0, i, r; | 78 | size_t lastStep = 0, i, r; |
| 79 | unsigned long objs; | 79 | unsigned long objs; |
| 80 | mps_ap_t busy_ap; | 80 | mps_ap_t busy_ap; |
diff --git a/mps/code/commpost.nmk b/mps/code/commpost.nmk index 8383548b710..36d34d41535 100644 --- a/mps/code/commpost.nmk +++ b/mps/code/commpost.nmk | |||
| @@ -16,7 +16,7 @@ | |||
| 16 | 16 | ||
| 17 | all: mpmss.exe amcss.exe amsss.exe amssshe.exe segsmss.exe awlut.exe awluthe.exe\ | 17 | all: mpmss.exe amcss.exe amsss.exe amssshe.exe segsmss.exe awlut.exe awluthe.exe\ |
| 18 | mpsicv.exe lockutw3.exe lockcov.exe poolncv.exe locv.exe qs.exe apss.exe \ | 18 | mpsicv.exe lockutw3.exe lockcov.exe poolncv.exe locv.exe qs.exe apss.exe \ |
| 19 | finalcv.exe finaltest.exe arenacv.exe bttest.exe teletest.exe protcv.exe \ | 19 | finalcv.exe finaltest.exe arenacv.exe bttest.exe teletest.exe \ |
| 20 | abqtest.exe cbstest.exe btcv.exe mv2test.exe messtest.exe steptest.exe \ | 20 | abqtest.exe cbstest.exe btcv.exe mv2test.exe messtest.exe steptest.exe \ |
| 21 | locbwcss.exe locusss.exe \ | 21 | locbwcss.exe locusss.exe \ |
| 22 | eventcnv.exe | 22 | eventcnv.exe |
| @@ -31,7 +31,7 @@ swall: mmsw.lib replaysw.exe | |||
| 31 | 31 | ||
| 32 | mpmss.exe amcss.exe amcsshe.exe amsss.exe amssshe.exe segsmss.exe awlut.exe awluthe.exe dwstress.exe \ | 32 | mpmss.exe amcss.exe amcsshe.exe amsss.exe amssshe.exe segsmss.exe awlut.exe awluthe.exe dwstress.exe \ |
| 33 | mpsicv.exe lockutw3.exe lockcov.exe poolncv.exe locv.exe qs.exe apss.exe \ | 33 | mpsicv.exe lockutw3.exe lockcov.exe poolncv.exe locv.exe qs.exe apss.exe \ |
| 34 | finalcv.exe finaltest.exe arenacv.exe bttest.exe teletest.exe protcv.exe \ | 34 | finalcv.exe finaltest.exe arenacv.exe bttest.exe teletest.exe \ |
| 35 | expt825.exe \ | 35 | expt825.exe \ |
| 36 | abqtest.exe cbstest.exe btcv.exe mv2test.exe messtest.exe steptest.exe \ | 36 | abqtest.exe cbstest.exe btcv.exe mv2test.exe messtest.exe steptest.exe \ |
| 37 | walkt0.exe locbwcss.exe locusss.exe \ | 37 | walkt0.exe locbwcss.exe locusss.exe \ |
| @@ -122,6 +122,7 @@ $(PFM)\$(VARIETY)\locv.exe: $(PFM)\$(VARIETY)\locv.obj \ | |||
| 122 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) $(LOOBJ) | 122 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) $(LOOBJ) |
| 123 | 123 | ||
| 124 | $(PFM)\$(VARIETY)\mpmss.exe: $(PFM)\$(VARIETY)\mpmss.obj \ | 124 | $(PFM)\$(VARIETY)\mpmss.exe: $(PFM)\$(VARIETY)\mpmss.obj \ |
| 125 | $(PFM)\$(VARIETY)\poolmvff.obj \ | ||
| 125 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) | 126 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) |
| 126 | 127 | ||
| 127 | $(PFM)\$(VARIETY)\apss.exe: $(PFM)\$(VARIETY)\apss.obj \ | 128 | $(PFM)\$(VARIETY)\apss.exe: $(PFM)\$(VARIETY)\apss.obj \ |
| @@ -140,9 +141,6 @@ $(PFM)\$(VARIETY)\lockcov.exe: $(PFM)\$(VARIETY)\lockcov.obj \ | |||
| 140 | $(PFM)\$(VARIETY)\lockutw3.exe: $(PFM)\$(VARIETY)\lockutw3.obj \ | 141 | $(PFM)\$(VARIETY)\lockutw3.exe: $(PFM)\$(VARIETY)\lockutw3.obj \ |
| 141 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) | 142 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) |
| 142 | 143 | ||
| 143 | $(PFM)\$(VARIETY)\protcv.exe: $(PFM)\$(VARIETY)\protcv.obj \ | ||
| 144 | $(MPMOBJ) $(PLINTHOBJ) | ||
| 145 | |||
| 146 | $(PFM)\$(VARIETY)\mpsicv.exe: $(PFM)\$(VARIETY)\mpsicv.obj \ | 144 | $(PFM)\$(VARIETY)\mpsicv.exe: $(PFM)\$(VARIETY)\mpsicv.obj \ |
| 147 | $(MPMOBJ) $(AMCOBJ) $(PLINTHOBJ) $(FMTTESTOBJ) \ | 145 | $(MPMOBJ) $(AMCOBJ) $(PLINTHOBJ) $(FMTTESTOBJ) \ |
| 148 | $(TESTLIBOBJ) | 146 | $(TESTLIBOBJ) |
| @@ -171,6 +169,10 @@ $(PFM)\$(VARIETY)\locbwcss.exe: $(PFM)\$(VARIETY)\locbwcss.obj \ | |||
| 171 | $(PFM)\$(VARIETY)\poolmvff.obj \ | 169 | $(PFM)\$(VARIETY)\poolmvff.obj \ |
| 172 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) | 170 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) |
| 173 | 171 | ||
| 172 | $(PFM)\$(VARIETY)\locusss.exe: $(PFM)\$(VARIETY)\locusss.obj \ | ||
| 173 | $(PFM)\$(VARIETY)\poolmvff.obj \ | ||
| 174 | $(MPMOBJ) $(PLINTHOBJ) $(TESTLIBOBJ) | ||
| 175 | |||
| 174 | $(PFM)\$(VARIETY)\dwstress.exe: $(PFM)\$(VARIETY)\dwstress.obj \ | 176 | $(PFM)\$(VARIETY)\dwstress.exe: $(PFM)\$(VARIETY)\dwstress.obj \ |
| 175 | $(DWOBJ) $(MPMOBJ) $(PLINTHOBJ) $(AMCOBJ) | 177 | $(DWOBJ) $(MPMOBJ) $(PLINTHOBJ) $(AMCOBJ) |
| 176 | 178 | ||
diff --git a/mps/code/finaltest.c b/mps/code/finaltest.c index bdfdda4be85..24a6e81b9eb 100644 --- a/mps/code/finaltest.c +++ b/mps/code/finaltest.c | |||
| @@ -241,7 +241,7 @@ static void *test(void *arg, size_t s) | |||
| 241 | } | 241 | } |
| 242 | 242 | ||
| 243 | 243 | ||
| 244 | int main(int argc, char **argv) | 244 | int main(void) |
| 245 | { | 245 | { |
| 246 | mps_arena_t arena; | 246 | mps_arena_t arena; |
| 247 | mps_thr_t thread; | 247 | mps_thr_t thread; |
diff --git a/mps/code/lockutw3.c b/mps/code/lockutw3.c index 5b29b3fd450..2565ec60796 100644 --- a/mps/code/lockutw3.c +++ b/mps/code/lockutw3.c | |||
| @@ -31,7 +31,7 @@ void incR(unsigned long i) | |||
| 31 | } | 31 | } |
| 32 | } else { | 32 | } else { |
| 33 | incR(i >> 1); | 33 | incR(i >> 1); |
| 34 | incR(i+1 >> 1); | 34 | incR( (i+1) >> 1); |
| 35 | } | 35 | } |
| 36 | LockReleaseRecursive(lock); | 36 | LockReleaseRecursive(lock); |
| 37 | } | 37 | } |
| @@ -39,7 +39,7 @@ void incR(unsigned long i) | |||
| 39 | 39 | ||
| 40 | void inc(unsigned long i) | 40 | void inc(unsigned long i) |
| 41 | { | 41 | { |
| 42 | incR(i+1>>1); | 42 | incR( (i+1) >>1); |
| 43 | i >>= 1; | 43 | i >>= 1; |
| 44 | while (i) { | 44 | while (i) { |
| 45 | LockClaim(lock); | 45 | LockClaim(lock); |
diff --git a/mps/code/protocol.h b/mps/code/protocol.h index 81f9b9bf511..4c70738e8f8 100644 --- a/mps/code/protocol.h +++ b/mps/code/protocol.h | |||
| @@ -102,20 +102,22 @@ typedef struct ProtocolInstStruct *ProtocolInst; | |||
| 102 | * If "pro" is an instance of "interface", then returns TRUE | 102 | * If "pro" is an instance of "interface", then returns TRUE |
| 103 | * and sets coerceResult to point directly to the part of "pro" | 103 | * and sets coerceResult to point directly to the part of "pro" |
| 104 | * which contains the slots for "interface" | 104 | * which contains the slots for "interface" |
| 105 | * RHSK 2006-04-05 s/interface/interfaceIn/: job000605, suspect msvc bug. | ||
| 105 | */ | 106 | */ |
| 106 | typedef Bool (*ProtocolCoerceInstMethod)(ProtocolInst *coerceResult, | 107 | typedef Bool (*ProtocolCoerceInstMethod)(ProtocolInst *coerceResult, |
| 107 | ProtocolInst pro, | 108 | ProtocolInst pro, |
| 108 | ProtocolClass interface); | 109 | ProtocolClass interfaceIn); |
| 109 | 110 | ||
| 110 | /* ProtocolCoerceClassMethod -- coerce "proClass" to an "interface" class | 111 | /* ProtocolCoerceClassMethod -- coerce "proClass" to an "interface" class |
| 111 | * | 112 | * |
| 112 | * If "proClass" is a subclass of "interface", then returns TRUE | 113 | * If "proClass" is a subclass of "interface", then returns TRUE |
| 113 | * and sets coerceResult to point directly to the part of | 114 | * and sets coerceResult to point directly to the part of |
| 114 | * "proClass" which contains the slots for "interface". | 115 | * "proClass" which contains the slots for "interface". |
| 116 | * RHSK 2006-04-05 s/interface/interfaceIn/: job000605, suspect msvc bug. | ||
| 115 | */ | 117 | */ |
| 116 | typedef Bool (*ProtocolCoerceClassMethod)(ProtocolClass *coerceResult, | 118 | typedef Bool (*ProtocolCoerceClassMethod)(ProtocolClass *coerceResult, |
| 117 | ProtocolClass proClass, | 119 | ProtocolClass proClass, |
| 118 | ProtocolClass interface); | 120 | ProtocolClass interfaceIn); |
| 119 | 121 | ||
| 120 | 122 | ||
| 121 | 123 | ||