aboutsummaryrefslogtreecommitdiffstats
path: root/mps/code/buffer.c
diff options
context:
space:
mode:
authorRichard Kistruck2007-03-22 14:57:29 +0000
committerRichard Kistruck2007-03-22 14:57:29 +0000
commit8bf324c5523c05002ca12d0b8681e3fa9528c9d5 (patch)
treec1c99d34f48c983ccdd16906087f0516685e1730 /mps/code/buffer.c
parent1c7dc02bda03b3aec59f47d601fcb5c1398e4bed (diff)
downloademacs-8bf324c5523c05002ca12d0b8681e3fa9528c9d5.tar.gz
emacs-8bf324c5523c05002ca12d0b8681e3fa9528c9d5.zip
Mps br/unfixed-summary: good: tidy bufferdescribe and amcsegdescribe.
Copied from Perforce Change: 161982 ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code/buffer.c')
-rw-r--r--mps/code/buffer.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/mps/code/buffer.c b/mps/code/buffer.c
index b4c210882f5..e55c12a7e8d 100644
--- a/mps/code/buffer.c
+++ b/mps/code/buffer.c
@@ -147,16 +147,16 @@ Bool BufferCheck(Buffer buffer)
147Res BufferDescribe(Buffer buffer, mps_lib_FILE *stream) 147Res BufferDescribe(Buffer buffer, mps_lib_FILE *stream)
148{ 148{
149 Res res; 149 Res res;
150 char aczMode[5]; 150 char abzMode[5];
151 151
152 if (!CHECKT(Buffer, buffer)) return ResFAIL; 152 if (!CHECKT(Buffer, buffer)) return ResFAIL;
153 if (stream == NULL) return ResFAIL; 153 if (stream == NULL) return ResFAIL;
154 154
155 aczMode[0] = (buffer->mode & BufferModeTRANSITION) ? 't' : '_'; 155 abzMode[0] = (buffer->mode & BufferModeTRANSITION) ? 't' : '_';
156 aczMode[1] = (buffer->mode & BufferModeLOGGED) ? 'l' : '_'; 156 abzMode[1] = (buffer->mode & BufferModeLOGGED) ? 'l' : '_';
157 aczMode[2] = (buffer->mode & BufferModeFLIPPED) ? 'f' : '_'; 157 abzMode[2] = (buffer->mode & BufferModeFLIPPED) ? 'f' : '_';
158 aczMode[3] = (buffer->mode & BufferModeATTACHED) ? 'a' : '_'; 158 abzMode[3] = (buffer->mode & BufferModeATTACHED) ? 'a' : '_';
159 aczMode[4] = '\0'; 159 abzMode[4] = '\0';
160 160
161 res = WriteF(stream, 161 res = WriteF(stream,
162 "Buffer $P ($U) {\n", 162 "Buffer $P ($U) {\n",
@@ -168,7 +168,7 @@ Res BufferDescribe(Buffer buffer, mps_lib_FILE *stream)
168 buffer->isMutator ? 168 buffer->isMutator ?
169 " Mutator Buffer\n" : " Internal Buffer\n", 169 " Mutator Buffer\n" : " Internal Buffer\n",
170 " mode $S (TRANSITION, LOGGED, FLIPPED, ATTACHED)\n", 170 " mode $S (TRANSITION, LOGGED, FLIPPED, ATTACHED)\n",
171 (WriteFS)aczMode, 171 (WriteFS)abzMode,
172 " fillSize $UKb\n", (WriteFU)(buffer->fillSize / 1024), 172 " fillSize $UKb\n", (WriteFU)(buffer->fillSize / 1024),
173 " emptySize $UKb\n", (WriteFU)(buffer->emptySize / 1024), 173 " emptySize $UKb\n", (WriteFU)(buffer->emptySize / 1024),
174 " alignment $W\n", (WriteFW)buffer->alignment, 174 " alignment $W\n", (WriteFW)buffer->alignment,