OLD | NEW |
1 // Inferno utils/5l/obj.c | 1 // Inferno utils/5l/obj.c |
2 // http://code.google.com/p/inferno-os/source/browse/utils/5l/obj.c | 2 // http://code.google.com/p/inferno-os/source/browse/utils/5l/obj.c |
3 // | 3 // |
4 // Copyright © 1994-1999 Lucent Technologies Inc. All rights reserved. | 4 // Copyright © 1994-1999 Lucent Technologies Inc. All rights reserved. |
5 // Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net) | 5 // Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net) |
6 // Portions Copyright © 1997-1999 Vita Nuova Limited | 6 // Portions Copyright © 1997-1999 Vita Nuova Limited |
7 // Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuov
a.com) | 7 // Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuov
a.com) |
8 // Portions Copyright © 2004,2006 Bruce Ellis | 8 // Portions Copyright © 2004,2006 Bruce Ellis |
9 // Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net) | 9 // Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net) |
10 // Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others | 10 // Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others |
(...skipping 88 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
99 if(c >= 0 && c < sizeof(debug)) | 99 if(c >= 0 && c < sizeof(debug)) |
100 debug[c]++; | 100 debug[c]++; |
101 break; | 101 break; |
102 case 'o': | 102 case 'o': |
103 outfile = EARGF(usage()); | 103 outfile = EARGF(usage()); |
104 break; | 104 break; |
105 case 'E': | 105 case 'E': |
106 INITENTRY = EARGF(usage()); | 106 INITENTRY = EARGF(usage()); |
107 break; | 107 break; |
108 case 'I': | 108 case 'I': |
| 109 debug['I'] = 1; // denote cmdline interpreter override |
109 interpreter = EARGF(usage()); | 110 interpreter = EARGF(usage()); |
110 break; | 111 break; |
111 case 'L': | 112 case 'L': |
112 Lflag(EARGF(usage())); | 113 Lflag(EARGF(usage())); |
113 break; | 114 break; |
114 case 'T': | 115 case 'T': |
115 INITTEXT = atolwhex(EARGF(usage())); | 116 INITTEXT = atolwhex(EARGF(usage())); |
116 break; | 117 break; |
117 case 'D': | 118 case 'D': |
118 INITDAT = atolwhex(EARGF(usage())); | 119 INITDAT = atolwhex(EARGF(usage())); |
(...skipping 620 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
739 appendp(Prog *q) | 740 appendp(Prog *q) |
740 { | 741 { |
741 Prog *p; | 742 Prog *p; |
742 | 743 |
743 p = prg(); | 744 p = prg(); |
744 p->link = q->link; | 745 p->link = q->link; |
745 q->link = p; | 746 q->link = p; |
746 p->line = q->line; | 747 p->line = q->line; |
747 return p; | 748 return p; |
748 } | 749 } |
OLD | NEW |