diff options
| author | Björn Gustavsson <[email protected]> | 2013-10-29 15:03:41 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2014-01-20 12:22:41 +0100 |
| commit | 252bad05df875934edce64326e8ff204062aa7c7 (patch) | |
| tree | e747980ba67c3a11bfe979e17690d104fbdd7bff | |
| parent | b39df70c54036dae66bec08402308ba094bdd3e5 (diff) | |
| download | otp-252bad05df875934edce64326e8ff204062aa7c7.tar.gz otp-252bad05df875934edce64326e8ff204062aa7c7.tar.bz2 otp-252bad05df875934edce64326e8ff204062aa7c7.zip | |
Teach asn1ct_func:call_gen/4 to quote the generated function name
The function name could contain hyphens or other characters not
allowed in non-quoted function names.
| -rw-r--r-- | lib/asn1/src/asn1ct_func.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/asn1/src/asn1ct_func.erl b/lib/asn1/src/asn1ct_func.erl index dbadedb683..33f998722a 100644 --- a/lib/asn1/src/asn1ct_func.erl +++ b/lib/asn1/src/asn1ct_func.erl @@ -48,7 +48,7 @@ need(MFA) -> call_gen(Prefix, Key, Gen, Args) when is_function(Gen, 2) -> F = req({gen_func,Prefix,Key,Gen}), - asn1ct_gen:emit([F,"(",call_args(Args, ""),")"]). + asn1ct_gen:emit([{asis,F},"(",call_args(Args, ""),")"]). call_gen(Prefix, Key, Gen) when is_function(Gen, 2) -> req({gen_func,Prefix,Key,Gen}). |