Changeset 14 in dev for BasicCompiler_Common/preprocessor.cpp

Timestamp:

Dec 10, 2006, 10:58:26 AM (18 years ago)

Author:

dai_9181

Message:

LexicalAnalysisのベース部分を用意。

File:

• BasicCompiler_Common/preprocessor.cpp (modified) (4 diffs)

BasicCompiler_Common/preprocessor.cpp

@@ -8 +8 @@
 
 
-class CDefine{
-    int num;
-    char **ppNames;
-public:
-    CDefine();
-    ~CDefine();
-
-    BOOL add(char *name);
-    BOOL undef(char *name);
-    BOOL check(char *name);
-};
 CDefine::CDefine(){
     extern HANDLE hHeap;
@@ -311 +300 @@
 
 char *IncludeFiles(char *base){
-    extern HANDLE hHeap;
     extern char szIncludeDir[MAX_PATH];
     extern char BasicCurDir[MAX_PATH];
@@ -435 +423 @@
 
             i3=lstrlen(buffer)+FileSize;
-            base=(char *)HeapReAlloc(hHeap,HEAP_ZERO_MEMORY,base,i3*2);
+            base=(char *)realloc(base,i3*2);
             buffer=base+2;
             SlideString(buffer+i2,FileSize+(i-i2));
@@ -463 +451 @@
     return base;
 }
-char *OpenBasicFile(char *FileName){
-    extern HANDLE hHeap;
-    char *base,*buffer;
-    DWORD dwFileSize,dwAccBytes;
-    HANDLE hFile;
-
-    //ファイルオープン
-    hFile=CreateFile(FileName,GENERIC_READ,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
-    if(hFile==INVALID_HANDLE_VALUE) return 0;
-
-    //#define情報を初期化
-    pobj_define=new CDefine;
-
-    //バッファ領域確保
-    dwFileSize=GetFileSize(hFile,0);
-    base=(char *)HeapAlloc(hHeap,0,dwFileSize*2+255);
-    base[0]='\n';
-    base[1]='\n';
-    buffer=base+2;
-    lstrcpy(buffer,"#include <basic.sbp>\n");
-    buffer+=lstrlen(buffer);
-
-    //読み込み
-    ReadFile(hFile,buffer,dwFileSize,&dwAccBytes,0);
-    buffer[dwAccBytes]=0;
-
-    //CRLFをLFに変換
-    ChangeReturnCode(buffer);
-
-    //コメント削除
-    DeleteComment(buffer);
-
-    //#ifdefディレクティブ
-    DirectiveIfdef(buffer);
-
-    //最終行には文字を含ませないようにする
-    lstrcat(buffer,"\n");
-
-    //ファイルクローズ
-    CloseHandle(hFile);
-
-    //インクルードファイルを読み込む
-    base=IncludeFiles(base);
-
-    //#define情報を破棄
-    delete pobj_define;
-    pobj_define=0;
-
-    return base;
-}