Changeset 55 for trunk/orca/op.c

Show
Ignore:
Timestamp:
02/18/06 18:19:46 (3 years ago)
Author:
krobillard
Message:

Implemented block parse.
orEqual() now works with words.
Added orDatatype macro.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/orca/op.c

    r54 r55  
    734734 
    735735            case OT_WORD: 
    736                 if( a->word.atom == b->word.atom ) 
     736                if( orAtom(a) == orAtom(b) ) 
    737737                    logic = 1; 
    738738                break; 
    … …  
    746746int orEqual( const OValue* a, const OValue* b ) 
    747747{ 
    748     if( orIs(a, OT_INTEGER) ) 
     748    if( orIsWord(orType(a)) && orIsWord(orType(b)) ) 
     749    { 
     750        if( orAtom(a) == orAtom(b) ) 
     751            return 1; 
     752    } 
     753    else if( orIs(a, OT_INTEGER) ) 
    749754    { 
    750755        if( orIs(b, OT_INTEGER) )