added added debug flag support to fasm

git-svn-id: svn://kolibrios.org@3662 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/fasm/trunk/fasm.asm

@@ -56,6 +56,50 @@ START:	    ; Start of execution
 	cmp	[params],0
 	jz	start_1
 	
+	                                              ;---------GerdtR
+        or      ecx,-1                      
+        mov     esi,params
+        cmp     byte[esi],' '
+        jne     @f
+        mov     edi,esi
+        mov     al,' '
+        repe    scasb
+        mov     esi,edi
+        dec     esi
+    @@:
+
+        mov     edi,dbgWord
+    @@: lodsb
+        scasb
+        jne     NoOutDebugInfo
+        cmp     byte[edi],0
+        jnz     @b
+
+        cmp     byte[esi],' '
+        jne     NoOutDebugInfo
+
+        mov     edi,esi
+        mov     al,' '
+        repe    scasb
+        mov     esi,edi
+        dec     esi
+
+        mov     edi,params
+    @@: lodsb
+        stosb
+        test    al,al
+        jnz     @b
+
+ ;       mov     [bGenerateDebugInfo], 1
+        or      dword[ch1_dbg.flags],10b
+
+
+NoOutDebugInfo:
+                                                   ;---------/GerdtR
+
+
+
+
 	mov	ecx,10
 	mov	eax,'    '
 	mov	edi,infile
@@ -653,6 +697,8 @@ _mode	       dd NORMAL_MODE
 _run_outfile  dd 0
 ;bGenerateDebugInfo db 0
 
+dbgWord         db '-d',0
+
 sub_table:
 times $41 db $00
 times $1A db $20