From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001
From: Joseph Hunkeler <jhunkeler@gmail.com>
Date: Wed, 8 Jul 2015 20:46:52 -0400
Subject: Initial commit

---
 sys/clio/clio.com | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 sys/clio/clio.com

(limited to 'sys/clio/clio.com')

diff --git a/sys/clio/clio.com b/sys/clio/clio.com
new file mode 100644
index 00000000..78567dd0
--- /dev/null
+++ b/sys/clio/clio.com
@@ -0,0 +1,18 @@
+# CLIO parameters.
+
+int	cl_prtype			# parent process type
+pointer	cl_stp				# clcache symbol table pointer
+int	cl_stmark			# stmark value for initial table
+int	cl_nposargs			# number of $1, $2 type task parameters
+int	cl_nextarg			# index into posarg list
+pointer	cl_posarg[MAX_POSARGS]		# symtab offsets of positional args
+int	ps_status[MAX_PSEUDOFILES]	# for pseudofile drivers
+int	cl_npsets			# number of psets for task (>= 1)
+int	cl_psetop			# next char in pset name buffer
+int	cl_psetindex[MAX_PSETS]		# index of pset names (1 = taskname)
+char	cl_psetname[SZ_PSETNAMEBUF]	# char storage for pset names
+char	cl_pname[SZ_PNAME]		# handy buffer for param names
+
+common	/clio_com/ cl_prtype, cl_stp, cl_stmark, cl_nposargs, cl_nextarg,
+	cl_posarg, ps_status, cl_npsets, cl_psetop, cl_psetindex, cl_psetname,
+	cl_pname
-- 
cgit