fxvariables.bis

用VB实现的编译器的源代码

class String
  <definitions>
  method len
    1
    Text
  end method

  method mid
    2
    Text
    Start
  end method

  method segment
    3
    Text
    Start
    Length
  end method
 
  method left
    2
    Text
    Length
  end method

  method right
    2
    Text
    Length
  end method

  method inStr
    3
    Text
    Find
    Start
  end method

  method replace
    3
    Text
    Old
    New
  end method
 
  <methods>
  method function len
    len [#Text]
    return [+Misc]
  end method

  method function mid
    from [#Text] [#Start]
    return [+Misc]
  end method

  method function segment
    segment [#Text] [#Start] [#Length]
    return [+Misc]
  end method

  method function left
    segment [#Text] [@1] [#Length]
    return [+Misc]
  end method

  method function right
    len [#Text]
    from [#Text] [+Misc - #Length + @1]
    return [+Misc]
  end method

  method function inStr
    instr [#Text] [#Find] [#Start]
    return [+Misc]
  end method

  method function replace
    replace [#Text] [#Old] [#New]
    return [+Misc]
  end method
end class