equal
deleted
inserted
replaced
94 pos = pos + len}; |
94 pos = pos + len}; |
95 |
95 |
96 |
96 |
97 (*** Formatting ***) |
97 (*** Formatting ***) |
98 |
98 |
99 val margin = ref 80 (*right margin, or page width*) |
99 val margin = ref 76 (*right margin, or page width*) |
100 and breakgain = ref 4 (*minimum added space required of a break*) |
100 and breakgain = ref 4 (*minimum added space required of a break*) |
101 and emergencypos = ref 40; (*position too far to right*) |
101 and emergencypos = ref 40; (*position too far to right*) |
102 |
102 |
103 fun setmargin m = |
103 fun setmargin m = |
104 (margin := m; |
104 (margin := m; |