NamedFieldPairsClass - derives the ABC FieldPairsClass

Included as-is in my ClarionClasses repo on github.

Not sure how useful this is to anyone else but it helped me solves something and scratched an itch :smiley:

Example usage:


  PROGRAM

  Include('NamedFieldPairsClass.inc'),ONCE
Pairs NamedFieldPairsClass
F1    CSTRING(255)
F2    CSTRING(255)
  MAP
  END

  CODE
  F1 = 'Before'
  Pairs.AddNamedItem(F1,'F1')
  F1 = 'After'
  IF Pairs.Equal()
   Stop('No change detected')
  ELSE
    Stop('Before value was "' & Pairs.GetRight('F1') & '" and now it is "' & Pairs.GetLeft('F1') & '"')
  END