/*
* Copyright 2010 JBoss Inc
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package org.drools.clips.functions;
import org.drools.clips.Appendable;
import org.drools.clips.Function;
import org.drools.clips.FunctionHandlers;
import org.drools.clips.LispAtom;
import org.drools.clips.LispForm;
import org.drools.clips.SExpression;
public class IfFunction implements Function {
private static final String name = "if";
public String getName() {
return name;
}
public void dump(LispForm lispForm, Appendable appendable) {
SExpression[] sExpressions = lispForm.getSExpressions();
appendable.append( "if " );
FunctionHandlers.dump( sExpressions[1], appendable );
appendable.append( "{" );
int i = 3;
for ( int length = sExpressions.length; i < length; i++ ) {
SExpression sExpr = ( SExpression ) sExpressions[i];
if ( ( sExpr instanceof LispAtom ) && "\"else\"".equals( ((LispAtom)sExpr).getValue() ) ) {
i++;
break;
}
FunctionHandlers.dump( sExpressions[i], appendable, true );
}
appendable.append( "}" );
while ( i < sExpressions.length ) {
appendable.append( " else {" );
for ( int length = sExpressions.length; i < length; i++ ) {
SExpression sExpr = ( SExpression ) sExpressions[i];
if ( ( sExpr instanceof LispAtom ) && "\"else\"".equals( ((LispAtom)sExpr).getValue() ) ) {
i++;
break;
}
FunctionHandlers.dump( sExpressions[i], appendable, true );
}
appendable.append( "}" );
}
}
}