// $Id: xxl_lower.cc,v 1.2 1996/12/11 21:39:48 aml Exp $

// This function changes the value of the string in place !!

#include "xxl_funcs.hh"
#include "sheet.hh"

Stack_elem *Lower::eval(Stack_elem *p,Sheet *sheet, short col, short row) {
    int i;
    char *st;

    se = p;

    st = sheet->stack_string(p);

    if (st == NULL)
      se->contents.string_val[0] = 0;
    else {
      for(i=0; st[i] != 0; i++) 
        se->contents.string_val[i] = tolower(st[i]);
      se->contents.string_val[i] = 0;
    }
    se->type = FORM_STRING;
    return(se);
}

Lower::Lower() {
  //    se = new Stack_elem;
}

Lower::~Lower() {
  //delete se;
}

// $Log: xxl_lower.cc,v $
// Revision 1.2  1996/12/11  21:39:48  aml
// Sumif implemented.
// Diverse time functions implemented.
// Fixed needtoscroll2 to avoid out of control scroll.
//
// Revision 1.1  1996/08/28 17:03:03  aml
// Initial revision
//