Research V5 development

Work on file usr/c/c13.c

Synthesized-from: v5

diff --git a/usr/c/c13.c b/usr/c/c13.c
new file mode 100644 (file)
index 0000000..0f6a490
--- /dev/null
+++ b/usr/c/c13.c
@@ -0,0 +1,113 @@
+int opdope[] {
+       000000, /* EOF */
+       000000, /* ; */
+       000000, /* { */
+       000000, /* } */
+       036000, /* [ */
+       002000, /* ] */
+       036000, /* ( */
+       002000, /* ) */
+       014201, /* : */
+       007001, /* , */
+       000000, /* 10 */
+       000000, /* 11 */
+       000000, /* 12 */
+       000000, /* 13 */
+       000000, /* 14 */
+       000000, /* 15 */
+       000000, /* 16 */
+       000000, /* 17 */
+       000000, /* 18 */
+       000000, /* 19 */
+       000400, /* name */
+       000400, /* short constant */
+       000400, /* string */
+       000400, /* float */
+       000400, /* double */
+       000000, /* 25 */
+       000000, /* 26 */
+       000400, /* autoi, *r++ */
+       000400, /* autod, *--r */
+       000000, /* 29 */
+       034202, /* ++pre */
+       034202, /* --pre */
+       034202, /* ++post */
+       034202, /* --post */
+       034220, /* !un */
+       034202, /* &un */
+       034220, /* *un */
+       034200, /* -un */
+       034220, /* ~un */
+       036001, /* . (structure reference) */
+       030101, /* + */
+       030001, /* - */
+       032101, /* * */
+       032001, /* / */
+       032001, /* % */
+       026061, /* >> */
+       026061, /* << */
+       020161, /* & */
+       016161, /* | */
+       016161, /* ^ */
+       036001, /* -> */
+       000000, /* int -> double */
+       000000, /* double -> int */
+       000001, /* && */
+       000001, /* || */
+       000000, /* 55 */
+       000000, /* 56 */
+       000000, /* 57 */
+       000000, /* 58 */
+       000000, /* 59 */
+       022005, /* == */
+       022005, /* != */
+       024005, /* <= */
+       024005, /* < */
+       024005, /* >= */
+       024005, /* > */
+       024005, /* <p */
+       024005, /* <=p */
+       024005, /* >p */
+       024005, /* >=p */
+       012213, /* =+ */
+       012213, /* =- */
+       012213, /* =* */
+       012213, /* =/ */
+       012213, /* =% */
+       012253, /* =>> */
+       012253, /* =<< */
+       012253, /* =& */
+       012253, /* =| */
+       012253, /* =^ */
+       012213, /* = */
+       012253, /* =& ~ */
+       000000, /* 82 */
+       000000, /* 83 */
+       000000, /* 84 */
+       000000, /* 85 */
+       000000, /* 86 */
+       000000, /* 87 */
+       000000, /* 88 */
+       000000, /* 89 */
+       014201, /* ? */
+       000000, /* 91 */
+       000000, /* 92 */
+       000000, /* 93 */
+       000000, /* 94 */
+       000000, /* 95 */
+       000000, /* 96 */
+       000000, /* 97 */
+       000000, /* 98 */
+       000000, /* 99 */
+       036001, /* call */
+       036000, /* mcall */
+       000000, /* goto */
+       000000, /* jump cond */
+       000000, /* branch cond */
+       000400, /* set nregs */
+       000000, /* 106 */
+       000000, /* 107 */
+       000000, /* 108 */
+       000000, /* 109 */
+       000000  /* force r0 */
+};