LEFT | RIGHT |
(no file at all) | |
1 // Inferno utils/6c/swt.c | 1 // Inferno utils/6c/swt.c |
2 // http://code.google.com/p/inferno-os/source/browse/utils/6c/swt.c | 2 // http://code.google.com/p/inferno-os/source/browse/utils/6c/swt.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 241 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
252 | 252 |
253 Bprint(&b, "\n"); | 253 Bprint(&b, "\n"); |
254 Bprint(&b, "$$ // exports\n\n"); | 254 Bprint(&b, "$$ // exports\n\n"); |
255 Bprint(&b, "$$ // local types\n\n"); | 255 Bprint(&b, "$$ // local types\n\n"); |
256 Bprint(&b, "$$ // dynimport\n"); | 256 Bprint(&b, "$$ // dynimport\n"); |
257 for(i=0; i<ndynimp; i++) | 257 for(i=0; i<ndynimp; i++) |
258 Bprint(&b, "dynimport %s %s %s\n", dynimp[i].local, dyni
mp[i].remote, dynimp[i].path); | 258 Bprint(&b, "dynimport %s %s %s\n", dynimp[i].local, dyni
mp[i].remote, dynimp[i].path); |
259 Bprint(&b, "\n$$ // dynexport\n"); | 259 Bprint(&b, "\n$$ // dynexport\n"); |
260 for(i=0; i<ndynexp; i++) | 260 for(i=0; i<ndynexp; i++) |
261 Bprint(&b, "dynexport %s %s\n", dynexp[i].local, dynexp[
i].remote); | 261 Bprint(&b, "dynexport %s %s\n", dynexp[i].local, dynexp[
i].remote); |
| 262 Bprint(&b, "\n$$ // dynlinker\n"); |
| 263 if(dynlinker != nil) { |
| 264 Bprint(&b, "dynlinker %s\n", dynlinker); |
| 265 } |
262 Bprint(&b, "\n$$\n\n"); | 266 Bprint(&b, "\n$$\n\n"); |
263 } | 267 } |
264 Bprint(&b, "!\n"); | 268 Bprint(&b, "!\n"); |
265 | 269 |
266 outhist(&b); | 270 outhist(&b); |
267 for(sym=0; sym<NSYM; sym++) { | 271 for(sym=0; sym<NSYM; sym++) { |
268 h[sym].sym = S; | 272 h[sym].sym = S; |
269 h[sym].type = 0; | 273 h[sym].type = 0; |
270 } | 274 } |
271 sym = 1; | 275 sym = 1; |
(...skipping 348 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
620 } | 624 } |
621 | 625 |
622 int32 | 626 int32 |
623 maxround(int32 max, int32 v) | 627 maxround(int32 max, int32 v) |
624 { | 628 { |
625 v += SZ_VLONG-1; | 629 v += SZ_VLONG-1; |
626 if(v > max) | 630 if(v > max) |
627 max = xround(v, SZ_VLONG); | 631 max = xround(v, SZ_VLONG); |
628 return max; | 632 return max; |
629 } | 633 } |
LEFT | RIGHT |