Character.st
branchjv
changeset 24912 7006451380c4
parent 23547 c69c97cec351
child 25420 a18d0d048b1f
equal deleted inserted replaced
24911:fe2e546e6f2f 24912:7006451380c4
  2013     RETURN ( false );
  2013     RETURN ( false );
  2014 %}.
  2014 %}.
  2015     ^ self isLetter or:[self isDigit]
  2015     ^ self isLetter or:[self isDigit]
  2016 !
  2016 !
  2017 
  2017 
       
  2018 isLetterOrDigitOrUnderline
       
  2019     "return true, if I am a letter or a digit or $_"
       
  2020 
       
  2021     ^ self == $_ or:[ self isLetterOrDigit ]
       
  2022 
       
  2023     "Created: / 24-05-2019 / 12:56:23 / Claus Gittinger"
       
  2024 !
       
  2025 
  2018 isLetterOrUnderline
  2026 isLetterOrUnderline
  2019     "return true, if I am a letter or $_"
  2027     "return true, if I am a letter or $_"
  2020 
  2028 
  2021     ^ self == $_ or:[ self isLetter ]
  2029     ^ self == $_ or:[ self isLetter ]
  2022 !
  2030 !