Add default values for some primitive type attributes.

[nit.git] / src / compiling / compiling_base.nit

diff --git a/src/compiling/compiling_base.nit b/src/compiling/compiling_base.nit
index 9256cbe..95b1a82 100644 (file)
--- a/src/compiling/compiling_base.nit
+++ b/src/compiling/compiling_base.nit
@@ -21,14 +21,14 @@ import syntax
 private import utils
 
 redef class ToolContext
-       readable writable attr _global: Bool 
-       readable writable attr _attr_sim: Bool 
-       readable writable attr _base_dir: String
+       readable writable attr _global: Bool = false 
+       readable writable attr _attr_sim: Bool = false
+       readable writable attr _compdir: String
        readable writable attr _clibdir: String
        readable writable attr _bindir: String
        readable writable attr _output_file: String
-       readable writable attr _boost: Bool
-       readable writable attr _no_cc: Bool
+       readable writable attr _boost: Bool = false
+       readable writable attr _no_cc: Bool = false
        readable writable attr _ext_prefix: String 
 end
 
@@ -64,7 +64,7 @@ class CompilerVisitor
                return res
        end
        # next number for new_number
-       attr _number_cpt: Int
+       attr _number_cpt: Int = 0
 
        # Add an indent level.
        # New decl and instr will be indented.
@@ -94,7 +94,7 @@ class CompilerVisitor
        readable writable attr _ctx: CContext = new CContext
 
        # The current indent lever
-       readable writable attr _indent_level: Int 
+       readable writable attr _indent_level: Int = 0 
 
        # The current ToolContext
        readable writable attr _tc: ToolContext 
@@ -164,7 +164,7 @@ redef class MMLocalClass
        attr _primitive_info_cache: PrimitiveInfo
 
        # If primitive_info result cached?
-       attr _primitive_info_b: Bool
+       attr _primitive_info_b: Bool = false
 
        # Return the primitive information of the class.
        # Return null if the class is not primitive
@@ -200,9 +200,9 @@ redef class MMLocalClass
        private meth primitive_ctypes: HashMap[Symbol, PrimitiveInfo]
        do
                var res = new HashMap[Symbol, PrimitiveInfo]
-               var pnames = ["Int", "Char", "Bool", "Float", "NativeString", "NativeArray", "Pointer"]
-               var tagged = [true,  true,   true,   false,   false,          false,         false]
-               var cnames = ["int", "char", "int",  "float", "char *",       "val_t *",     "void *"]
+               var pnames = ["Int",    "Char", "Bool", "Float", "NativeString", "NativeArray", "Pointer"]
+               var tagged = [true,     true,   true,   false,   false,          false,         false]
+               var cnames = ["bigint", "char", "int",  "float", "char *",       "val_t *",     "void *"]
                for i in [0..pnames.length[ do
                        var n = pnames[i].to_symbol
                        var pi = new PrimitiveInfo
@@ -290,7 +290,7 @@ redef class MMLocalProperty
        meth cname: String
        do
                if _cname_cache == null then
-                       _cname_cache = cmangle(concrete_property.module.name, concrete_property.local_class.name, name)
+                       _cname_cache = cmangle(module.name, local_class.name, name)
                end
                return _cname_cache
        end