Quick Search:

Mode

Context

Displaying 3 lines of context. None | Less | More | Full

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.1
 
1.2
 
MAIN:ragge:20020325225236
 
optim.c
_>1 -#ifndef lint
  1+#if 0
22 static char *sccsid ="@(#)optim.c       4.7 (Berkeley) 1/8/86";
<>3 -#endif lint
  3+#endif
44 
 55 # include "pass1.h"
 66 
     
 !
1717 
 1818 int oflag = 0;
 1919 
<> 20+/*
  21+ * fortran function arguments
  22+ */
2023 NODE *
<>21 -fortarg( p ) NODE *p; {
 22 -        /* fortran function arguments */
 23 -
  24+fortarg(NODE *p)
  25+{
2426         if( p->in.op == CM ){
 2527                 p->in.left = fortarg( p->in.left );
 2628                 p->in.right = fortarg( p->in.right );
 2729                 return(p);
<>28 -                }
  30+        }
2931 
 3032         while( ISPTR(p->in.type) ){
 3133                 p = buildtree( UNARY MUL, p, NIL );
<>32 -                }
 33 -        return( optim(p) );
3434         }
<> 35+        return( optim(p) );
  36+}
3537 
 3638         /* mapping relationals when the sides are reversed */
 3739 short revrel[] ={ EQ, NE, GE, GT, LE, LT, UGE, UGT, ULE, ULT };
<>38 -NODE *
 39 -optim(p) register NODE *p; {
 40 -        /* local optimizations, most of which are probably machine independent */
4140 
<>42 -        register o, ty;
  41+/*
  42+ * local optimizations, most of which are probably
  43+ * machine independent
  44+ */
  45+NODE *
  46+optim(NODE *p)
  47+{
  48+        int o, ty;
4349         NODE *sp;
 4450         int i;
 4551         TWORD t;
     
 !
268274         return(p);
 269275         }
 270276 
<>271 -ispow2( c ) CONSZ c; {
 272 -        register i;
  277+int
  278+ispow2(CONSZ c)
  279+{
  280+        int i;
273281         if( c <= 0 || (c&(c-1)) ) return(-1);
 274282         for( i=0; c>1; ++i) c >>= 1;
 275283         return(i);
<_276 -        }
  284+}
FishEye: Open Source License registered to PCC.
Your maintenance has expired. You can renew your license at http://www.atlassian.com/fisheye/renew
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-08-23 05:35 +0200