uasm 1.0.9+2.57

A library to build the UASM compiler, for usage in build scripts.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42


;--- v2.08pre temporarily had problems in FORC if the item was a blank
;--- the L() macro function has problems with !,<,> and quotes

	 .386
	 .model flat, stdcall
	 option casemap:none

;---- L() defines a wide string

L macro parms:VARARG
local wstr,i,c,tstr
    wstr textequ <>
    i = 0
    for parm,<parms>
      c SubStr <parm>,1,1
      ifidn c,<">
        tstr SubStr <parm>,2,@SizeStr(parm)-2    
%       forc chr$,<tstr>
          if i
            wstr CatStr wstr,<,>
          endif
          wstr CatStr wstr,<'&chr$'>
          i = i + 1      
        endm
      else  
        if i
          wstr CatStr wstr,<,>
        endif
        wstr CatStr wstr,<parm>
      endif
    endm
    exitm <wstr>
endm

	.data

	dw L("abc def")
	dw L("%&a")
;	dw L("!!!!")  ;these "disappear" in Masm

	END