token.cxx (e1f63238) | token.cxx (3d762826) |
---|---|
1/************************************************************** 2 * 3 * Licensed to the Apache Software Foundation (ASF) under one 4 * or more contributor license agreements. See the NOTICE file 5 * distributed with this work for additional information 6 * regarding copyright ownership. The ASF licenses this file 7 * to you under the Apache License, Version 2.0 (the 8 * "License"); you may not use this file except in compliance --- 88 unchanged lines hidden (view full) --- 97 { ENDSUB, "End Sub" }, 98 { ENDTYPE, "End Type" }, 99 { ENDIF, "EndIf" }, 100 { ENUM, "Enum" }, 101 { EQV, "Eqv" }, 102 { ERASE, "Erase" }, 103 { _ERROR_, "Error" }, 104 { EXIT, "Exit" }, | 1/************************************************************** 2 * 3 * Licensed to the Apache Software Foundation (ASF) under one 4 * or more contributor license agreements. See the NOTICE file 5 * distributed with this work for additional information 6 * regarding copyright ownership. The ASF licenses this file 7 * to you under the Apache License, Version 2.0 (the 8 * "License"); you may not use this file except in compliance --- 88 unchanged lines hidden (view full) --- 97 { ENDSUB, "End Sub" }, 98 { ENDTYPE, "End Type" }, 99 { ENDIF, "EndIf" }, 100 { ENUM, "Enum" }, 101 { EQV, "Eqv" }, 102 { ERASE, "Erase" }, 103 { _ERROR_, "Error" }, 104 { EXIT, "Exit" }, |
105 { EXPLICIT, "Explicit" }, | 105 { BASIC_EXPLICIT, "Explicit" }, |
106 { FOR, "For" }, 107 { FUNCTION, "Function" }, 108 { GET, "Get" }, 109 { GLOBAL, "Global" }, 110 { GOSUB, "GoSub" }, 111 { GOTO, "GoTo" }, 112 { IF, "If" }, 113 { IMP, "Imp" }, --- 153 unchanged lines hidden (view full) --- 267 { ENDSELECT,"End Select" }, 268 { ENDSUB, "End Sub" }, 269 { ENDTYPE, "End Type" }, 270 { ENDIF, "EndIf" }, 271 { EQV, "Eqv" }, 272 { ERASE, "Erase" }, 273 { _ERROR_, "Error" }, 274 { EXIT, "Exit" }, | 106 { FOR, "For" }, 107 { FUNCTION, "Function" }, 108 { GET, "Get" }, 109 { GLOBAL, "Global" }, 110 { GOSUB, "GoSub" }, 111 { GOTO, "GoTo" }, 112 { IF, "If" }, 113 { IMP, "Imp" }, --- 153 unchanged lines hidden (view full) --- 267 { ENDSELECT,"End Select" }, 268 { ENDSUB, "End Sub" }, 269 { ENDTYPE, "End Type" }, 270 { ENDIF, "EndIf" }, 271 { EQV, "Eqv" }, 272 { ERASE, "Erase" }, 273 { _ERROR_, "Error" }, 274 { EXIT, "Exit" }, |
275 { EXPLICIT, "Explicit" }, | 275 { BASIC_EXPLICIT, "Explicit" }, |
276 { FOR, "For" }, 277 { FUNCTION, "Function" }, 278 { GLOBAL, "Global" }, 279 { GOSUB, "GoSub" }, 280 { GOTO, "GoTo" }, 281 { IF, "If" }, 282 { IMP, "Imp" }, 283 { _IN_, "In" }, --- 70 unchanged lines hidden (view full) --- 354TokenLabelInfo::TokenLabelInfo( void ) 355{ 356 m_pTokenCanBeLabelTab = new bool[VBASUPPORT+1]; 357 for( int i = 0 ; i <= VBASUPPORT ; ++i ) 358 m_pTokenCanBeLabelTab[i] = false; 359 360 // Token accepted as label by VBA 361 SbiToken eLabelToken[] = { ACCESS, ALIAS, APPEND, BASE, BINARY, CLASSMODULE, | 276 { FOR, "For" }, 277 { FUNCTION, "Function" }, 278 { GLOBAL, "Global" }, 279 { GOSUB, "GoSub" }, 280 { GOTO, "GoTo" }, 281 { IF, "If" }, 282 { IMP, "Imp" }, 283 { _IN_, "In" }, --- 70 unchanged lines hidden (view full) --- 354TokenLabelInfo::TokenLabelInfo( void ) 355{ 356 m_pTokenCanBeLabelTab = new bool[VBASUPPORT+1]; 357 for( int i = 0 ; i <= VBASUPPORT ; ++i ) 358 m_pTokenCanBeLabelTab[i] = false; 359 360 // Token accepted as label by VBA 361 SbiToken eLabelToken[] = { ACCESS, ALIAS, APPEND, BASE, BINARY, CLASSMODULE, |
362 COMPARE, COMPATIBLE, DEFERR, _ERROR_, EXPLICIT, LIB, LINE, LPRINT, NAME, | 362 COMPARE, COMPATIBLE, DEFERR, _ERROR_, BASIC_EXPLICIT, LIB, LINE, LPRINT, NAME, |
363 TOBJECT, OUTPUT, PROPERTY, RANDOM, READ, STEP, STOP, TEXT, VBASUPPORT, NIL }; 364 SbiToken* pTok = eLabelToken; 365 SbiToken eTok; 366 for( pTok = eLabelToken ; (eTok = *pTok) != NIL ; ++pTok ) 367 m_pTokenCanBeLabelTab[eTok] = true; 368} 369 370TokenLabelInfo::~TokenLabelInfo() --- 344 unchanged lines hidden --- | 363 TOBJECT, OUTPUT, PROPERTY, RANDOM, READ, STEP, STOP, TEXT, VBASUPPORT, NIL }; 364 SbiToken* pTok = eLabelToken; 365 SbiToken eTok; 366 for( pTok = eLabelToken ; (eTok = *pTok) != NIL ; ++pTok ) 367 m_pTokenCanBeLabelTab[eTok] = true; 368} 369 370TokenLabelInfo::~TokenLabelInfo() --- 344 unchanged lines hidden --- |