change js to bs

Author: Hongbo Zhang

typing/typedecl.ml

@@ -1327,7 +1327,7 @@ let transl_value_decl env loc valdecl =
       let prim = Primitive.parse_declaration (Some ty) valdecl.pval_attributes arity decl in
       if arity = 0 && prim.prim_name.[0] <> '%' && 
         not (List.exists (function
-          | ({Location.txt = "js.val";_},_) -> true
+          | ({Location.txt = "bs.val";_},_) -> true
           | _ -> false) valdecl.pval_attributes ) then
         raise(Error(valdecl.pval_type.ptyp_loc, Null_arity_external));
       if !Clflags.native_code