Changeset 52f85e0 for src/examples/sum.c


Ignore:
Timestamp:
Feb 10, 2016, 3:57:00 PM (8 years ago)
Author:
Peter A. Buhr <pabuhr@…>
Branches:
ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, ctor, deferred_resn, demangler, enum, forall-pointer-decay, gc_noraii, jacob/cs343-translation, jenkins-sandbox, master, memory, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, string, with_gc
Children:
6ba0659, cce7872
Parents:
bd85400
Message:

syslib updates and examples, formatting, make double 0 work

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/examples/sum.c

    rbd85400 r52f85e0  
    1010// Created On       : Wed May 27 17:56:53 2015
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Fri Feb  5 16:47:44 2016
    13 // Update Count     : 139
     12// Last Modified On : Sat Feb  6 11:57:42 2016
     13// Update Count     : 182
    1414//
    1515
     
    3333
    3434// Required to satisfy sumable as char does not have addition.
    35 // const char 0;
    36 // char ?+?( char op1, char op2 ) { return (int)op1 + op2; } // cast forces integer addition or recursion
    37 // char ++?( char *op ) { *op += 1; return *op; }
    38 // char ?++( char *op ) { char temp = *op; *op += 1; return temp; }
     35const char 0;
     36char ?+?( char t1, char t2 ) { return (int)t1 + t2; }   // cast forces integer addition, otherwise recursion
     37char ?+=?( char *t1, char t2 ) { *t1 = *t1 + t2; return *t1; }
     38char ++?( char *t ) { *t += 1; return *t; }
     39char ?++( char *t ) { char temp = *t; *t += 1; return temp; }
    3940
    4041int main( void ) {
    4142        const int low = 5, High = 15, size = High - low;
    4243        ofstream *sout = ofstream_stdout();
    43 #if 0
    4444
    45         char s = 0, a[size];
    46         char v = low;
     45        char s = 0, a[size], v = low;
    4746        for ( int i = 0; i < size; i += 1, v += 1 ) {
    4847                s += v;
    4948                a[i] = v;
    50         }
     49        } // for
    5150        sout | "sum from " | low | " to " | High | " is "
    5251                 | (int)sum( size, a ) | ", check " | (int)s | endl;
    5352
    54         int s = 0, a[size];
    55         int v = low;
     53        int s = 0, a[size], v = low;
    5654        for ( int i = 0; i < size; i += 1, v += 1 ) {
    5755                s += (int)v;
    5856                a[i] = (int)v;
    59         }
     57        } // for
    6058        sout | "sum from " | low | " to " | High | " is "
    6159                 | sum( size, (int *)a ) | ", check " | (int)s | endl;
    6260
    63         float s = 0.0, a[size];
    64         float v = low / 10.0;
     61        float s = 0.0, a[size], v = low / 10.0;
    6562        for ( int i = 0; i < size; i += 1, v += 0.1f ) {
    6663                s += (float)v;
    6764                a[i] = (float)v;
    68         }
     65        } // for
    6966        sout | "sum from " | low / 10.0 | " to " | High / 10.0 | " is "
    7067                 | sum( size, (float *)a ) | ", check " | (float)s | endl;
    71 #endif
    72         double s = 0, a[size];
    73         double v = low / 10.0;
    7468
     69        double s = 0, a[size], v = low / 10.0;
    7570        for ( int i = 0; i < size; i += 1, v += 0.1 ) {
    7671                s += (double)v;
    7772                a[i] = (double)v;
    78         }
     73        } // for
    7974        sout | "sum from " | low / 10.0 | " to " | High / 10.0 | " is "
    8075                 | sum( size, (double *)a ) | ", check " | (double)s | endl;
    8176
    82         // struct S { int i, j; } sarr[size];
    83         // struct S 0 = { 0, 0 };
    84         // struct S 1 = { 1, 1 };
    85         // S ?+?( S t1, S t2 ) { S s = { t1.i + t1.j, t2.i + t2.j }; return s; }
    86         // S ?+=?( S *t1, S t2 ) { *t1 = *t1 + t2; return *t1; }
    87         // S ++?( S *t ) { *t += 1; return *t; }
    88         // S ?++( S *t ) { S temp = *t; *t += 1; return temp; }
    89         // sum( size, sarr );
     77        struct S { int i, j; } 0 = { 0, 0 }, 1 = { 1, 1 };
     78        S ?+?( S t1, S t2 ) { S s = { t1.i + t2.i, t1.j + t2.j }; return s; }
     79        S ?+=?( S *t1, S t2 ) { *t1 = *t1 + t2; return *t1; }
     80        S ++?( S *t ) { *t += 1; return *t; }
     81        S ?++( S *t ) { S temp = *t; *t += 1; return temp; }
     82        ofstream * ?|?( ofstream * os, S v ) { return os | v.i | ' ' | v.j; }
     83
     84        S s = 0, a[size], v = { low, low };
     85        for ( int i = 0; i < size; i += 1, v += (S)1 ) {
     86                s += (S)v;
     87                a[i] = (S)v;
     88        } // for
     89        sout | "sum from " | low | " to " | High | " is "
     90                 | sum( size, (S *)a ) | ", check " | (S)s | endl;
    9091} // main
    9192
Note: See TracChangeset for help on using the changeset viewer.