Changeset 3946 for to-imperative


Ignore:
Timestamp:
Sep 19, 2008, 4:15:52 PM (12 years ago)
Author:
yura
Message:
  • Library Compare
Location:
to-imperative/trunk/opents/samples
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/opents/samples/arithm.hh

    r3933 r3946  
    3434}
    3535
     36int Div (TExpr& _s1, TExpr& _s2, TExpr& _res) {
     37  TExpr e;
     38  ((Expr&) e).init(1);
     39  ((Expr&) e)[0].init_int(((Expr&)_s1)[0].data / ((Expr&)_s2)[0].data);
     40  _res = e;
     41  return 0;
     42}
     43
    3644}
    3745
Note: See TracChangeset for help on using the changeset viewer.