diff options
| author | Björn Gustavsson <[email protected]> | 2011-12-29 10:34:37 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-01-11 08:39:56 +0100 |
| commit | b53fc3c306f02108f07fa3870bd2555ae8bb17b2 (patch) | |
| tree | 9d272c40155c503201144e46f35c88b2f31846ad /lib/compiler/src | |
| parent | 9123f869e20c38307280838a69758842fc6b9791 (diff) | |
| download | otp-b53fc3c306f02108f07fa3870bd2555ae8bb17b2.tar.gz otp-b53fc3c306f02108f07fa3870bd2555ae8bb17b2.tar.bz2 otp-b53fc3c306f02108f07fa3870bd2555ae8bb17b2.zip | |
v3_kernel.hrl: Remove unused record #k_string{}
Diffstat (limited to 'lib/compiler/src')
| -rw-r--r-- | lib/compiler/src/v3_kernel.erl | 2 | ||||
| -rw-r--r-- | lib/compiler/src/v3_kernel.hrl | 1 | ||||
| -rw-r--r-- | lib/compiler/src/v3_life.erl | 1 |
3 files changed, 0 insertions, 4 deletions
diff --git a/lib/compiler/src/v3_kernel.erl b/lib/compiler/src/v3_kernel.erl index b3153e420f..31829ab9bd 100644 --- a/lib/compiler/src/v3_kernel.erl +++ b/lib/compiler/src/v3_kernel.erl @@ -608,7 +608,6 @@ is_atomic(#k_int{}) -> true; is_atomic(#k_float{}) -> true; is_atomic(#k_atom{}) -> true; %%is_atomic(#k_char{}) -> true; %No characters -%%is_atomic(#k_string{}) -> true; is_atomic(#k_nil{}) -> true; is_atomic(#k_var{}) -> true; is_atomic(_) -> false. @@ -1825,7 +1824,6 @@ lit_list_vars(Ps) -> pat_vars(#k_var{name=N}) -> {[],[N]}; %%pat_vars(#k_char{}) -> {[],[]}; -%%pat_vars(#k_string{}) -> {[],[]}; pat_vars(#k_literal{}) -> {[],[]}; pat_vars(#k_int{}) -> {[],[]}; pat_vars(#k_float{}) -> {[],[]}; diff --git a/lib/compiler/src/v3_kernel.hrl b/lib/compiler/src/v3_kernel.hrl index 37f2fdcf7e..17904c37da 100644 --- a/lib/compiler/src/v3_kernel.hrl +++ b/lib/compiler/src/v3_kernel.hrl @@ -35,7 +35,6 @@ -record(k_int, {anno=[],val}). -record(k_float, {anno=[],val}). -record(k_atom, {anno=[],val}). --record(k_string, {anno=[],val}). -record(k_nil, {anno=[]}). -record(k_tuple, {anno=[],es}). diff --git a/lib/compiler/src/v3_life.erl b/lib/compiler/src/v3_life.erl index 93f8034230..0654f842bb 100644 --- a/lib/compiler/src/v3_life.erl +++ b/lib/compiler/src/v3_life.erl @@ -373,7 +373,6 @@ atomic(#k_int{val=I}) -> {integer,I}; atomic(#k_float{val=F}) -> {float,F}; atomic(#k_atom{val=N}) -> {atom,N}; %%atomic(#k_char{val=C}) -> {char,C}; -%%atomic(#k_string{val=S}) -> {string,S}; atomic(#k_nil{}) -> nil. atomic_list(Ks) -> [atomic(K) || K <- Ks]. |