Support ATTR_READONLY for interface properties.

f6ff452f · Vincent Béron · Alexandre Julliard · a477def6 · f6ff452f
Commit f6ff452f authored Feb 08, 2005 by Vincent Béron Committed by Alexandre Julliard Feb 08, 2005
Show whitespace changes
Inline Side-by-side

Showing with 3 additions and 0 deletions

write_msft.c tools/widl/write_msft.c +3 -0

No files found.
--- a/tools/widl/write_msft.c
+++ b/tools/widl/write_msft.c
@@ -1442,6 +1442,9 @@ static HRESULT add_var_desc(msft_typeinfo_t *typeinfo, UINT index, var_t* var)
        case ATTR_ID:
            id = expr->u.lval;
            break;
+        case ATTR_READONLY:
+            varflags |= 0x01; /* VARFLAG_FREADONLY */
+            break;
        default:
            warning("AddVarDesc: unhandled attr type %d\n", attr->type);
            break;