diff options
| author | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:40:57 +0000 |
|---|---|---|
| committer | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:40:57 +0000 |
| commit | 26230a416563decd82a0af827c0987b8628c5ef9 (patch) | |
| tree | ff226c95db8ba7104bc0f8b1d16a3a4b481c6949 /z07.c | |
| parent | 51fe0cfa3e3ba27f55ff7d14a7fe077cc31ed0b7 (diff) | |
| download | lout-26230a416563decd82a0af827c0987b8628c5ef9.tar.gz | |
Lout 3.34.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@37 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'z07.c')
| -rw-r--r-- | z07.c | 9 |
1 files changed, 5 insertions, 4 deletions
@@ -1,7 +1,7 @@ /*@z07.c:Object Service:SplitIsDefinite(), DisposeObject()@*******************/ /* */ -/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.33) */ -/* COPYRIGHT (C) 1991, 2006 Jeffrey H. Kingston */ +/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.34) */ +/* COPYRIGHT (C) 1991, 2007 Jeffrey H. Kingston */ /* */ /* Jeffrey H. Kingston (jeff@it.usyd.edu.au) */ /* School of Information Technologies */ @@ -219,8 +219,7 @@ OBJECT CopyObject(OBJECT x, FILE_POS *pos) case GAP_OBJ: New(res, GAP_OBJ); - mark(gap(res)) = mark(gap(x)); - join(gap(res)) = join(gap(x)); + GapCopy(gap(res), gap(x)); hspace(res) = hspace(x); vspace(res) = vspace(x); if( Down(x) != x ) @@ -280,6 +279,8 @@ OBJECT CopyObject(OBJECT x, FILE_POS *pos) case SPACE: case YUNIT: case ZUNIT: + case SET_CONTEXT: + case GET_CONTEXT: case BREAK: case UNDERLINE: case COLOUR: |