genius r729 - in trunk: . src

[jirka svn gnome org]

Author: jirka
Date: Fri Feb 20 05:48:57 2009
New Revision: 729
URL: http://svn.gnome.org/viewvc/genius?rev=729&view=rev

Log:

Thu Feb 19 23:48:45 2009  Jiri (George) Lebl <jirka 5z com>

	* src/genius_lists.c, src/inter.c, src/genius-readline-helper.c: fixup
	  operator list, remove the param list since params have toplevel
	  function nodes nowdays (for better part of a decade already :)




Modified:
   trunk/ChangeLog
   trunk/src/genius-readline-helper.c
   trunk/src/genius_lists.c
   trunk/src/inter.c

Modified: trunk/src/genius-readline-helper.c
==============================================================================
--- trunk/src/genius-readline-helper.c	(original)
+++ trunk/src/genius-readline-helper.c	Fri Feb 20 05:48:57 2009
@@ -18,7 +18,6 @@
 static GList *functions;
 
 static int addtoplevels = TRUE;
-extern const char *genius_params[];
 extern const char *genius_toplevels[];
 extern const char *genius_operators[];
 
@@ -52,12 +51,6 @@
 			return strdup(s);
 	}
 
-	while(genius_params[pi]) {
-		const char *s = genius_params[pi++];
-		if(strncmp(s,text,len)==0)
-			return strdup(s);
-	}
-
 	while(fli) {
 		char *fid = fli->data;
 		fli = g_list_next(fli);

Modified: trunk/src/genius_lists.c
==============================================================================
--- trunk/src/genius_lists.c	(original)
+++ trunk/src/genius_lists.c	Fri Feb 20 05:48:57 2009
@@ -21,18 +21,6 @@
 
 #define NULL ((void *)0)
 
-const char *genius_params[] = {
-	"FloatPrecision",
-	"MaxDigits",
-	"ResultsAsFloats",
-	"ScientificNotation",
-	"FullExpressions",
-	"MaxErrors",
-	"MixedFractions",
-	"IntegerOutputBase",
-	"OutputStyle",
-	NULL
-};
 const char *genius_toplevels[] = {
 	"help",
 	"load",
@@ -44,8 +32,8 @@
 };
 const char *genius_operators[] = {
 	"not","and","xor","or","while","until","for","sum","prod","do","to","by","in","if",
-	"then","else","define","function","parameter","call","return","bailout","exception",
-	"continue","break","null",
+	"then","else","function","parameter","call","return","bailout","exception",
+	"continue","break","mod","null",
 	NULL
 };
 

Modified: trunk/src/inter.c
==============================================================================
--- trunk/src/inter.c	(original)
+++ trunk/src/inter.c	Fri Feb 20 05:48:57 2009
@@ -39,8 +39,6 @@
 
 static int toplevelokg = TRUE;
 
-extern char *genius_params[];
-
 static int
 ok_for_top(char *s)
 {
@@ -287,12 +285,6 @@
 			return strdup(s);
 	}
 
-	while(genius_params[pi]) {
-		char *s = genius_params[pi++];
-		if(strncmp(s,text,len)==0)
-			return strdup(s);
-	}
-
 	while(fli) {
 		GelEFunc *f = fli->data;
 		fli = g_slist_next(fli);