Preprocessor tests updated

Author: boriel

tests/functional/emook0.out

@@ -1,11 +1,6 @@
 #line 1 "emook0.bi"
-
-
 ASM 
-        
         LD A,A 
         LD BC,254 
 #line 6
-
 end Asm
-

tests/functional/prepro00.out

@@ -1,124 +1,48 @@
 #line 1 "prepro00.bi"
-#line 1 "/zxbasic/library/attr.bas"
-
-
-
-
-
-
-
-
-
-
-
-
-
+#line 1 "/zxbasic/arch/zx48k/library/attr.bas"
 #pragma push(case_insensitive)
 #pragma case_insensitive = TRUE
-
-
-
-
-
-
-
-
-
-
-
 function attr(byval row as ubyte, byval col as ubyte) as ubyte
     asm
-
     PROC
     LOCAL __ATTR_END
-
     ld e, (ix+7)
     ld d, (ix+5)
-
-    
     call __IN_SCREEN
     jr nc, __ATTR_END
-
     call __ATTR_ADDR
     ld a, (hl)	
-
 __ATTR_END:
     ENDP 
-
     end asm
-
 end function
-
-
-
-
-
-
-
-
-
-
-
-
-
-
 sub setattr(byval row as ubyte, byval col as ubyte, byval value as ubyte)
     asm
-
     PROC
     LOCAL __ATTR_END
-
     ld e, (ix+7)
     ld d, (ix+5)
-
-    
     call __IN_SCREEN
     jr nc, __ATTR_END
-
     call __ATTR_ADDR
     ld a, (ix+9)
     ld (hl), a	
-
 __ATTR_END:
     ENDP 
-
     end asm
-
 end sub
-
-
-
-
-
-
-
-
-
-
-
 function fastcall attraddr(byval row as ubyte, byval col as ubyte) as uinteger
     asm   
-                   
     pop hl         
     ex (sp), hl    
     ld d, a        
     ld e, h
     jp __ATTR_ADDR 
     end asm
 end function
-
-
-
 #pragma pop(case_insensitive)
-
-
 #require "attr.asm"
-
-
 #require "in_screen.asm"
-
-#line 119 "/zxbasic/library/attr.bas"
-
+#line 119 "/zxbasic/arch/zx48k/library/attr.bas"
 #line 2 "prepro00.bi"
 PRINT "HELLO"
-

tests/functional/prepro01.out

@@ -1,125 +1,48 @@
 #line 1 "prepro01.bi"
-#line 1 "/zxbasic/library/attr.bas"
-
-
-
-
-
-
-
-
-
-
-
-
-
+#line 1 "/zxbasic/arch/zx48k/library/attr.bas"
 #pragma push(case_insensitive)
 #pragma case_insensitive = TRUE
-
-
-
-
-
-
-
-
-
-
-
 function attr(byval row as ubyte, byval col as ubyte) as ubyte
     asm
-
     PROC
     LOCAL __ATTR_END
-
     ld e, (ix+7)
     ld d, (ix+5)
-
-    
     call __IN_SCREEN
     jr nc, __ATTR_END
-
     call __ATTR_ADDR
     ld a, (hl)	
-
 __ATTR_END:
     ENDP 
-
     end asm
-
 end function
-
-
-
-
-
-
-
-
-
-
-
-
-
-
 sub setattr(byval row as ubyte, byval col as ubyte, byval value as ubyte)
     asm
-
     PROC
     LOCAL __ATTR_END
-
     ld e, (ix+7)
     ld d, (ix+5)
-
-    
     call __IN_SCREEN
     jr nc, __ATTR_END
-
     call __ATTR_ADDR
     ld a, (ix+9)
     ld (hl), a	
-
 __ATTR_END:
     ENDP 
-
     end asm
-
 end sub
-
-
-
-
-
-
-
-
-
-
-
 function fastcall attraddr(byval row as ubyte, byval col as ubyte) as uinteger
     asm   
-                   
     pop hl         
     ex (sp), hl    
     ld d, a        
     ld e, h
     jp __ATTR_ADDR 
     end asm
 end function
-
-
-
 #pragma pop(case_insensitive)
-
-
 #require "attr.asm"
-
-
 #require "in_screen.asm"
-
-#line 119 "/zxbasic/library/attr.bas"
-
+#line 119 "/zxbasic/arch/zx48k/library/attr.bas"
 #line 2 "prepro01.bi"
-
 PRINT "HOLA"
-

tests/functional/prepro02.out

@@ -1,9 +1,2 @@
 #line 1 "prepro02.bi"
-
-
-
-
 #line 6 "prepro02.bi"
-
-
-

tests/functional/prepro03.out

@@ -1,11 +1,3 @@
 #line 1 "prepro03.bi"
-
-
-
-
 x 
 y 
-
-
-
-

tests/functional/prepro04.out

@@ -1,7 +1,3 @@
 #line 1 "prepro04.bi"
-
 #line 5 "prepro04.bi"
-
 #line 7 "prepro04.bi"
-
-

tests/functional/prepro05.out

@@ -1,11 +1,3 @@
 #line 1 "prepro05.bi"
-
-
-
-
 y 
 test2
-
-
-
-

tests/functional/prepro06.out

@@ -1,10 +1,2 @@
 #line 1 "prepro06.bi"
-
-
-
-
 func ()
-
-
-
-

tests/functional/prepro09.out

@@ -1,5 +1 @@
 #line 1 "prepro09.bi"
-
-
-
-

tests/functional/prepro10.out

@@ -1,7 +1,4 @@
 #line 1 "prepro10.bi"
-
-
 function test(byval a as byte)
     let test = 0
 end function
-