X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=include%2Fstruct.h;h=e862786713a1b49f983d13695e45f4f929b5f810;hp=dd69d212424d9e813795546f48f0fc35dcd2536f;hb=71c7607d809b725d66ef21471041e2677c71be4e;hpb=d1f82970bf7d41db2fea11b08cd8e308f6cb8138

diff --git a/include/struct.h b/include/struct.h
index dd69d21..e862786 100644
--- a/include/struct.h
+++ b/include/struct.h
@@ -1,6 +1,7 @@
 #ifndef YACASL2_CASL2_INCLUDED
 #define YACASL2_CASL2_INCLUDED
 
+#include <time.h>
 #include "word.h"
 
 /**
@@ -8,7 +9,7 @@
  */
 enum {
     CMDSIZE = 4,              /**<命令の最大文字数 */
-    GRSIZE = 8,               /**<汎用レジスタの数。COMET II規格により0から7までの8つ */
+    GRSIZE = 8,               /**<汎用レジスタの数。COMET II規格では、8（0から7） */
     DEFAULT_MEMSIZE = 512,    /**<デフォルトのメモリ容量。COMET II規格では、65535語（word） */
     DEFAULT_CLOCKS = 5000000, /**<デフォルトのクロック周波数。COMET II規格では、未定義 */
 };
@@ -39,7 +40,7 @@ typedef struct {
     CPU *cpu;        /**<CPU */
     WORD *memory;    /**<メモリ */
     int memsize;     /**<メモリサイズ */
-    int clocks;      /**<クロック周波数 */
+    clock_t clocks;  /**<クロック周波数 */
 } SYSTEM;
 
 extern SYSTEM *sys;
@@ -50,68 +51,76 @@ extern SYSTEM *sys;
  */
 typedef enum {
     /**
-     *  オペランド数2または3
+     *  オペランド数2または3。命令語長2
      *     第1オペランド: 汎用レジスタ
      *     第2オペランド: アドレス
      *     第3オペランド: 指標レジスタ
      */
     R_ADR_X = 010,
     /**
-     *  オペランド数2または3
-     *     第1オペランド: 汎用レジスタ、
+     *  オペランド数2または3。。命令語長2
+     *     第1オペランド: 汎用レジスタ
      *     第2オペランド: アドレスに格納されている内容
      *     第3オペランド: 指標レジスタ
      */
-    R_ADR_X_ = 011,
-    /**
-     *  オペランド数2
-     *     第1オペランド: 汎用レジスタ
-     *     第2オペランド: 汎用レジスタ
-     */
     R1_R2 = 020,
     /**
-     * オペランド数1または2
+     * オペランド数1または2。命令語長1
      *     第1オペランド: アドレス
      *     第2オペランド: 指標レジスタ
      */
     ADR_X = 030,
     /**
-     *   オペランド数1
+     *   オペランド数1。命令語長1
      *     第1オペランド: 汎用レジスタ
      */
     R_ = 040,
     /**
-     *  オペランドなし
+     *  オペランドなし。命令語長1
      */
     NONE = 0,
+    /**
+     *  COMET II命令以外
+     */
+    NOTCMD = 077,
 } CMDTYPE;
 
 /**
- * 命令コード配列
+ * 命令コード表の項目
  */
 typedef struct {
-    char *name;
-    CMDTYPE type;
-    WORD code;
+    char *name;                 /**<命令名 */
+    const void (*ptr);          /**<命令の関数ポインタ */
 } CMD;
 
+/**
+ * COMET II命令コード表の項目
+ */
+typedef struct {
+    char *name;                 /**<命令名 */
+    CMDTYPE type;               /**<命令タイプ */
+    WORD code;                  /**<命令コード */
+    const void (*ptr);          /**<命令の関数ポインタ */
+} COMET2CMD;
+
 /**
  * 命令コードのハッシュ表
  */
 typedef struct _CMDTAB {
-    struct _CMDTAB *next;
-    CMD *cmd;
+    struct _CMDTAB *next;       /**<リスト次項目へのポインタ */
+    COMET2CMD *cmd;             /**<命令コード表の項目 */
 } CMDTAB;
 
 /**
- * CASL2プログラムのプロパティ
+ * プログラム実行時の開始と終了のアドレス
  */
 typedef struct {
-    WORD start;   /**<プログラムの開始番地 */
-    WORD end;     /**<プログラムの終了番地 */
-} PROGPROP;
+    WORD start;   /**<開始アドレス */
+    WORD end;     /**<終了アドレス */
+    bool stop;    /**<終了フラグ */
+} EXECPTR;
 
-extern PROGPROP *prog;
+extern EXECPTR *execptr;
 
 /**
  * COMET II仮想マシンのリセット
@@ -145,10 +154,9 @@ void free_cmdtype_code();
 bool create_code_type();
 
 /**
- * 命令コードから命令タイプを返す
- * 無効な場合はNONEを返す
+ * 命令コードから命令の関数ポインタを返す
  */
-CMDTYPE getcmdtype(WORD code);
+const void (*getcmdptr(WORD code));
 
 /**
  * コードがキーの命令ハッシュ表を解放する