[Mybusinessbasic-devel] mybb utilities.c,1.2,1.3

[<mti...@us...>]

Update of /cvsroot/mybusinessbasic/mybb
In directory sc8-pr-cvs1:/tmp/cvs-serv26268

Modified Files:
	utilities.c 
Log Message:
fixes for task 90822

Index: utilities.c
===================================================================
RCS file: /cvsroot/mybusinessbasic/mybb/utilities.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** utilities.c	20 Dec 2003 03:30:52 -0000	1.2
--- utilities.c	29 Dec 2003 19:36:40 -0000	1.3
***************
*** 242,245 ****
--- 242,281 ----
  }
  
+ //-----
+ // check for single char shortcuts
+ //-----
+ int doShortCut( void )
+ {
+    int x=0;
+ 
+    while (1)
+    {
+       //----- end of table -----
+       if ( !shortcuttbl[x].code[0] ) break;
+       //----- check this shortcut -----
+       if ( shortcuttbl[x].code[0] == *prog )
+       {
+          prog++;
+          tokenpos++;
+          //----- function attached to shortcut? -----
+          if ( shortcuttbl[x].func != NULL ) shortcuttbl[x].func();
+          //----- replace shortcut with full command -----
+          if ( shortcuttbl[x].wordLen )
+          {
+             memcpy(token,shortcuttbl[x].word,shortcuttbl[x].wordLen);
+          }
+          else
+          {
+             token[0] = 0;
+          }
+          return( shortcuttbl[x].result );
+       }
+       x++;
+    }
+ 
+    return(0);
+ }
+ 
+ 
  int itoh(byte num, char *pt)
  {