From e29a1924afe9e6051369f7bcbf44ccdf53de536a Mon Sep 17 00:00:00 2001 From: Paul Joseph Davis Date: Mon, 9 Nov 2009 00:39:16 +0000 Subject: Fixes 'make distcheck' to run the test suite. Quite a few changes to the build system to handle VPATH builds appropriately as well as make the test suite know about them. git-svn-id: https://svn.apache.org/repos/asf/couchdb/trunk@833951 13f79535-47bb-0310-9956-ffa450edef68 --- test/run_native_process.es | 55 ---------------------------------------------- 1 file changed, 55 deletions(-) delete mode 100755 test/run_native_process.es (limited to 'test/run_native_process.es') diff --git a/test/run_native_process.es b/test/run_native_process.es deleted file mode 100755 index dfdc423e..00000000 --- a/test/run_native_process.es +++ /dev/null @@ -1,55 +0,0 @@ -#! /usr/bin/env escript - -% Licensed under the Apache License, Version 2.0 (the "License"); you may not -% use this file except in compliance with the License. You may obtain a copy of -% the License at -% -% http://www.apache.org/licenses/LICENSE-2.0 -% -% Unless required by applicable law or agreed to in writing, software -% distributed under the License is distributed on an "AS IS" BASIS, WITHOUT -% WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the -% License for the specific language governing permissions and limitations under -% the License. - -read() -> - case io:get_line('') of - eof -> stop; - Data -> mochijson2:decode(Data) - end. - -send(Data) when is_binary(Data) -> - send(binary_to_list(Data)); -send(Data) when is_list(Data) -> - io:format(Data ++ "\n", []). - -write(Data) -> - case (catch mochijson2:encode(Data)) of - {json_encode, Error} -> write({[{<<"error">>, Error}]}); - Json -> send(Json) - end. - -%log(Mesg) -> -% log(Mesg, []). -%log(Mesg, Params) -> -% io:format(standard_error, Mesg, Params). - -loop(Pid) -> - case read() of - stop -> ok; - Json -> - case (catch couch_native_process:prompt(Pid, Json)) of - {error, Reason} -> - ok = write({[{error, Reason}]}); - Resp -> - ok = write(Resp), - loop(Pid) - end - end. - -main([]) -> - code:add_pathz("src/couchdb"), - code:add_pathz("src/mochiweb"), - {ok, Pid} = couch_native_process:start_link(), - loop(Pid). - -- cgit v1.2.3