From: kramm <kramm>
Date: Tue, 30 Dec 2008 22:56:31 +0000 (+0000)
Subject: added access codes to member flags
X-Git-Tag: release-0-9-0~558
X-Git-Url: http://git.asbjorn.biz/?a=commitdiff_plain;h=25d0583a08d6627a09b3cc87cc9905fefa18c05c;p=swftools.git

added access codes to member flags
---

diff --git a/lib/as3/mklib.c b/lib/as3/mklib.c
index e4b01e2..bf963ba 100644
--- a/lib/as3/mklib.c
+++ b/lib/as3/mklib.c
@@ -192,6 +192,12 @@ void load_libraries(char*filename, int pass, FILE*fi)
                     fprintf(stderr, "Unknown trait type %d\n", trait->kind);
             }
             int flags = is_static?FLAG_STATIC:0;
+
+            if(access == ACCESS_PACKAGE) flags|=FLAG_PUBLIC;
+            if(access == ACCESS_PRIVATE) flags|=FLAG_PRIVATE;
+            if(access == ACCESS_PROTECTED) flags|=FLAG_PROTECTED;
+            if(access == ACCESS_PACKAGEINTERNAL) flags|=FLAG_INTERNAL;
+
             if(pass==0) {
                 fprintf(fi, "static memberinfo_t %s;\n", id2);
             } if(pass==1) {