Initial revision

1988-07-04 11:45:41 +00:00
parent e79e905cdb
commit 08fd084d59
20 changed files with 4338 additions and 0 deletions
--- a/lang/basic/src/yylexp.c
+++ b/lang/basic/src/yylexp.c
@@ -0,0 +1,22 @@
+/*
+ * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
+ * See the copyright notice in the ACK home directory, in the file "Copyright".
+ */
+
+int toknum;
+
+yylexp() 
+{
+/* als toknum != 0 dan bevat toknum een door LLmessage back-ge-pushed token */
+
+int t;
+
+	if ( toknum == 0 ) 
+		return(yylex());
+	else {
+		t = toknum;
+		toknum = 0;
+		return(t);
+	}
+}
+