Data update

Task/Regular-expressions/FutureBasic/regular-expressions.basic

@@ -0,0 +1,20 @@
+void local fn DoIt
+  CFStringRef string = @"I am a string"
+  CFStringRef fmt = @".*string$"
+  PredicateRef pred = fn PredicateWithFormat( @"SELF MATCHES %@", fmt )
+
+  if ( fn PredicateEvaluateWithObject( pred, string ) )
+    printf @"\"%@\" ends with \"string\"",string
+  end if
+
+  print
+
+  CFStringRef orig = @"I am the original string"
+  RegularExpressionRef regex = fn RegularExpressionWithPattern( @"original", 0, NULL )
+  CFStringRef result = fn RegularExpressionStringByReplacingMatches( regex, orig, 0, fn CFRangeMake(0,len(orig)), @"modified" )
+  print result
+end fn
+
+fn DoIt
+
+HandleEvents

Task/Regular-expressions/M2000-Interpreter/regular-expressions.m2000

@@ -52,7 +52,7 @@ Checkit
 
 
 
-\\ internal has no pattern. There is a like operator (~) for strings which use pattern matching (using VB6 like). We can use Instr() and RInstr() for strings.
+' internal has no pattern. There is a like operator (~) for strings which use pattern matching (using VB6 like). We can use Instr() and RInstr() for strings.
 
 Module Internal {
       what$="Mona Lisa"