13 lines
489 B
Text
13 lines
489 B
Text
bundle Default {
|
|
class Matching {
|
|
function : Main(args : System.String[]) ~ Nil {
|
|
"abcd"->StartsWith("ab")->PrintLine(); # returns true
|
|
"abcd"->EndsWith("zn")->PrintLine(); # returns false
|
|
("abab"->Find("bb") <> -1)->PrintLine(); # returns false
|
|
("abab"->Find("ab") <> -1)->PrintLine(); # returns true
|
|
loc := "abab"->Find("bb"); # returns -1
|
|
loc := "abab"->Find("ab"); # returns 0
|
|
loc := "abab"->Find("ab", loc + 1); # returns 2
|
|
}
|
|
}
|
|
}
|