diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-09 10:57:51 +0200 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-09 10:57:51 +0200 |
commit | 4e91cee9ea2c4b5af0daa3aa1f4deb9aba8d3cbd (patch) | |
tree | d48b046232cb69037f29d9d2a447c39db2090ee7 | |
parent | a0157b9a5ac70665056b6b0be52f5a8f93d8334c (diff) |
Thorn.m: Remove duplicated Quote function
-rw-r--r-- | Tools/CodeGen/Thorn.m | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/Tools/CodeGen/Thorn.m b/Tools/CodeGen/Thorn.m index 94a1c29..229db60 100644 --- a/Tools/CodeGen/Thorn.m +++ b/Tools/CodeGen/Thorn.m @@ -34,7 +34,6 @@ CreateMakefile::usage = "Create the content of the Cactus make.code.defn file."; CreateConfiguration::usage = "Create the content of the configuration.ccl file."; CreateInterface::usage = "Create the content of the interface.ccl file."; CreateParam::usage = "Create the content of the param.ccl file."; -Quote::usage = ""; (* This should not be in this package *) CreateThorn::usage = "Create a general Cactus thorn from a thorn specification structure"; CreateSymmetriesRegistrationSource::usage = ""; @@ -89,9 +88,6 @@ CreateMakefile[sourceFiles_] := Description -> "", Visibility -> "private", AllowedValues -> {...}} *) -(* Return a CodeGen block which represents the quoted value of x *) -Quote[x_] := {"\"", x, "\""}; - (* To be used for parameters; will quote it if it is a keyword *) renderValue[type_, value_] := If[type == "KEYWORD", |