Ajout des fichiers manquants
This commit is contained in:
parent
ff9cefd28f
commit
62ebf74ebe
17 changed files with 472 additions and 0 deletions
6
lib/moi/alias.elv
Normal file
6
lib/moi/alias.elv
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
local:dir = ~/.config/elvish/aliases
|
||||
|
||||
for file [(_ = ?(put $dir/*.elv))] {
|
||||
content = (cat $file | slurp)
|
||||
eval $content
|
||||
}
|
||||
24
lib/moi/completion/use.elv
Normal file
24
lib/moi/completion/use.elv
Normal file
|
|
@ -0,0 +1,24 @@
|
|||
local:libdir = $E:HOME/.config/elvish/lib
|
||||
local:builtin_modules = [
|
||||
builtin
|
||||
epm
|
||||
file
|
||||
math
|
||||
path
|
||||
re
|
||||
readline-binding
|
||||
store
|
||||
str
|
||||
unix
|
||||
]
|
||||
|
||||
edit:completion:arg-completer[use] = [@argv]{
|
||||
use str
|
||||
use path
|
||||
all $builtin_modules
|
||||
put $libdir/**.elv | each [f]{
|
||||
if (path:is-regular $f) {
|
||||
str:trim-prefix $f $libdir/
|
||||
}
|
||||
} | each [f]{ str:trim-suffix $f .elv }
|
||||
}
|
||||
42
lib/moi/util/common.elv
Normal file
42
lib/moi/util/common.elv
Normal file
|
|
@ -0,0 +1,42 @@
|
|||
edit:add-var ++~ [n]{ + $n 1 }
|
||||
edit:add-var --~ [n]{ + $n 1 }
|
||||
|
||||
edit:add-var sign~ [n]{
|
||||
if (> $n 0) {
|
||||
put 1
|
||||
} elif (< $n 0) {
|
||||
put -1
|
||||
} else {
|
||||
put 0
|
||||
}
|
||||
}
|
||||
edit:add-var neg~ [n]{ * $n -1 }
|
||||
edit:add-var abs~ [n]{
|
||||
if (< $n 0) {
|
||||
neg $n
|
||||
} else {
|
||||
put $n
|
||||
}
|
||||
}
|
||||
|
||||
edit:add-var sum~ [@numbers]{
|
||||
local:s = 0
|
||||
each [e]{ s = (+ $s e) } (to-list $numbers)
|
||||
}
|
||||
|
||||
fn -minmax [t @numbers]{
|
||||
local:l = (to-list $@numbers)
|
||||
if (== (count $l) 0) {
|
||||
return
|
||||
}
|
||||
local:m = $l[0]
|
||||
each [n]{
|
||||
if ($t $n $m) {
|
||||
m = $n
|
||||
}
|
||||
} $l[1..]
|
||||
put $m
|
||||
}
|
||||
|
||||
edit:add-var min~ [@numbers]{ -minmax $'<~' $@numbers }
|
||||
edit:add-var max~ [@numbers]{ -minmax $'>~' $@numbers }
|
||||
Loading…
Add table
Add a link
Reference in a new issue