[ca8824d] | 1 | //
|
---|
| 2 | // Cforall Version 1.0.0 Copyright (C) 2019 University of Waterloo
|
---|
| 3 | //
|
---|
| 4 | // manipulatorsOutput1.cfa --
|
---|
| 5 | //
|
---|
| 6 | // Author : Peter A. Buhr
|
---|
| 7 | // Created On : Sat Jun 8 18:04:11 2019
|
---|
| 8 | // Last Modified By : Peter A. Buhr
|
---|
[0effb6a] | 9 | // Last Modified On : Sat Apr 10 08:42:15 2021
|
---|
| 10 | // Update Count : 18
|
---|
[ca8824d] | 11 | //
|
---|
| 12 |
|
---|
| 13 | #include <fstream.hfa>
|
---|
| 14 |
|
---|
| 15 | int main() {
|
---|
| 16 | sout | "signed char";
|
---|
| 17 | signed char sc = -12;
|
---|
| 18 | printf( "%hhd %2hhd %5.2hhd %-5.2hhd %hho %#hho %hhx %#hhx %#8hhx %#8.10hhx %#8.3hhX %+-8.3hhd %08hhd\n", sc, sc, sc, sc, sc, sc, sc, sc, sc, sc, sc, sc, sc );
|
---|
[d6566c1] | 19 | sout | sc | wd(2,sc) | wd(5,2,sc) | left(wd(5,2,sc)) | nobase(oct(sc)) | oct(sc) | nonl;
|
---|
| 20 | sout | nobase(hex(sc)) | hex(sc) | wd(8,hex(sc)) | wd(8,10,hex(sc)) | upcase(wd(8,3,hex(sc))) | nonl;
|
---|
| 21 | sout | left(sign(upcase(wd(8,3,sc)))) | pad0(wd(8,sc));
|
---|
[ca8824d] | 22 |
|
---|
| 23 | sout | "unsigned char";
|
---|
| 24 | unsigned char usc = 12;
|
---|
| 25 | printf( "%hhu %2hhu %5.2hhu %-5.2hhu %hho %#hho %hhx %#hhx %#8hhx %#8.10hhx %#8.3hhX %-8.3hhu %08hhu\n", usc, usc, usc, usc, usc, usc, usc, usc, usc, usc, usc, usc, usc );
|
---|
[d6566c1] | 26 | sout | usc | wd(2,usc) | wd(5,2,usc) | left(wd(5,2,usc)) | nobase(oct(usc)) | oct(usc) | nonl;
|
---|
| 27 | sout | nobase(hex(usc)) | hex(usc) | wd(8,hex(usc)) | wd(8,10,hex(usc)) | upcase(wd(8,3,hex(usc))) | nonl;
|
---|
| 28 | sout | left(upcase(wd(8,3,usc))) | pad0(wd(8,usc));
|
---|
[ca8824d] | 29 |
|
---|
| 30 | sout | "signed short int";
|
---|
| 31 | signed short int si = -12;
|
---|
| 32 | printf( "%hd %2hd %5.2hd %-5.2hd %ho %#ho %hx %#hx %#8hx %#8.10hx %#8.3hX %+-8.3hd %08hd\n", si, si, si, si, si, si, si, si, si, si, si, si, si );
|
---|
[d6566c1] | 33 | sout | si | wd(2,si) | wd(5,2,si) | left(wd(5,2,si)) | nobase(oct(si)) | oct(si) | nonl;
|
---|
| 34 | sout | nobase(hex(si)) | hex(si) | wd(8,hex(si)) | wd(8,10,hex(si)) | upcase(wd(8,3,hex(si))) | nonl;
|
---|
| 35 | sout | left(sign(upcase(wd(8,3,si)))) | pad0(wd(8,si));
|
---|
[ca8824d] | 36 |
|
---|
| 37 | sout | "unsigned short int";
|
---|
| 38 | unsigned short int usi = 12;
|
---|
| 39 | printf( "%hu %2hu %5.2hu %-5.2hu %ho %#ho %hx %#hx %#8hx %#8.10hx %#8.3hX %-8.3hu %08hu\n", usi, usi, usi, usi, usi, usi, usi, usi, usi, usi, usi, usi, usi );
|
---|
[d6566c1] | 40 | sout | usi | wd(2,usi) | wd(5,2,usi) | left(wd(5,2,usi)) | nobase(oct(usi)) | oct(usi) | nonl;
|
---|
| 41 | sout | nobase(hex(usi)) | hex(usi) | wd(8,hex(usi)) | wd(8,10,hex(usi)) | upcase(wd(8,3,hex(usi))) | nonl;
|
---|
| 42 | sout | left(upcase(wd(8,3,usi))) | pad0(wd(8,usi));
|
---|
[ca8824d] | 43 |
|
---|
| 44 | sout | "signed int";
|
---|
| 45 | signed int i = -12;
|
---|
| 46 | printf( "%d %2d %5.2d %-5.2d %o %#o %x %#x %#8x %#8.10x %#8.3X %+-8.3d %08d\n", i, i, i, i, i, i, i, i, i, i, i, i, i );
|
---|
[d6566c1] | 47 | sout | i | wd(2,i) | wd(5,2,i) | left(wd(5,2,i)) | nobase(oct(i)) | oct(i) | nonl;
|
---|
| 48 | sout | nobase(hex(i)) | hex(i) | wd(8,hex(i)) | wd(8,10,hex(i)) | upcase(wd(8,3,hex(i))) | nonl;
|
---|
| 49 | sout | left(sign(upcase(wd(8,3,i)))) | pad0(wd(8,i));
|
---|
[ca8824d] | 50 |
|
---|
| 51 | sout | "unsigned int";
|
---|
| 52 | unsigned int ui = 12;
|
---|
| 53 | printf( "%u %2u %5.2u %-5.2u %o %#o %x %#x %#8x %#8.10x %#8.3X %-8.3u %08u\n", ui, ui, ui, ui, ui, ui, ui, ui, ui, ui, ui, ui, ui );
|
---|
[d6566c1] | 54 | sout | ui | wd(2,ui) | wd(5,2,ui) | left(wd(5,2,ui)) | nobase(oct(ui)) | oct(ui) | nonl;
|
---|
| 55 | sout | nobase(hex(ui)) | hex(ui) | wd(8,hex(ui)) | wd(8,10,hex(ui)) | upcase(wd(8,3,hex(ui))) | nonl;
|
---|
| 56 | sout | left(upcase(wd(8,3,ui))) | pad0(wd(8,ui));
|
---|
[ca8824d] | 57 |
|
---|
| 58 | sout | "signed long long int";
|
---|
| 59 | signed long long int lli = -12;
|
---|
| 60 | printf( "%lld %2lld %5.2lld %-5.2lld %llo %#llo %llx %#llx %#8llx %#8.10llx %#8.3llX %+-8.3lld %08lld\n", lli, lli, lli, lli, lli, lli, lli, lli, lli, lli, lli, lli, lli );
|
---|
[d6566c1] | 61 | sout | lli | wd(2,lli) | wd(5,2,lli) | left(wd(5,2,lli)) | nobase(oct(lli)) | oct(lli) | nonl;
|
---|
| 62 | sout | nobase(hex(lli)) | hex(lli) | wd(8,hex(lli)) | wd(8,10,hex(lli)) | upcase(wd(8,3,hex(lli))) | nonl;
|
---|
| 63 | sout | left(sign(upcase(wd(8,3,lli)))) | pad0(wd(8,lli));
|
---|
[ca8824d] | 64 |
|
---|
| 65 | sout | "unsigned long long int";
|
---|
| 66 | unsigned long long int ulli = 12;
|
---|
| 67 | printf( "%llu %2llu %5.2llu %-5.2llu %llo %#llo %llx %#llx %#8llx %#8.10llx %#8.3llX %-8.3llu %08llu\n", ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli, ulli );
|
---|
[d6566c1] | 68 | sout | ulli | wd(2,ulli) | wd(5,2,ulli) | left(wd(5,2,ulli)) | nobase(oct(ulli)) | oct(ulli) | nonl;
|
---|
| 69 | sout | nobase(hex(ulli)) | hex(ulli) | wd(8,hex(ulli)) | wd(8,10,hex(ulli)) | upcase(wd(8,3,hex(ulli))) | nonl;
|
---|
| 70 | sout | left(upcase(wd(8,3,ulli))) | pad0(wd(8,ulli));
|
---|
[ca8824d] | 71 |
|
---|
| 72 | sout | nl | "binary integral";
|
---|
[d6566c1] | 73 | sout | bin(0) | bin(13) | upcase(bin(13)) | nobase(bin(13)) | left(wd(8,bin(13))) | wd(8,bin(13)) | nonl;
|
---|
| 74 | sout | pad0(left(wd(8,bin(13)))) | pad0(wd(8,bin(13))) | pad0(wd(8,10,bin(13))) | pad0(wd(8,6,bin(13)));
|
---|
[ca8824d] | 75 |
|
---|
| 76 |
|
---|
| 77 | sout | nl | "float";
|
---|
| 78 | float f = 3.537;
|
---|
| 79 | printf( "%g %8g %#8g %g %8g %8.0g %#8.0g %8.2g %#8.2g %-8.2g %-8.2g %-#8.2g %-+8.2g %-+#8.2g %08.2g %8.2E %8.2a %#8.2A %#8.2e\n",
|
---|
| 80 | 0.0,3.0F,3.0F, f, f, f, f, f, f, 3.0F, f, f, f, f, f, f, f, f, f );
|
---|
[d6566c1] | 81 | sout | 0.0 | wd(8, 3.0F) | nodp(wd(8, 3.0F)) | f | wd(8, f) | ws(8,0, f) | nodp(ws(8,0, f)) | ws(8,2, f) | nodp(ws(8,2, f)) | nonl;
|
---|
| 82 | sout | left(ws(8,2, 3.0F)) | left(ws(8,2, f)) | left(nodp(ws(8,2, f))) | left(sign(ws(8,2, f))) | left(sign(nodp(ws(8,2, f)))) | nonl;
|
---|
| 83 | sout | pad0(ws(8,2, f)) | upcase(wd(8,2, sci(f))) | wd(8,2, hex(f)) | upcase(wd(8,2, hex(f))) | nodp(wd(8,2, sci(f)));
|
---|
[ca8824d] | 84 |
|
---|
| 85 | sout | "double";
|
---|
| 86 | double d = 3.537;
|
---|
[0effb6a] | 87 | printf( "%g %8g %#8g %g %8g %8.0g %#8.0g %8.2g %#8.2g %-8.2g %-8.2g %-#8.2g %-+8.2g %-+#8.2g %08.2g %8.2E %8.2a %#8.2A %#8.2e\n",
|
---|
| 88 | 0.0, 3.0, 3.0, d, d, d, d, d, d, 3.0, d, d, d, d, d, d, d, d, d );
|
---|
| 89 | sout | 0.0 | wd(8, 3.0) | nodp(wd(8, 3.0)) | d | wd(8, d) | ws(8,0, d) | nodp(ws(8,0, d)) | ws(8,2, d) | nodp(ws(8,2, d)) | nonl;
|
---|
| 90 | sout | left(ws(8,2, 3.0)) | left(ws(8,2, d)) | left(nodp(ws(8,2, d))) | left(sign(ws(8,2, d))) | left(sign(nodp(ws(8,2, d)))) | nonl;
|
---|
| 91 | sout | pad0(ws(8,2, d)) | upcase(wd(8,2, sci(d))) | wd(8,2, hex(d)) | upcase(wd(8,2, hex(d))) | nodp(wd(8,2, sci(d)));
|
---|
[ca8824d] | 92 |
|
---|
| 93 | sout | "long double";
|
---|
| 94 | long double ld = 3.537;
|
---|
[0effb6a] | 95 | printf( "%Lg %8Lg %#8Lg %Lg %8Lg %8.0Lg %#8.0Lg %8.2Lg %#8.2Lg %-8.2Lg %-8.2Lg %-#8.2Lg %-+8.2Lg %-+#8.2Lg %08.2Lg %8.2LE %8.2La %#8.2LA %#8.2Le\n",
|
---|
| 96 | 0.0L, 3.0L, 3.0L, ld, ld, ld, ld, ld, ld, 3.0L, ld, ld, ld, ld, ld, ld, ld, ld, ld );
|
---|
| 97 | sout | 0.0L | wd(8, 3.0L) | nodp(wd(8, 3.0L)) | ld | wd(8, ld) | ws(8,0, ld) | nodp(ws(8,0, ld)) | ws(8,2, ld) | nodp(ws(8,2, ld)) | nonl;
|
---|
| 98 | sout | left(ws(8,2, 3.0L)) | left(ws(8,2, ld)) | left(nodp(ws(8,2, ld))) | left(sign(ws(8,2, ld))) | left(sign(nodp(ws(8,2, ld)))) | nonl;
|
---|
| 99 | sout | pad0(ws(8,2, ld)) | upcase(wd(8,2, sci(ld))) | wd(8,2, hex(ld)) | upcase(wd(8,2, hex(ld))) | nodp(wd(8,2, sci(ld)));
|
---|
[ca8824d] | 100 |
|
---|
| 101 | sout | nl | "char";
|
---|
| 102 | char c = 'a';
|
---|
| 103 | printf( "%c %2c %5c %-5c %hho %#hho %hhx %#hhx %#8hhx %#8hhX %-8c %8c\n", c, c, c, c, c, c, c, c, c, c, c, c );
|
---|
[d6566c1] | 104 | sout | c | ' ' | wd(2,c) | wd(5,c) | left(wd(5,c)) | nobase(oct(c)) | oct(c) | nonl;
|
---|
| 105 | sout | nobase(hex(c)) | hex(c) | wd(8,hex(c)) | upcase(wd(8,hex(c))) | left(wd(8,c)) | wd(8,c);
|
---|
[ca8824d] | 106 |
|
---|
| 107 | sout | nl | "string";
|
---|
| 108 | const char * s = "abcd";
|
---|
| 109 | printf( "%s %8s %6.8s %-8s\n", s, s, s, s );
|
---|
| 110 | sout | s | wd(8,s) | wd(6,8,s) | left(wd(8,s));
|
---|
| 111 |
|
---|
| 112 | sout | nl | "binary string";
|
---|
| 113 | sout | bin("0") | bin(s) | oct(s) | hex(s);
|
---|
| 114 | sout | nobase(bin("0")) | nobase(bin(s)) | nobase(oct(s)) | nobase(hex(s));
|
---|
| 115 | sout | nobase(wd(8,bin("0"))) | nobase(wd(8,bin(s))) | nobase(wd(4,oct(s))) | nobase(wd(3,hex(s)));
|
---|
| 116 | }
|
---|
| 117 |
|
---|
| 118 | // Local Variables: //
|
---|
| 119 | // tab-width: 4 //
|
---|
[0effb6a] | 120 | // compile-command: "cfa -Wall -Wextra manipulatorsOutput1.cfa" //
|
---|
[ca8824d] | 121 | // End: //
|
---|