Changeset 78 in dev for BasicCompiler32
- Timestamp:
- Mar 25, 2007, 2:47:49 AM (18 years ago)
- Location:
- BasicCompiler32
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
BasicCompiler32/BasicCompiler.vcproj
r76 r78 48 48 Name="VCCLCompilerTool" 49 49 Optimization="0" 50 AdditionalIncludeDirectories="..\cpplibs\boost "50 AdditionalIncludeDirectories="..\cpplibs\boost;..\BasicCompiler_Common\include" 51 51 PreprocessorDefinitions="WIN32;_DEBUG;_WINDOWS;JPN" 52 52 MinimalRebuild="true" … … 894 894 </FileConfiguration> 895 895 </File> 896 <File897 RelativePath="..\BasicCompiler_Common\TypeDef.cpp"898 >899 <FileConfiguration900 Name="Debug|Win32"901 >902 <Tool903 Name="VCCLCompilerTool"904 PreprocessorDefinitions=""905 />906 </FileConfiguration>907 <FileConfiguration908 Name="Release|Win32"909 >910 <Tool911 Name="VCCLCompilerTool"912 PreprocessorDefinitions=""913 />914 </FileConfiguration>915 <FileConfiguration916 Name="English_Rel|Win32"917 >918 <Tool919 Name="VCCLCompilerTool"920 PreprocessorDefinitions=""921 />922 </FileConfiguration>923 </File>924 896 </Filter> 925 897 <Filter … … 1879 1851 > 1880 1852 <File 1853 RelativePath="..\BasicCompiler_Common\src\House.cpp" 1854 > 1855 </File> 1856 <File 1881 1857 RelativePath="..\BasicCompiler_Common\Procedure.cpp" 1882 1858 > … … 1885 1861 RelativePath="..\BasicCompiler_Common\Type.cpp" 1886 1862 > 1863 </File> 1864 <File 1865 RelativePath="..\BasicCompiler_Common\TypeDef.cpp" 1866 > 1867 <FileConfiguration 1868 Name="Debug|Win32" 1869 > 1870 <Tool 1871 Name="VCCLCompilerTool" 1872 PreprocessorDefinitions="" 1873 /> 1874 </FileConfiguration> 1875 <FileConfiguration 1876 Name="Release|Win32" 1877 > 1878 <Tool 1879 Name="VCCLCompilerTool" 1880 PreprocessorDefinitions="" 1881 /> 1882 </FileConfiguration> 1883 <FileConfiguration 1884 Name="English_Rel|Win32" 1885 > 1886 <Tool 1887 Name="VCCLCompilerTool" 1888 PreprocessorDefinitions="" 1889 /> 1890 </FileConfiguration> 1887 1891 </File> 1888 1892 <File … … 1935 1939 > 1936 1940 </File> 1937 <File1938 RelativePath="..\BasicCompiler_Common\TypeDef.h"1939 >1940 </File>1941 1941 </Filter> 1942 1942 <Filter … … 1944 1944 > 1945 1945 <File 1946 RelativePath="..\BasicCompiler_Common\include\House.h" 1947 > 1948 </File> 1949 <File 1946 1950 RelativePath="..\BasicCompiler_Common\Parameter.h" 1947 1951 > … … 1953 1957 <File 1954 1958 RelativePath="..\BasicCompiler_Common\Type.h" 1959 > 1960 </File> 1961 <File 1962 RelativePath="..\BasicCompiler_Common\TypeDef.h" 1955 1963 > 1956 1964 </File> -
BasicCompiler32/Compile_Func.cpp
r76 r78 254 254 255 255 //オーバーロードを解決 256 extern ProcPointer **ppProcPointer; 257 pUserProc=OverloadSolution(name,subs,ppProcPointer[ProcPtr_BaseIndex]->Params(), Type() ); 256 pUserProc=OverloadSolution(name,subs,House::procPointers[ProcPtr_BaseIndex]->Params(), Type() ); 258 257 259 258 if(!pUserProc){ -
BasicCompiler32/Compile_ProcOp.cpp
r76 r78 203 203 memcpy(OpBuffer+obp,Buffer_aullshr,31); 204 204 obp+=31; 205 } 206 else{ 207 SetError(); 205 208 } 206 209 } -
BasicCompiler32/MakePeHdr.cpp
r76 r78 17 17 *pSub_System_InitStaticLocalVariables, 18 18 *pSub_System_Call_Destructor_of_GlobalObject, 19 *pSub_System_End, 19 20 *pSub_System_GetSp, 20 21 *pSub_pow, … … 150 151 151 152 //関数ポインタ情報を初期化 152 extern ProcPointer **ppProcPointer; 153 extern int ProcPtrInfoNum; 154 ppProcPointer=(ProcPointer **)HeapAlloc(hHeap,0,1); 155 ProcPtrInfoNum=0; 153 House::procPointers.clear(); 156 154 157 155 //クラス名を取得(詳細情報はGetAllClassInfoで取得) … … 161 159 pobj_DBClass->InitNames(); 162 160 161 //TypeDef情報を初期化 162 House::typeDefs.Init(); 163 163 164 //定数情報を取得 164 165 GetConstInfo(); … … 215 216 } 216 217 218 if(pSub_System_End=GetSubHash("_System_End",1)){ 219 pSub_System_End->Using(); 220 } 221 217 222 if(pSub_System_GetSp=GetSubHash("_System_GetSp",1)){ 218 223 pSub_System_GetSp->Using(); … … 314 319 #ifdef _DEBUG 315 320 { 316 ofstream ofs( "middle_code.txt");321 ofstream ofs( ( (string)BasicSystemDir + "middle_code.txt" ).c_str() ); 317 322 ofs << basbuf << endl; 318 323 ofs.close(); … … 399 404 /////////////////////////////////////// 400 405 401 //call _System_ Call_Destructor_of_GlobalObject402 extern UserProc *pSub_System_ Call_Destructor_of_GlobalObject;403 op_call(pSub_System_ Call_Destructor_of_GlobalObject);406 //call _System_End 407 extern UserProc *pSub_System_End; 408 op_call(pSub_System_End); 404 409 405 410 -
BasicCompiler32/Opcode.h
r77 r78 194 194 195 195 //ParamImpl.cpp 196 #define OVERLOAD_MIN_LEVEL 0197 #define OVERLOAD_MAX_LEVEL 3198 #define OVERLOAD_LEVEL0 0199 #define OVERLOAD_LEVEL1 1200 #define OVERLOAD_LEVEL2 2201 #define OVERLOAD_LEVEL3 3202 196 class ParamImpl{ 203 197 char *Parms[255];
Note:
See TracChangeset
for help on using the changeset viewer.