anchor.diff:      ?line ["abc","abcdef"] = Wcf("a*{def,}"),
       ?line ["abc","abcdef"] = Wcf("a*{,def}"),
   
  +    %% Constant wildcard.
  +    ["abcdef"] = Wcf("abcdef"),
  +
       %% Negative tests.
       ?line [] = Wcf("b*"),
       ?line [] = Wcf("bufflig"),
  
positive.code:     All = ["a-","aA","aB","aC","a[","a]"],
      ?line Files = mkfiles(lists:reverse(All), Dir),
      ?line All = Wcf("a[][A-C-]"),
      ?line del(Files),
      do_wildcard_5(Dir, Wcf).
  
  
negative.code:     ?line ["blurf/nisse"] = Wcf("*/nisse"),
      ?line [] = Wcf("mountain/*"),
      ?line [] = Wcf("xa/gurka"),
      ["blurf/nisse"] = Wcf("blurf/nisse"),
  
      %% Cleanup
      ?line del(Files),
  