language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-26 13:29:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

all fixed

Browse source
This commit is contained in:
Anton-4 2024-04-28 18:27:59 +02:00
parent 6c97407033
commit 9d28e70cdc
No known key found for this signature in database
GPG key ID: 0971D718C0A9B937
6 changed files with 43 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

20
crates/compiler/test_syntax/tests/snapshots/pass/newline_in_packages.full.result-ast
View file

@ -17,13 +17,13 @@ Full {
after: [],
},
item: [
@27-145 SpaceAfter(
@27-146 SpaceAfter(
PackageEntry {
shorthand: "pf",
spaces_after_shorthand: [
Newline,
],
package_name: @31-145 PackageName(
package_name: @31-146 PackageName(
"https://github.com/roc-lang/basic-cli/releases/download/0.10.0/vNe6s9hWzoTZtFmNkvEICPErI9ptji_ySjicO6CkucY.tar.br",
),
},
@ -44,7 +44,7 @@ Full {
after: [],
},
item: [
@161-170 Package(
@162-171 Package(
"pf",
ModuleName(
"Stdout",
@ -63,7 +63,7 @@ Full {
after: [],
},
entries: [
@186-190 ExposedName(
@187-191 ExposedName(
"main",
),
],
@ -73,7 +73,7 @@ Full {
item: ToKeyword,
after: [],
},
to: @195-197 ExistingPackage(
to: @196-198 ExistingPackage(
"pf",
),
},
@ -85,7 +85,7 @@ Full {
Index(2147483648),
],
regions: [
@199-246,
@200-247,
],
space_before: [
Slice(start = 0, length = 2),
@ -100,17 +100,17 @@ Full {
type_defs: [],
value_defs: [
Body(
@199-203 Identifier {
@200-204 Identifier {
ident: "main",
},
@210-246 SpaceBefore(
@211-247 SpaceBefore(
Apply(
@210-221 Var {
@211-222 Var {
module_name: "Stdout",
ident: "line",
},
[
@222-246 Str(
@223-247 Str(
PlainLine(
"I'm a Roc application!",
),

2
examples/cli/fileBROKEN.roc
View file

@ -16,11 +16,9 @@ main =
task =
cwd = Env.cwd!
Stdout.line! "cwd: $(Path.display cwd)"
dirEntries = Dir.list! cwd
contentsStr = Str.joinWith (List.map dirEntries Path.display) "\n "
Stdout.line! "Directory contents:\n $(contentsStr)\n"
Stdout.line! "Writing a string to out.txt"
File.writeUtf8! path "a string!"

1
examples/cli/form.roc
View file

@ -6,7 +6,6 @@ app "form"
main =
Stdout.line! "What's your first name?"
firstName = Stdin.line!
Stdout.line! "What's your last name?"
lastName = Stdin.line!

7
examples/cli/http-get.roc
View file

@ -15,8 +15,9 @@ main =
resp = Http.send! request
output = when resp |> Http.handleStringResponse is
Err err -> crash (Http.errorToString err)
Ok body -> body
output =
when resp |> Http.handleStringResponse is
Err err -> crash (Http.errorToString err)
Ok body -> body
Stdout.line output

8
examples/cli/ingested-file-bytes.roc
View file

@ -10,7 +10,7 @@ app "ingested-file-bytes"
main =
# Due to how license is used, it will be a List U8.
license
|> List.map Num.toU64
|> List.sum
|> Num.toStr
|> Stdout.line!
|> List.map Num.toU64
|> List.sum
|> Num.toStr
|> Stdout.line!

50
examples/inspect-logging.roc
View file

@ -12,28 +12,28 @@ app "inspect-logging"
main =
Community.empty
|> Community.addPerson {
firstName: "John",
lastName: "Smith",
age: 27,
hasBeard: Bool.true,
favoriteColor: Blue,
}
|> Community.addPerson {
firstName: "Debby",
lastName: "Johnson",
age: 47,
hasBeard: Bool.false,
favoriteColor: Green,
}
|> Community.addPerson {
firstName: "Jane",
lastName: "Doe",
age: 33,
hasBeard: Bool.false,
favoriteColor: RGB (255, 255, 0),
}
|> Community.addFriend 0 2
|> Community.addFriend 1 2
|> Inspect.toStr
|> Stdout.line!
|> Community.addPerson {
firstName: "John",
lastName: "Smith",
age: 27,
hasBeard: Bool.true,
favoriteColor: Blue,
}
|> Community.addPerson {
firstName: "Debby",
lastName: "Johnson",
age: 47,
hasBeard: Bool.false,
favoriteColor: Green,
}
|> Community.addPerson {
firstName: "Jane",
lastName: "Doe",
age: 33,
hasBeard: Bool.false,
favoriteColor: RGB (255, 255, 0),
}
|> Community.addFriend 0 2
|> Community.addFriend 1 2
|> Inspect.toStr
|> Stdout.line!