fix d optype

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2313 b08c6af1-5177-4d33-ba66-4b1c6b8b522a

H/amidefs.h

@@ -164,6 +164,7 @@ typedef enum {
   The meaning of the symbols in a abstract machine instruction is:
 
   c: constant, is a Term
+  d: double (functor + unaligned)
   l: label, yamop *
 
 
@@ -227,7 +228,6 @@ typedef struct yami {
       CELL next;
     } clll;
     struct {
-      OPCODE              opcw;
       CELL    d[1+SIZEOF_DOUBLE/SIZEOF_INT_P];
       CELL next;
     } d;