Subversion Repositories Kolibri OS

Rev

Rev 8971 | Rev 8978 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8971 Rev 8972
Line 57... Line 57...
57
    if size@ccall
57
    if size@ccall
58
        add     esp, size@ccall
58
        add     esp, size@ccall
59
    end if }
59
    end if }
60
 
60
 
Line -... Line 61...
-
 
61
; @brief Define a procedure.\n
-
 
62
;        Calling convention for the procedure may be defined before parameter
-
 
63
;        list using `stdcall` or `c` word like this:\n
-
 
64
;        `proc name stdcall, param0, param1`\n
-
 
65
;        List of registers used in the procedure may be specified before
61
macro proc [args]                       ; define procedure
66
;        parameter list using `uses` word like this:\n
-
 
67
;        `proc name uses eax ebx ecx, param0, param1`\n
-
 
68
;        If you need to specify both calling convention and used registers
-
 
69
;        put calling convention first and then `uses` statement like this:\n
-
 
70
;        `proc name stdcall uses ebx ecx edx, param0, param1`
-
 
71
; @param args Name of the procedure and a comma-separated argument list.
-
 
72
;             Type of any parameter may be specified by semicolon after its
-
 
73
;             name like this:\n
-
 
74
;             `proc name param0:dword, param1:qword`.
-
 
75
macro proc [args]
62
 { common
76
 { common
63
    match name params, args>
77
    match name params, args>
64
    \{ define@proc name,
78
    \{ define@proc name,
Line 65... Line 79...
65
 
79