language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-10-02 16:21:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Hardcode Read and Echo

Browse source
This commit is contained in:
Richard Feldman 2019-05-29 21:10:04 -04:00
parent 6c0e34f5fc
commit 88f8325fb3
2 changed files with 53 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

28
src/expr.rs
View file

@ -35,12 +35,12 @@ impl fmt::Display for Expr {
fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
match self {
// PRIMITIVES
Int(num) => write!(f, "{} : Int", *num),
Int(num) => write!(f, "{}", *num),
Frac(numerator, denominator) => {
if *denominator == 10 {
write!(f, "{} : Frac", (*numerator as f64 / 10.0))
write!(f, "{}", (*numerator as f64 / 10.0))
} else {
write!(f, "{}/{} : Frac", numerator, denominator)
write!(f, "{}/{}", numerator, denominator)
}
},
Str(string) => {
@ -52,12 +52,26 @@ impl fmt::Display for Expr {
.replace("\n", "\\n")
.replace("\r", "\\r");
write!(f, "\"{}\" : String", escaped_str)
write!(f, "\"{}\"", escaped_str)
},
Char(ch) => write!(f, "'{}' : Char", *ch),
Bool(true) => write!(f, "True : Bool"),
Bool(false) => write!(f, "False : Bool"),
Char(ch) => write!(f, "'{}'", *ch),
Bool(true) => write!(f, "True"),
Bool(false) => write!(f, "False"),
Closure(args, _) => write!(f, "<{}-argument function>", args.len()),
ApplyVariant(name, opt_exprs) => {
match opt_exprs {
None => write!(f, "{}", name),
Some(exprs) => {
let contents =
exprs.into_iter()
.map(|expr| format!(" {}", expr))
.collect::<Vec<_>>()
.join(",");
write!(f, "{}{}", name, contents)
}
}
},
// ERRORS
Error(Problem::UnrecognizedVarName(name)) => write!(f, "NAMING ERROR: Unrecognized var name `{}`", name),