/rexx/
attribute = .object~enhanced(.methods)
attribute~size=10.5
say attribute~size
say
exit
::attribute size get
::attribute size set
expose size
use arg value
if datatype(value, "Whole") = .false | value < 0 then
raise syntax 93.906 array ("size", value)
size=value
gives
Trapped In..: RunSyntax
Message..: Method argument size must be zero or a positive whole number; found "10.5".
ErrorText..: Incorrect call to method.
Code..: 93.906
Line #..: 12
line 12 is empty/blank row after exit statement
Open Object Rexx Version 5.0.0 r11849
if using comment -- on each empty row gives correct line number 18
Anonymous
I runned this with oorexxtry wich showed this behaviour.
Running as rexx program it shows correct line number.
This can be closed