From f5959f99d723630c9efaaa30a1209316064f9158 Mon Sep 17 00:00:00 2001
From: andmarti1424 <andmarti@gmail.com>
Date: Sun, 9 Apr 2017 19:19:22 -0300
Subject: cleaned comments

---
 src/lex.c | 44 --------------------------------------------
 1 file changed, 44 deletions(-)

(limited to 'src/lex.c')

diff --git a/src/lex.c b/src/lex.c
index a859207..36e9466 100644
--- a/src/lex.c
+++ b/src/lex.c
@@ -269,20 +269,6 @@ int yylex() {
         linelim = p-line;
         tokenst = NULL;
         return yylex();
-
-/*
-    } else if (tokenl ==  3) {
-                    //k++;
-            //mvprintw(0, 5, "$$%d", tokenl);
-                    //k++;
-            //mvprintw(0, 25, "$$%s", tokenst);
-            //ret = STRING;
-            //yylval.sval = tokenst;
-
-        yylval.sval = "HOLA";
-        ret = MAPWORD;
-        ret = STRING;
-*/
     } else {
         ret = *p++;
     }
@@ -293,35 +279,6 @@ int yylex() {
     return ret;
 }
 
-/*
-* This is a very simpleminded test for plugins:  does the file merely exist
-* in the plugin directories.  Perhaps should test for it being executable
-*/
-#if 0
-int plugin_exists(char *name, int len, char *path) {
-    FILE *fp;
-    static char *HomeDir;
-
-    if ((HomeDir = getenv("HOME"))) {
-        strcpy((char *)path, HomeDir);
-        strcat((char *)path, "/.sc/plugins/");
-        strncat((char *)path, name, len);
-        if ((fp = fopen((char *)path, "r"))) {
-            fclose(fp);
-            return 1;
-        }
-    }
-    strcpy((char *)path, LIBDIR);
-    strcat((char *)path, "/plugins/");
-    strncat((char *)path, name, len);
-    if ((fp = fopen((char *)path, "r"))) {
-        fclose(fp);
-        return 1;
-    }
-    return 0;
-}
-
-#endif
 /*
  * Given a token string starting with a symbolic column name and its valid
  * length, convert column name ("A"-"Z" or "AA"-"ZZ") to a column number (0-N).
@@ -330,7 +287,6 @@ int plugin_exists(char *name, int len, char *path) {
  *
  * Case-insensitivity is done crudely, by ignoring the 040 bit.
  */
-
 int atocol(char *string, int len) {
     register int col;
 
-- 
cgit v1.2.3