added option -cl-kernel-arg-info to the default options in cl_compile…

…:file/2 when version 1.2 is detected, the kernel_arg_info the contains interesting info
GunnarPDX · May 13, 2014 · 79ad820 · 79ad820
1 parent b3e6896
commit 79ad820
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/examples/cl_compile.erl b/examples/cl_compile.erl
@@ -12,7 +12,13 @@
 %% compile File into binary,
 
 file(File) ->  file(File,all).
-file(File,Type) -> file(File,Type,"").
+file(File,Type) ->
+    case lists:member({1,2}, cl:versions()) of
+	true ->
+	    file(File,Type,"-cl-kernel-arg-info");
+	false ->
+	    file(File,Type,"")
+    end.
 
 file(File,Type,Options) ->
     Clu = clu:setup(Type),