Changeset 3b1a83c in git for Singular/scanner.l

Timestamp:

Oct 23, 2001, 4:04:26 PM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

65248586d85a6b175c2665d87679f2e492ae9fb8

Parents:

7497ef3773fc1afff892546445b1d82b1cf0fb05

Message:

*hannes: dagstuhl improvements


git-svn-id: file:///usr/local/Singular/svn/trunk@5653 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/scanner.l (modified) (2 diffs)

Singular/scanner.l

@@ -3 +3 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: scanner.l,v 1.30 2001-10-09 16:36:21 Singular Exp $ */
+/* $Id: scanner.l,v 1.31 2001-10-23 14:04:26 Singular Exp $ */
 #include <stdio.h>
 #include <string.h>
@@ -346 +346 @@
 .                       {
                            /*if (*yytext == '\n') REJECT;*/
-                           register char ch= *yytext;
+                           register char ch= *yytext;
                            lvalp->i = ch;
-                           switch(ch)
-                           {
-                             /* case '&': */
-                             case '|':
+                           switch(ch)
+                           {
+                             /* case '&': */
+                             case '|':
                                return LOGIC_OP;
-                             /* case '/': */
-                             case '%':
-                             case '*':
+                             /* case '/': */
+                             case '%':
+                             case '*':
                                return MULDIV_OP;
-                             /* case '<': */
-                             case '>':
-                               return COMP_OP;
-                             default:
-                               break;
-                            }
+                             /* case '<': */
+                             case '>':
+                               return COMP_OP;
+                             default:
+                               break;
+                            }
                             return ch;
                          }