3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright 2003 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
28 /* All Rights Reserved */
29
30 /*
31 * University Copyright- Copyright (c) 1982, 1986, 1988
32 * The Regents of the University of California
33 * All Rights Reserved
34 *
35 * University Acknowledgment- Portions of this document are derived from
36 * software developed by the University of California, Berkeley, and its
37 * contributors.
38 */
39
40 #include "tdef.h"
41 #include "tw.h"
42 #include "ext.h"
184 }
185 } else if (i == '(') { /* \s(dd */
186 getch();
187 getch();
188 } else if (i == '+' || i == '-') { /* \s+, \s- */
189 j = cbits(getch());
190 if (ischar(j) && isdigit(j)) { /* \s+d, \s-d */
191 ;
192 } else if (j == '(') { /* \s+(dd, \s-(dd */
193 getch();
194 getch();
195 }
196 }
197
198 return (0);
199 }
200
201
202 tchar setht() /* set character height from \H'...' */
203 {
204 int n;
205 tchar c;
206
207 getch();
208 n = inumb(&apts);
209 getch();
210 return(0);
211 }
212
213
214 tchar setslant() /* set slant from \S'...' */
215 {
216 int n;
217 tchar c;
218
219 getch();
220 n = 0;
221 n = inumb(&n);
222 getch();
223 return(0);
224 }
225
226
227 int
228 caseft()
|
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright 2017 Gary Mills
24 * Copyright 2003 Sun Microsystems, Inc. All rights reserved.
25 * Use is subject to license terms.
26 */
27
28 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
29 /* All Rights Reserved */
30
31 /*
32 * University Copyright- Copyright (c) 1982, 1986, 1988
33 * The Regents of the University of California
34 * All Rights Reserved
35 *
36 * University Acknowledgment- Portions of this document are derived from
37 * software developed by the University of California, Berkeley, and its
38 * contributors.
39 */
40
41 #include "tdef.h"
42 #include "tw.h"
43 #include "ext.h"
185 }
186 } else if (i == '(') { /* \s(dd */
187 getch();
188 getch();
189 } else if (i == '+' || i == '-') { /* \s+, \s- */
190 j = cbits(getch());
191 if (ischar(j) && isdigit(j)) { /* \s+d, \s-d */
192 ;
193 } else if (j == '(') { /* \s+(dd, \s-(dd */
194 getch();
195 getch();
196 }
197 }
198
199 return (0);
200 }
201
202
203 tchar setht() /* set character height from \H'...' */
204 {
205 tchar c;
206
207 getch();
208 (void) inumb(&apts);
209 getch();
210 return(0);
211 }
212
213
214 tchar setslant() /* set slant from \S'...' */
215 {
216 int n;
217 tchar c;
218
219 getch();
220 n = 0;
221 n = inumb(&n);
222 getch();
223 return(0);
224 }
225
226
227 int
228 caseft()
|