aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/src/beam_dict.erl
diff options
context:
space:
mode:
authorKostis Sagonas <[email protected]>2010-04-10 20:54:29 +0300
committerRaimo Niskanen <[email protected]>2010-06-07 13:44:27 +0200
commit8e79baa449f43889f7e92030258df90ab0045a81 (patch)
tree6c842c4b1c32d76b4fb84de1ee01ba024a4802a6 /lib/compiler/src/beam_dict.erl
parentf2a2139778e14ae9ffbfe7e9bbaf4ca4d7babe7c (diff)
downloadotp-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.erl4
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