package net.sf.jabref.bst;
import java.util.Stack;
import net.sf.jabref.bst.VM.BstEntry;
import net.sf.jabref.bst.VM.BstFunction;
/**
*
* The |built_in| function {\.{purify\$}} pops the top (string) literal, removes
* nonalphanumeric characters except for |white_space| and |sep_char| characters
* (these get converted to a |space|) and removes certain alphabetic characters
* contained in the control sequences associated with a special character, and
* pushes the resulting string. If the literal isn't a string, it complains and
* pushes the null string.
*
* @author $Author: coezbek $
* @version $Revision: 2209 $ ($Date: 2007-08-01 20:23:38 +0200 (Mi, 01 Aug 2007) $)
*
*/
public class PurifyFunction implements BstFunction {
VM vm;
public PurifyFunction(VM vm) {
this.vm = vm;
}
public void execute(BstEntry context) {
Stack<Object> stack = vm.getStack();
if (stack.size() < 1) {
throw new VMException("Not enough operands on stack for operation purify$");
}
Object o1 = stack.pop();
if (!(o1 instanceof String)) {
vm.warn("A string is needed for purify$");
stack.push("");
return;
}
stack.push(BibtexPurify.purify((String) o1, vm));
}
}