date and time created 83/08/11 20:49:31 by sam

[unix-history] / usr / src / old / as.vax / aspseudo.c

diff --git a/usr/src/old/as.vax/aspseudo.c b/usr/src/old/as.vax/aspseudo.c
index f6b0d44..8b7d885 100644 (file)
--- a/usr/src/old/as.vax/aspseudo.c
+++ b/usr/src/old/as.vax/aspseudo.c
@@ -1,95 +1,25 @@
-/* Copyright (c) 1980 Regents of the University of California */
-static char sccsid[] = "@(#)aspseudo.c 4.2 %G%";
+/*
+ *     Copyright (c) 1982 Regents of the University of California
+ */
+#ifndef lint
+static char sccsid[] = "@(#)aspseudo.c 4.5 %G%";
+#endif not lint
+

 #include <stdio.h>
 #include "as.h"
 
 #include <stdio.h>
 #include "as.h"
 

-#define        OP(name, opcode, nargs, arg1, arg2, arg3, arg4, arg5, arg6) \
+#define        OP(name, eopcode, popcode, nargs, arg1, arg2, arg3, arg4, arg5, arg6) \

        { \
        { \

-               name, opcode, nargs, arg1, arg2, arg3, arg4, arg5, arg6, \
-               (nargs == 0 ? INST0:INSTn) \
+               name, popcode, nargs, arg1, arg2, arg3, arg4, arg5, arg6, \
+               (nargs == 0 ? INST0:INSTn), eopcode \

        }
 #define        PSEUDO(name, type, tag) \
        { \
                name, type, 0,   0, 0, 0, 0, 0, 0, \
        }
 #define        PSEUDO(name, type, tag) \
        { \
                name, type, 0,   0, 0, 0, 0, 0, 0, \

-               tag \
+               tag, CORE \

        }
 
 readonly struct Instab instab[] = {
        }
 
 readonly struct Instab instab[] = {

-PSEUDO(".space",       0,      ISPACE),
-PSEUDO(".fill",                0,      IFILL),
-PSEUDO(".byte",                0,      IBYTE),
-PSEUDO(".word",                0,      IWORD),
-PSEUDO(".long",                0,      ILONG),
-PSEUDO(".int",         0,      IINT),
-PSEUDO(".data",                0,      IDATA),
-PSEUDO(".globl",       0,      IGLOBAL),
-PSEUDO(".set",         0,      ISET),
-PSEUDO(".text",                0,      ITEXT),
-PSEUDO(".comm",                0,      ICOMM),
-PSEUDO(".lcomm",       0,      ILCOMM),
-PSEUDO(".lsym",                0,      ILSYM),
-PSEUDO(".align",       0,      IALIGN),
-PSEUDO(".float",       0,      IFLOAT),
-PSEUDO(".double",      0,      IDOUBLE),
-PSEUDO(".org",         0,      IORG),
-PSEUDO(".stab",                0,      ISTAB),
-PSEUDO(".stabs",       0,      ISTABSTR),
-PSEUDO(".stabn",       0,      ISTABNONE),
-PSEUDO(".stabd",       0,      ISTABDOT),
-PSEUDO(".ascii",       0,      IASCII),
-PSEUDO(".asciz",       0,      IASCIZ),
-PSEUDO(".file",                0,      IFILE),
-PSEUDO(".line",                0,      ILINENO),
-PSEUDO(".ABORT",       0,      IABORT),
-
-PSEUDO("r0",           0,      REG),
-PSEUDO("r1",           1,      REG),
-PSEUDO("r2",           2,      REG),
-PSEUDO("r3",           3,      REG),
-PSEUDO("r4",           4,      REG),
-PSEUDO("r5",           5,      REG),
-PSEUDO("r6",           6,      REG),
-PSEUDO("r7",           7,      REG),
-PSEUDO("r8",           8,      REG),
-PSEUDO("r9",           9,      REG),
-PSEUDO("r10",          10,     REG),
-PSEUDO("r11",          11,     REG),
-PSEUDO("r12",          12,     REG),
-PSEUDO("r13",          13,     REG),
-PSEUDO("r14",          14,     REG),
-PSEUDO("r15",          15,     REG),
-PSEUDO("ap",           12,     REG),
-PSEUDO("fp",           13,     REG),
-PSEUDO("sp",           14,     REG),
-PSEUDO("pc",           15,     REG),
-
-PSEUDO("jcc",          0x1e,   IJXXX),
-PSEUDO("jcs",          0x1f,   IJXXX),
-PSEUDO("jeql",         0x13,   IJXXX),
-PSEUDO("jeqlu",                0x13,   IJXXX),
-PSEUDO("jgeq",         0x18,   IJXXX),
-PSEUDO("jgequ",                0x1e,   IJXXX),
-PSEUDO("jgtr",         0x14,   IJXXX),
-PSEUDO("jgtru",                0x1a,   IJXXX),
-PSEUDO("jleq",         0x15,   IJXXX),
-PSEUDO("jlequ",                0x1b,   IJXXX),
-PSEUDO("jlss",         0x19,   IJXXX),
-PSEUDO("jlssu",                0x1f,   IJXXX),
-PSEUDO("jneq",         0x12,   IJXXX),
-PSEUDO("jnequ",                0x12,   IJXXX),
-PSEUDO("jvc",          0x1c,   IJXXX),
-PSEUDO("jvs",          0x1d,   IJXXX),
-PSEUDO("jbr",          0x11,   IJXXX),
-PSEUDO("jbc",          0xe1,   IJXXX),
-PSEUDO("jbs",          0xe0,   IJXXX),
-PSEUDO("jbcc",         0xe5,   IJXXX),
-PSEUDO("jbsc",         0xe4,   IJXXX),
-PSEUDO("jbcs",         0xe3,   IJXXX),
-PSEUDO("jbss",         0xe2,   IJXXX),
-PSEUDO("jlbc",         0xe9,   IJXXX),
-PSEUDO("jlbs",         0xe8,   IJXXX),
-
-#include "instrs"
-
-0
+#include "instrs.as"
+PSEUDO("\0\0\0\0\0\0\0\0\0\0", 0, 0)

 };
 };