Changeset 118 in dev


Ignore:
Timestamp:
May 12, 2007, 6:31:42 PM (17 years ago)
Author:
dai_9181
Message:

Namespace名前空間のコード補間機能に対応。

Files:
7 edited

Legend:

Unmodified
Added
Removed

  • BasicCompiler32/commandvalue.h

    r64 r118  
    9393#define COM_ENUM        0x11B1
    9494#define COM_ABSTRACT    0x11B2
     95#define COM_NAMESPACE   0x11B3
    9596
    9697//ウィンドウ制御

  • BasicCompiler_Common/common.h

    r117 r118  
    4747
    4848#ifdef _AMD64_
    49 #define VER_INFO        "(x64) β rev.245"
     49#define VER_INFO        "(x64) β rev.246"
    5050#else
    51 #define VER_INFO        "β rev.245"
     51#define VER_INFO        "β rev.246"
    5252#endif
    5353

  • ProjectEditor/Common.h

    r99 r118  
    6666#define APPLICATION_NAME "ActiveBasic 5.0"
    6767#define VERSION_APPLI_NAME APPLICATION_NAME
    68 #define VERSION_STRING "5.00.00 β rev.218"
     68#define VERSION_STRING "5.00.00 β rev.245"
    6969
    7070#endif

  • ProjectEditor/EndPairCommandComplement.cpp

    r3 r118  
    7272    if(lstrcmpi(temporary,"For")==0) return COM_FOR;
    7373    if(lstrcmpi(temporary,"Function")==0) return COM_FUNCTION;
     74    if(lstrcmpi(temporary,"Namespace")==0) return COM_NAMESPACE;
    7475    if(lstrcmpi(temporary,"Select")==0) return COM_SELECT;
    7576    if(lstrcmpi(temporary,"Sub")==0) return COM_SUB;
    … …  
    108109    if(lstrcmpi(temporary,"EndFunction")==0) return COM_FUNCTION;
    109110    if(lstrcmpi(temporary,"EndIf")==0) return COM_IF;
     111    if(lstrcmpi(temporary,"EndNamespace")==0) return COM_NAMESPACE;
    110112    if(lstrcmpi(temporary,"EndSelect")==0) return COM_SELECT;
    111113    if(lstrcmpi(temporary,"EndSub")==0) return COM_SUB;
    … …  
    138140        case COM_IF:
    139141            lstrcpy(buffer,"End If");
     142            break;
     143        case COM_NAMESPACE:
     144            lstrcpy(buffer,"End Namespace");
    140145            break;
    141146        case COM_SELECT:

  • ProjectEditor/ParameterHint.cpp

    r24 r118  
    107107    else if(CmdValue==COM_MKDIR)        lstrcpy(MethodCheckInfo.msg,"MkDir directory$");
    108108    else if(CmdValue==COM_MSGBOX)       lstrcpy(MethodCheckInfo.msg,"MsgBox hWnd, String$, [Title$], [BoxType], [retAns]");
     109    else if(CmdValue==COM_NAMESPACE)    lstrcpy(MethodCheckInfo.msg,"Namespace namespaceStr");
    109110    else if(CmdValue==COM_NEXT)         lstrcpy(MethodCheckInfo.msg,"Next");
    110111    else if(CmdValue==COM_OPEN)         lstrcpy(MethodCheckInfo.msg,"Open filename$ [For Input/Output/Append] As number");

  • ProjectEditor/SubOperation.cpp

    r117 r118  
    431431        case COM_INTERFACE:
    432432        case COM_LOOP:
     433        case COM_NAMESPACE:
    433434        case COM_NEXT:
    434435        case COM_PRIVATE:
    … …  
    539540    }
    540541    else if(str[0]=='n'||str[0]=='N'){
    541         if(lstrcmpi(str,"Namespace")==0) return -1;
     542        if(lstrcmpi(str,"Namespace")==0) return COM_NAMESPACE;
    542543        if(lstrcmpi(str,"Next")==0) return COM_NEXT;
    543544        if(lstrcmpi(str,"New")==0) return -1;

  • ProjectEditor/TextEditor_KeyEvent.cpp

    r24 r118  
    7171        lstrcmpi(temporary,"For")==0||
    7272        lstrcmpi(temporary,"Function")==0||
     73        lstrcmpi(temporary,"Namespace")==0||
    7374        lstrcmpi(temporary,"Override")==0||
    7475        lstrcmpi(temporary,"Sub")==0||
    … …  
    126127        lstrcmpi(temporary,"Next")==0||
    127128        lstrcmpi(temporary,"EndFunction")==0||
     129        lstrcmpi(temporary,"EndNamespace")==0||
    128130        lstrcmpi(temporary,"EndSub")==0||
    129131        lstrcmpi(temporary,"EndType")==0||
Note: See TracChangeset for help on using the changeset viewer.