/* WildCmp V37.3                                              */
 /* FREEWARE.                                                  */
 /* (c) 1993-94 by Andreas R. Kleinert.                        */
 /* Demonstrates use of the WildCard-Function.                 */
 /* Written in SAS/C V6.51.                                    */

#include <akcc_gen0/akcc_gen0_pragma.h>

#include <stdlib.h>

#include <proto/exec.h>


struct AKCCBase *AKCCBase = N;

void main(long argc, char **argv)
{
 printf("\nWildCmp V37.3, FREEWARE, (c) 1993-94 by Andreas R. Kleinert.\n");

 AKCCBase = (struct AKCCBase *) OpenLibrary("akcc_gen0.library", 37);
 if(AKCCBase)
  {
   char wild_string[256], orig_string[256];

   printf("\nEnter a WildCard string :");
   scanf("%s", wild_string);

   printf("Enter string to compare with the WildCard string :");
   scanf("%s", orig_string);

   if(AKCC_WildCmp(orig_string, wild_string)==TRUE) printf("\nThe pattern fits.\n");
    else                                            printf("\nThe pattern does not match.\n");

   CloseLibrary((APTR) AKCCBase);
  }else
  {
   printf("\n Can't open \42akcc_gen0.library\42 V37+ !\n");
  }

 exit(0);
}