BSD 4_3_Net_2 development

Work on file usr/src/usr.bin/lisp/franz/h/tahoeframe.h

Synthesized-from: CSRG/cd2/net.2

diff --git a/usr/src/usr.bin/lisp/franz/h/tahoeframe.h b/usr/src/usr.bin/lisp/franz/h/tahoeframe.h
new file mode 100644 (file)
index 0000000..49767e8
--- /dev/null
+++ b/usr/src/usr.bin/lisp/franz/h/tahoeframe.h
@@ -0,0 +1,12 @@
+/* not used - just to look at I guess */
+
+#define FRAMOFFSET (-8)                /* FP points to frame + 8 */
+
+struct machframe
+       {
+       lispval (*pc)();
+       short mask;
+       short removed;
+       struct machframe *fp;
+       lispval *arg[2];
+};