Commit c67d49c 1 parent 095fb31 commit c67d49c Copy full SHA for c67d49c
File tree 3 files changed +7
-7
lines changed
3 files changed +7
-7
lines changed Original file line number Diff line number Diff line change @@ -73,8 +73,8 @@ data FileHandle : (m : Mode) -> Type where
73
73
-- ---------------------------------------------- [ Resource Type Construction ]
74
74
75
75
||| Calculates the type for the resource being computed over. `Unit`
76
- ||| to describe pre-and-post file handle acquisistion , and `FileHandle
77
- ||| m` when a file handle has been aqcuired .
76
+ ||| to describe pre-and-post file handle acquisition , and `FileHandle
77
+ ||| m` when a file handle has been acquired .
78
78
|||
79
79
||| @m The mode the file handle was generated under.
80
80
||| @ty The functions return type.
@@ -315,7 +315,7 @@ R = FileHandle Read
315
315
W : Type
316
316
W = FileHandle WriteTruncate
317
317
318
- ||| A file can only be appeneded to.
318
+ ||| A file can only be appended to.
319
319
A : Type
320
320
A = FileHandle Append
321
321
@@ -324,7 +324,7 @@ RW : Type
324
324
RW = FileHandle ReadWrite
325
325
326
326
||| A file opened for reading and writing and has been truncated to
327
- ||| zero if it previsiouly existed.
327
+ ||| zero if it previously existed.
328
328
RWPlus : Type
329
329
RWPlus = FileHandle ReadWriteTruncate
330
330
Original file line number Diff line number Diff line change @@ -130,7 +130,7 @@ initLogger l cs = call $ InitLogger l cs
130
130
|||
131
131
||| @l The logging level.
132
132
||| @cs The logging categories.
133
- ||| @m THe message to be logged.
133
+ ||| @m The message to be logged.
134
134
log : (Show a , Eq a ) => (l : LogLevel n)
135
135
-> (cs : List a)
136
136
-> (m : String)
@@ -141,7 +141,7 @@ log l cs msg = call $ Log l cs msg
141
141
|||
142
142
||| @l The logging level.
143
143
||| @cs The logging categories.
144
- ||| @m THe message to be logged.
144
+ ||| @m The message to be logged.
145
145
logN : (Show a , Eq a ) => (l : Nat )
146
146
-> {auto prf : LTE l 70}
147
147
-> (cs : List a)
Original file line number Diff line number Diff line change @@ -193,7 +193,7 @@ collectPMetrics b = call $ TurnOn b
193
193
collectPMetricsAndShow : Eff () [PERF]
194
194
collectPMetricsAndShow = call $ TurnOn True
195
195
196
- ||| Return gatheres metrics
196
+ ||| Return gathered metrics
197
197
getPerfMetrics : Eff PMetrics [PERF]
198
198
getPerfMetrics = call $ GetMetrics
199
199
You can’t perform that action at this time.
0 commit comments