flower/scalar.cc

   1 #include <stdio.h>
   2 #include "scalar.hh"
   3
   4 bool
   5 Scalar::isnum()
   6 {
   7     int conv = false;
   8     if (len()) {
   9         long l =0;
  10         conv = sscanf(data, "%ld", &l);
  11     }
  12     return len() && conv;
  13 }
  14
  15 Scalar::operator Real()
  16 {
  17     assert (isnum());
  18     return fvalue();
  19 }
  20
  21 Scalar::operator int()
  22 {
  23     assert (isnum());
  24     return value();
  25 }
  26 bool
  27 Scalar::to_bool() const
  28 {
  29     if (!len())
  30         return false;
  31     if (*this == "0")
  32         return false;
  33     String u (*this);
  34     u.upper();
  35     if (u== "FALSE")
  36         return false;
  37     return true;
  38 }