Navigation Menu

Skip to content

Commit

Permalink
Merge branch 'fredrik/ic_make_ji/OTP-10876' into maint
Browse files Browse the repository at this point in the history
* fredrik/ic_make_ji/OTP-10876:
  String instead of atom, not_found handled by ts:make
  Checking if jinterface is present
  • Loading branch information
rimmius committed Mar 12, 2013
2 parents 9bcc7fe + 5a43729 commit bec7094
Show file tree
Hide file tree
Showing 2 changed files with 20 additions and 4 deletions.
2 changes: 1 addition & 1 deletion lib/ic/test/java_client_erl_server_SUITE_data/Makefile.src
Expand Up @@ -66,7 +66,7 @@ CLASS_FILES = $(JAVA_FILES:.java=.class)
ERL_FILES = $(GEN_ERL_FILES) m_i_impl.erl ERL_FILES = $(GEN_ERL_FILES) m_i_impl.erl
EBINS = $(ERL_FILES:.erl=.@EMULATOR@) EBINS = $(ERL_FILES:.erl=.@EMULATOR@)


@IFEQ@ (@jinterface_classpath@,) @IFEQ@ (@jinterface@,not_found)
all: all:
@ELSE@ @ELSE@
all: $(CLASS_FILES) $(EBINS) all: $(CLASS_FILES) $(EBINS)
Expand Down
22 changes: 19 additions & 3 deletions lib/test_server/src/ts_erl_config.erl
Expand Up @@ -32,7 +32,7 @@ variables(Base0, OsType) ->
Base2 = get_app_vars(fun erl_interface/2, Base1, OsType), Base2 = get_app_vars(fun erl_interface/2, Base1, OsType),
Base3 = get_app_vars(fun ic/2, Base2, OsType), Base3 = get_app_vars(fun ic/2, Base2, OsType),
Base4 = get_app_vars(fun jinterface/2, Base3, OsType), Base4 = get_app_vars(fun jinterface/2, Base3, OsType),
Base5 = dl_vars(Base4, OsType), Base5 = dl_vars(Base4, Base3, OsType),
Base6 = emu_vars(Base5), Base6 = emu_vars(Base5),
Base7 = get_app_vars(fun ssl/2, Base6, OsType), Base7 = get_app_vars(fun ssl/2, Base6, OsType),
Base8 = erts_lib(Base7, OsType), Base8 = erts_lib(Base7, OsType),
Expand Down Expand Up @@ -60,15 +60,31 @@ get_app_vars(AppFun, Vars, OsType) ->
exit({unexpected_internal_error, Garbage}) exit({unexpected_internal_error, Garbage})
end. end.


dl_vars(Vars, _) -> dl_vars(Vars, Base3, OsType) ->
ShlibRules0 = ".SUFFIXES:\n" ++ ShlibRules0 = ".SUFFIXES:\n" ++
".SUFFIXES: @dll@ @obj@ .c\n\n" ++ ".SUFFIXES: @dll@ @obj@ .c\n\n" ++
".c@dll@:\n" ++ ".c@dll@:\n" ++
"\t@CC@ -c @SHLIB_CFLAGS@ $(SHLIB_EXTRA_CFLAGS) -I@erl_include@ @DEFS@ $<\n" ++ "\t@CC@ -c @SHLIB_CFLAGS@ $(SHLIB_EXTRA_CFLAGS) -I@erl_include@ @DEFS@ $<\n" ++
"\t@SHLIB_LD@ @CROSSLDFLAGS@ @SHLIB_LDFLAGS@ $(SHLIB_EXTRA_LDFLAGS) -o $@ $*@obj@ @SHLIB_LDLIBS@ $(SHLIB_EXTRA_LDLIBS)", "\t@SHLIB_LD@ @CROSSLDFLAGS@ @SHLIB_LDFLAGS@ $(SHLIB_EXTRA_LDFLAGS) -o $@ $*@obj@ @SHLIB_LDLIBS@ $(SHLIB_EXTRA_LDLIBS)",


ShlibRules = ts_lib:subst(ShlibRules0, Vars), ShlibRules = ts_lib:subst(ShlibRules0, Vars),
[{'SHLIB_RULES', ShlibRules}|Vars]. case get_app_vars2(fun jinterface/2, Base3, OsType) of
{App, not_found} ->
[{'SHLIB_RULES', ShlibRules}, {App, "not_found"}|Vars];
_ ->
[{'SHLIB_RULES', ShlibRules}|Vars]
end.
get_app_vars2(AppFun, Vars, OsType) ->
case catch AppFun(Vars,OsType) of
Res when is_list(Res) ->
{jinterface, ok};
{cannot_find_app, App} ->
{App, not_found};
{'EXIT', Reason} ->
exit(Reason);
Garbage ->
exit({unexpected_internal_error, Garbage})
end.


erts_lib_name(multi_threaded, {win32, V}) -> erts_lib_name(multi_threaded, {win32, V}) ->
link_library("erts_MD" ++ case is_debug_build() of link_library("erts_MD" ++ case is_debug_build() of
Expand Down

0 comments on commit bec7094

Please sign in to comment.