"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "src/compiler/ast-node-conv.bas" between
FreeBASIC-1.07.0-source.tar.gz and FreeBASIC-1.07.1-source.tar.gz

About: FreeBasic is a set of cross-platform development tools consisting of a compiler, GNU-based assembler, linker and archiver, and supporting runtime libraries, including a software-based graphics library.

ast-node-conv.bas  (FreeBASIC-1.07.0-source):ast-node-conv.bas  (FreeBASIC-1.07.1-source)
skipping to change at line 726 skipping to change at line 726
irSetVregDataType( vr, astGetFullType( n ), n->subtype ) irSetVregDataType( vr, astGetFullType( n ), n->subtype )
end if end if
end if end if
astDelNode( l ) astDelNode( l )
function = vr function = vr
end function end function
function astSkipConstCASTs( byval n as ASTNODE ptr ) as ASTNODE ptr
function = n
if( n->class = AST_NODECLASS_CONV ) then
if( n->cast.doconv = FALSE ) then
function = n->l
end if
end if
end function
function astSkipNoConvCAST( byval n as ASTNODE ptr ) as ASTNODE ptr function astSkipNoConvCAST( byval n as ASTNODE ptr ) as ASTNODE ptr
function = n function = n
if( n->class = AST_NODECLASS_CONV ) then if( n->class = AST_NODECLASS_CONV ) then
if( n->cast.doconv = FALSE and n->cast.convconst = FALSE ) then if( n->cast.doconv = FALSE and n->cast.convconst = FALSE ) then
function = n->l function = n->l
end if end if
end if end if
end function end function
function astRemoveNoConvCAST( byval n as ASTNODE ptr ) as ASTNODE ptr function astRemoveNoConvCAST( byval n as ASTNODE ptr ) as ASTNODE ptr
 End of changes. 1 change blocks. 
0 lines changed or deleted 9 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)