← Back to branch summary

~clint-fewbar/ubuntu/precise/erlang/merge-15b

« back to all changes in this revision

Viewing changes to lib/parsetools/include/yeccpre.hrl

  • Committer: Package Import Robot
  • Author(s): Sergei Golovan
  • Date: 2011-12-15 19:20:10 UTC
  • mfrom: (1.1.18) (3.5.15 sid)
  • mto: (3.5.16 sid)
  • mto: This revision was merged to the branch mainline in revision 33.
  • Revision ID: package-import@ubuntu.com-20111215192010-jnxcfe3tbrpp0big
Tags: 1:15.b-dfsg-1
* New upstream release.
* Upload to experimental because this release breaks external drivers
  API along with ABI, so several applications are to be fixed.
* Removed SSL patch because the old SSL implementation is removed from
  the upstream distribution.
* Removed never used patch which added native code to erlang beam files.
* Removed the erlang-docbuilder binary package because the docbuilder
  application was dropped by upstream.
* Documented dropping ${erlang-docbuilder:Depends} substvar in
  erlang-depends(1) manpage.
* Made erlang-base and erlang-base-hipe provide virtual package
  erlang-abi-15.b (the number means the first erlang version, which
  provides current ABI).

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/parsetools/include/yeccpre.hrl
1
1
%%
2
2
%% %CopyrightBegin%
3
3
%%
4
 
%% Copyright Ericsson AB 1996-2010. All Rights Reserved.
 
4
%% Copyright Ericsson AB 1996-2011. All Rights Reserved.
5
5
%%
6
6
%% The contents of this file are subject to the Erlang Public License,
7
7
%% Version 1.1, (the "License"); you may not use this file except in
28
28
 
29
29
-spec parse_and_scan({function() | {atom(), atom()}, [_]}
30
30
                     | {atom(), atom(), [_]}) -> yecc_ret().
31
 
parse_and_scan({F, A}) -> % Fun or {M, F}
 
31
parse_and_scan({F, A}) ->
32
32
    yeccpars0([], {{F, A}, no_line}, 0, [], []);
33
33
parse_and_scan({M, F, A}) ->
34
 
    yeccpars0([], {{{M, F}, A}, no_line}, 0, [], []).
 
34
    Arity = length(A),
 
35
    yeccpars0([], {{fun M:F/Arity, A}, no_line}, 0, [], []).
35
36
 
36
37
-spec format_error(any()) -> [char() | list()].
37
38
format_error(Message) ->
67
68
            Error
68
69
    end.
69
70
 
70
 
yecc_error_type(function_clause, [{?MODULE,F,ArityOrArgs} | _]) ->
 
71
yecc_error_type(function_clause, [{?MODULE,F,ArityOrArgs,_} | _]) ->
71
72
    case atom_to_list(F) of
72
73
        "yeccgoto_" ++ SymbolL ->
73
74
            {ok,[{atom,_,Symbol}],_} = erl_scan:string(SymbolL),