Mercurial > hg > xemacs-beta
comparison lib-src/ad2c @ 0:376386a54a3c r19-14
Import from CVS: tag r19-14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:45:50 +0200 |
parents | |
children | ac2d302a0011 26a007fa2f4c |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:376386a54a3c |
---|---|
1 #!/bin/sh | |
2 # | |
3 # ad2c : Convert app-defaults file to C strings decls. | |
4 # | |
5 # George Ferguson, ferguson@cs.rcohester.edu, 12 Nov 1990. | |
6 # 19 Mar 1991 : gf | |
7 # Made it self-contained. | |
8 # 6 Jan 1992 : mycroft@gnu.ai.mit.edu (Charles Hannum) | |
9 # Removed use of "-n" and ":read" label since Gnu and | |
10 # IBM sed print pattern space on "n" command. Still works | |
11 # with Sun sed, of course. | |
12 # 7 Jan 1992: matthew@sunpix.East.Sun.COM (Matthew Stier) | |
13 # Escape quotes after escaping backslashes. | |
14 # | |
15 # Synched up with: Not in FSF. | |
16 | |
17 sed ' | |
18 /^!/d | |
19 /^$/d | |
20 s/\\/\\\\/g | |
21 s/\\$//g | |
22 s/"/\\"/g | |
23 s/^/"/ | |
24 : test | |
25 /\\$/b slash | |
26 s/$/",/ | |
27 p | |
28 d | |
29 : slash | |
30 n | |
31 /^!/d | |
32 /^$/d | |
33 s/"/\\"/g | |
34 s/\\\\/\\/g | |
35 s/\\n/\\\\n/g | |
36 s/\\t/\\\\t/g | |
37 s/\\f/\\\\f/g | |
38 s/\\b/\\\\b/g | |
39 b test' "$@" |