diff options
author | Kostis Sagonas <[email protected]> | 2010-04-10 20:54:29 +0300 |
---|---|---|
committer | Raimo Niskanen <[email protected]> | 2010-06-07 13:44:27 +0200 |
commit | 8e79baa449f43889f7e92030258df90ab0045a81 (patch) | |
tree | 6c842c4b1c32d76b4fb84de1ee01ba024a4802a6 /lib/compiler/src/beam_dict.erl | |
parent | f2a2139778e14ae9ffbfe7e9bbaf4ca4d7babe7c (diff) | |
download | otp-8e79baa449f43889f7e92030258df90ab0045a81.tar.gz otp-8e79baa449f43889f7e92030258df90ab0045a81.tar.bz2 otp-8e79baa449f43889f7e92030258df90ab0045a81.zip |
compiler: Fix incorrect types and specs
While at it, do some other minor clean-ups.
Diffstat (limited to 'lib/compiler/src/beam_dict.erl')
-rw-r--r-- | lib/compiler/src/beam_dict.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/compiler/src/beam_dict.erl b/lib/compiler/src/beam_dict.erl index 4ffe8bc606..9164259a94 100644 --- a/lib/compiler/src/beam_dict.erl +++ b/lib/compiler/src/beam_dict.erl @@ -33,7 +33,7 @@ exports = [] :: [{label(), arity(), label()}], locals = [] :: [{label(), arity(), label()}], imports = gb_trees:empty() :: gb_tree(), %{{M,F,A},Index} - strings = [] :: [string()], %String pool + strings = [] :: string(), %String pool lambdas = [], %[{...}] literals = dict:new() :: dict(), %Format: {Literal,Number} next_atom = 1 :: pos_integer(), @@ -219,7 +219,7 @@ my_term_to_binary(Term) -> %% Search for string Str in the string pool Pool. %% old_string(Str, Pool) -> none | Index --spec old_string(string(), [string()]) -> 'none' | pos_integer(). +-spec old_string(string(), string()) -> 'none' | pos_integer(). old_string([C|Str]=Str0, [C|Pool]) -> case lists:prefix(Str, Pool) of |