PadLeft.cs

using Waher.Script.Abstraction.Elements;
using Waher.Script.Model;
using Waher.Script.Objects;
 
namespace Waher.Script.Functions.Strings
{
    public class PadLeft : FunctionTwoScalarVariables
    {
        public PadLeft(ScriptNode String, ScriptNode N, int Start, int Length, Expression Expression)
            : base(String, N, Start, Length, Expression)
        {
        }
 
        public override string FunctionName => nameof(PadLeft);
 
        public override string[] DefaultArgumentNames => new string[] { "s", "N" };
 
        public override bool UpgradeScalarsToSameSet => false;
 
        public override IElement EvaluateScalar(IElement Argument1, IElement Argument2, Variables Variables)
        {
            string s = ToString(Argument1) ?? string.Empty;
            int N = (int)(Expression.ToDouble(Argument2.AssociatedObjectValue) + 0.5);
 
            return new StringValue(s.PadLeft(N));
        }
 
    }
}