diff options
Diffstat (limited to 'mps/code/format.c')
| -rw-r--r-- | mps/code/format.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/mps/code/format.c b/mps/code/format.c index 9867f562167..4aef38928fd 100644 --- a/mps/code/format.c +++ b/mps/code/format.c | |||
| @@ -26,7 +26,10 @@ Bool FormatCheck(Format format) | |||
| 26 | || format->variety == FormatVarietyAutoHeader); | 26 | || format->variety == FormatVarietyAutoHeader); |
| 27 | CHECKL(RingCheck(&format->arenaRing)); | 27 | CHECKL(RingCheck(&format->arenaRing)); |
| 28 | CHECKL(AlignCheck(format->alignment)); | 28 | CHECKL(AlignCheck(format->alignment)); |
| 29 | /* @@@@ alignment should be less than maximum allowed */ | 29 | /* TODO: Define the concept of the maximum alignment it is possible to |
| 30 | request from the MPS, document and provide an interface to it, and then | ||
| 31 | check that this alignment is not greater than that, as well as all other | ||
| 32 | alignments. */ | ||
| 30 | CHECKL(FUNCHECK(format->scan)); | 33 | CHECKL(FUNCHECK(format->scan)); |
| 31 | CHECKL(format->variety == FormatVarietyFixed | 34 | CHECKL(format->variety == FormatVarietyFixed |
| 32 | ? format->skip == NULL : FUNCHECK(format->skip)); | 35 | ? format->skip == NULL : FUNCHECK(format->skip)); |