Changeset 515 in dev for trunk/ab5.0/abdev
- Timestamp:
- May 1, 2008, 12:10:33 PM (17 years ago)
- Location:
- trunk/ab5.0/abdev
- Files:
-
- 2 added
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/abdev/BasicCompiler_Common/BasicFixed.h
r462 r515 3 3 4 4 #define MAX_ARRAYDIM 16 5 #define PTR_SIZE sizeof(LONG_PTR)6 5 #define VN_SIZE 1024 7 6 #define MAX_LEN 65535 … … 15 14 #define MACHINE_AMD64 2 16 15 17 18 ////////////////19 // 型20 ////////////////21 22 #define DEF_NON -123 24 /* basic\command.sbp内の "_System_Type_***" 定数と同期が必要 */25 #define FLAG_PTR 0x8000000026 #define FLAG_CAST 0x4000000027 28 //整数型29 #define DEF_SBYTE 0x0000000130 #define DEF_BYTE 0x0000000231 #define DEF_INTEGER 0x0000000332 #define DEF_WORD 0x0000000433 #define DEF_LONG 0x0000000534 #define DEF_DWORD 0x0000000635 #define DEF_INT64 0x0000000736 #define DEF_QWORD 0x0000000837 38 //実数型39 #define DEF_SINGLE 0x0000000940 #define DEF_DOUBLE 0x0000000A41 42 //文字型43 #define DEF_CHAR 0x0000000B44 45 //bool型46 #define DEF_BOOLEAN 0x0000000C47 48 //文字列型49 #define DEF_STRING 0x0000000D50 51 //ポインタ型52 #define DEF_PTR_VOID 0x0000000E53 #define DEF_PTR_PROC 0x0000000F54 55 //特殊型56 #define DEF_ANY 0x0000001557 #define DEF_ELLIPSE 0x0000001658 #define DEF_OBJECT 0x00000017 // クラス59 #define DEF_STRUCT 0x00000018 // 構造体60 #define DEF_TYPE_PARAMETER 0x00000019 // 型パラメータ(ジェネリクスサポート)61 62 //ポインタ型63 #define MASK_PTR 0x0000ff0064 #define MASK_NATURAL 0x000000ff65 66 #define PTR_LEVEL(t) (((t)&MASK_PTR)>>8)67 #define NATURAL_TYPE(t) ((t)&MASK_NATURAL)68 #define MAKE_PTR_TYPE(t,p) ((t)|((p)<<8))69 #define PTR_LEVEL_UP(t) t = MAKE_PTR_TYPE(NATURAL_TYPE(t),PTR_LEVEL(t)+1)70 #define PTR_LEVEL_DOWN(t) t = MAKE_PTR_TYPE(NATURAL_TYPE(t),PTR_LEVEL(t)-1)71 72 #define DEF_PTR_OBJECT MAKE_PTR_TYPE(DEF_OBJECT,1)73 #define DEF_PTR_STRUCT MAKE_PTR_TYPE(DEF_STRUCT,1)74 75 76 77 //NumOpe関数の結果がリテラル値の場合、その値の補助情報がindexに格納される78 #define LITERAL_NULL -279 #define LITERAL_M128_0 -380 #define LITERAL_0_255 -481 #define LITERAL_M32768_0 -582 #define LITERAL_0_65535 -683 #define LITERAL_OTHER_MINUS -784 #define LITERAL_OTHER_PLUS -885 86 #define LITERAL_STRING -987 88 #define IS_LITERAL(x) (x<=LITERAL_NULL&&x!=LITERAL_STRING)89 #define IS_MINUS_LITERAL(x) (x==LITERAL_M128_0||x==LITERAL_M32768_0||x==LITERAL_OTHER_MINUS)90 #define IS_POSITIVE_LITERAL(x) (x==LITERAL_NULL||x==LITERAL_0_255||x==LITERAL_0_65535||x==LITERAL_OTHER_PLUS)91 16 92 17 ////////////////////////////////////// -
trunk/ab5.0/abdev/BasicCompiler_Common/common.h
r485 r515 33 33 34 34 35 #define PTR_SIZE sizeof(LONG_PTR)36 35 #define OBJECT_HEAD_SIZE PTR_SIZE*4 37 36 -
trunk/ab5.0/abdev/BasicCompiler_Common/src/ObjectModule.cpp
r513 r515 43 43 44 44 #include <abdev/ab_common/Environment.h> 45 #include <abdev/ab_common/include/Namespace.h> 46 #include <abdev/ab_common/include/NamespaceSupporter.h> 47 #include <abdev/ab_common/include/Symbol.h> 48 #include <abdev/ab_common/include/Prototype.h> 45 #include <abdev/ab_common/include/ab_common.h> 49 46 50 47 using namespace ActiveBasic::Common::Lexical; -
trunk/ab5.0/abdev/ab_common/ab_common.vcproj
r510 r515 317 317 > 318 318 <File 319 RelativePath=".\include\Namespace.h" 320 > 321 </File> 322 <File 323 RelativePath=".\include\NamespaceSupporter.h" 324 > 325 </File> 326 <File 327 RelativePath=".\include\Prototype.h" 328 > 329 </File> 330 <File 331 RelativePath=".\include\Symbol.h" 319 RelativePath=".\src\Namespace.cpp" 320 > 321 </File> 322 <File 323 RelativePath=".\src\NamespaceSupporter.cpp" 324 > 325 </File> 326 <File 327 RelativePath=".\src\Symbol.cpp" 332 328 > 333 329 </File> … … 340 336 > 341 337 <File 338 RelativePath=".\include\ab_common.h" 339 > 340 </File> 341 <File 342 342 RelativePath=".\Environment.h" 343 343 > … … 351 351 > 352 352 <File 353 RelativePath=".\src\Namespace.cpp" 354 > 355 </File> 356 <File 357 RelativePath=".\src\NamespaceSupporter.cpp" 358 > 359 </File> 360 <File 361 RelativePath=".\src\Symbol.cpp" 353 RelativePath=".\include\Namespace.h" 354 > 355 </File> 356 <File 357 RelativePath=".\include\NamespaceSupporter.h" 358 > 359 </File> 360 <File 361 RelativePath=".\include\Prototype.h" 362 > 363 </File> 364 <File 365 RelativePath=".\include\Symbol.h" 366 > 367 </File> 368 <File 369 RelativePath=".\include\TypeMisc.h" 362 370 > 363 371 </File> -
trunk/ab5.0/abdev/ab_common/stdafx.h
r510 r515 32 32 33 33 #include "Environment.h" 34 #include "include/ab_common.h" 34 35 35 #include <Namespace.h>36 #include <NamespaceSupporter.h>37 #include <Symbol.h>38 #include <Prototype.h> -
trunk/ab5.0/abdev/abdev/stdafx.h
r503 r515 20 20 21 21 #include <atlbase.h> 22 #include <atlcom.h> // ATL COMハ用wb_t@C23 #include <atlhost.h> // ATL Rei@\T|[gpwb_t@C22 #include <atlcom.h> 23 #include <atlhost.h> 24 24 #include <atlapp.h> 25 #include <atlframe.h> // ATL Rei@\T|[gpwb_t@C25 #include <atlframe.h> 26 26 #include <atlcrack.h> 27 27 #include <atlmisc.h> … … 29 29 //boost libraries 30 30 #include <boost/foreach.hpp> 31 #include <boost/serialization/serialization.hpp> 32 #include <boost/serialization/nvp.hpp> 33 #include <boost/serialization/export.hpp> 31 34 32 35 #include <jenga/include/common/CmdLine.h> … … 37 40 38 41 #include <abdev/ab_common/Environment.h> 42 #include <abdev/ab_common/include/ab_common.h> 39 43 40 44 #ifdef THETEXT -
trunk/ab5.0/abdev/compiler_x64/stdafx.h
r514 r515 32 32 33 33 #include <abdev/ab_common/Environment.h> 34 #include <abdev/ab_common/include/Namespace.h> 35 #include <abdev/ab_common/include/NamespaceSupporter.h> 36 #include <abdev/ab_common/include/Symbol.h> 37 #include <abdev/ab_common/include/Prototype.h> 34 #include <abdev/ab_common/include/ab_common.h> 38 35 39 36 using namespace ActiveBasic::Common::Lexical; -
trunk/ab5.0/abdev/compiler_x86/stdafx.h
r513 r515 32 32 33 33 #include <abdev/ab_common/Environment.h> 34 #include <abdev/ab_common/include/Namespace.h> 35 #include <abdev/ab_common/include/NamespaceSupporter.h> 36 #include <abdev/ab_common/include/Symbol.h> 37 #include <abdev/ab_common/include/Prototype.h> 34 #include <abdev/ab_common/include/ab_common.h> 38 35 39 36 using namespace ActiveBasic::Common::Lexical;
Note:
See TracChangeset
for help on using the changeset viewer.