• MPL function returns - Re

    From GRYPHON@46:1/116 to G00R00 on Thu Jan 31 19:20:24 2019
    James,

    I've been playing with MPL function that return the datatype of REAL, and they don't seem to be working. If I have a function return a REAL, it is always an integer. I have a global variable (Var TextReal : Real) and I assign it a
    real number inside a function, but when when I assign value to the REAL function, it always comes back as integer.

    Var TestREAL : Real

    Function Str2Real(S:String):Real
    Var Ret : Real
    Begin
    TestREAL:=5.6
    Ret:=TestREAL
    Str2Real:=Ret
    End

    WriteLn('TestReal='+Real2Str(TestReal,2)) WriteLn('Str2Real='+Real2Str(Str2Real('5.6'),2))

    --------------------
    The output would be:

    TestReal=5.6
    Real2Str=5.0

    Also, there doesn't seem to be a Str2Real function.

    "No matter where you go, there you are!" - B. Bonzai

    --- Mystic BBS v1.10 A51 (Linux)
    * Origin: Cyberia BBS | Cyberia.Darktech.Org | Kingwood, TX (46:1/116)
    Synchronet thePharcyde_ >> telnet://bbs.pharcyde.org (Wisconsin)