Merge branch 'maint'
[gnushogi.git] / gnushogi / pattern.c
index 063ca7a..349cd94 100644 (file)
@@ -2,11 +2,15 @@
  * FILE: pattern.c
  *
  * ----------------------------------------------------------------------
- *
- * Copyright (c) 2012 Free Software Foundation
+ * Copyright (c) 1993, 1994, 1995 Matthias Mutz
+ * Copyright (c) 1999 Michael Vanier and the Free Software Foundation
+ * Copyright (c) 2008, 2013, 2014 Yann Dirson and the Free Software Foundation
  *
  * GNU SHOGI is based on GNU CHESS
  *
+ * Copyright (c) 1988, 1989, 1990 John Stanback
+ * Copyright (c) 1992 Free Software Foundation
+ *
  * This file is part of GNU SHOGI.
  *
  * GNU Shogi is free software; you can redistribute it and/or modify it
 #include "gnushogi.h"
 #include "pattern.h"
 
-/* constants and pattern_data are generated by "pat2inc" */
-#include "pattern.inc"
+/* "pat2inc" generates constants and pattern_data */
+#ifndef MINISHOGI
+# include "gnushogi-pattern.inc"
+#else
+# include "gnuminishogi-pattern.inc"
+#endif
 
 struct Pattern_rec Pattern[MAX_PATTERN];
 struct OpeningSequence_rec OpeningSequence[MAX_OPENING_SEQUENCE];
@@ -38,54 +46,6 @@ struct OpeningSequence_rec OpeningSequence[MAX_OPENING_SEQUENCE];
 small_short pattern_data[MAX_PATTERN_DATA];
 
 
-short
-ValueOfOpeningName (char *name)
-{
-    short i;
-    i = (name[0] == 'C') ? 0 : 100;
-
-    switch (name[7])
-    {
-    case 'S':
-        i += 10;
-        break;
-
-    case 'R':
-        i += 20;
-        break;
-
-    case 'U':
-        i += 30;
-        break;
-
-    default:
-        i += 40;
-        break;
-    }
-
-    switch (name[9])
-    {
-    case 'S':
-        i += 1;
-        break;
-
-    case 'R':
-        i += 2;
-        break;
-
-    case 'U':
-        i += 3;
-        break;
-
-    default:
-        i += 4;
-        break;
-    }
-
-    return i;
-}
-
-
 static void
 NameOfOpeningValue (short i, char *name)
 {
@@ -192,7 +152,6 @@ GetOpeningPatterns (short *max_opening_sequence)
 
 void
 ShowOpeningPatterns (short max_opening_sequence)
-
 {
     short os, p, n, i;