ndk/build/awk/check-awk.awk

   1 # Copyright (C) 2010 The Android Open Source Project
   2 #
   3 # Licensed under the Apache License, Version 2.0 (the "License");
   4 # you may not use this file except in compliance with the License.
   5 # You may obtain a copy of the License at
   6 #
   7 #      http://www.apache.org/licenses/LICENSE-2.0
   8 #
   9 # Unless required by applicable law or agreed to in writing, software
  10 # distributed under the License is distributed on an "AS IS" BASIS,
  11 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12 # See the License for the specific language governing permissions and
  13 # limitations under the License.
  14 #
  15
  16 # This script is used to check that a given awk executable
  17 # implements the match() and substr() functions appropriately.
  18 #
  19 # These were introduced in nawk/gawk, but the original awk
  20 # does not have them.
  21 #
  22 BEGIN {
  23     RSTART=0
  24     RLENGTH=0
  25     s1="A real world example"
  26     if (! match(s1,"world")) {
  27         print "Fail match"
  28     } else if (RSTART != 8) {
  29         print "Fail RSTART ="RSTART
  30     } else if (RLENGTH != 5) {
  31         print "Fail RLENGTH ="RLENGTH
  32     } else {
  33         s2=substr(s1,RSTART,RLENGTH)
  34         if (s2 != "world") {
  35             print "Fail substr="s2
  36         } else {
  37             print "Pass"
  38         }
  39     }
  40 }