38 lines
1.3 KiB
Erlang
38 lines
1.3 KiB
Erlang
|
#!/usr/bin/env escript
|
||
|
%% -*- erlang -*-
|
||
|
%%! +A 0 -smp disable -noinput -noshell
|
||
|
|
||
|
%% -------------------------------------------------------------------
|
||
|
%%
|
||
|
%% Copyright (c) 2007-2014 Basho Technologies, Inc. All Rights Reserved.
|
||
|
%%
|
||
|
%% This file is provided to you 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.
|
||
|
%%
|
||
|
%% -------------------------------------------------------------------
|
||
|
|
||
|
-module(file0_checksum_list).
|
||
|
-compile(export_all).
|
||
|
|
||
|
-define(NO_MODULE, true).
|
||
|
-include("./file0.erl").
|
||
|
|
||
|
main(["line-by-line"|Args]) ->
|
||
|
%% This is merely a demo to show the cost of line-by-line I/O.
|
||
|
%% For a checksum list of 90K lines, line-by-line takes about 3 seconds.
|
||
|
%% Bulk I/O (used by the following clause) takes about 0.2 seconds.
|
||
|
main2(["checksum-list-client-line-by-line" | Args]);
|
||
|
main(Args) ->
|
||
|
main2(["checksum-list-client" | Args]).
|