idris-lang/Idris2
1
1
Fork 0
mirror of https://github.com/idris-lang/Idris2.git synced 2024-12-20 10:02:03 +03:00
Code Issues Projects Releases Wiki Activity

Merge pull request #2685 from stefan-hoeck/node_arg

Browse Source
This commit is contained in:
André Videla 2022-09-27 14:13:52 +01:00 committed by GitHub
commit a1ad258e0e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
CHANGELOG.md
View File

@ -133,6 +133,8 @@
now transformer argument is the last, as in the other standard transformers, like `ReaderT` and `StateT`. now transformer argument is the last, as in the other standard transformers, like `ReaderT` and `StateT`.
* Adds `Data.Fin.finToNatEqualityAsPointwise`, * Adds `Data.Fin.finToNatEqualityAsPointwise`,
which takes a witness of `finToNat k = finToNat l` and proves `k ~~~ l`. which takes a witness of `finToNat k = finToNat l` and proves `k ~~~ l`.
* Drop first argument (path to the `node` executable) from `System.getArgs` on
the Node.js backend to make it consistent with other backends.
#### Test #### Test

13
libs/base/System.idr
View File

@ -58,15 +58,22 @@ usleep : HasIO io => (usec : Int) -> So (usec >= 0) => io ()
usleep usec = primIO (prim__usleep usec) usleep usec = primIO (prim__usleep usec)
-- Get the number of arguments -- Get the number of arguments
-- Note: node prefixes the list of command line arguments
-- with the path to the `node` executable. This is
-- inconsistent with other backends, which only list
-- the path to the running program. For reasons of
-- consistency across backends, this first argument ist
-- dropped on the node backend.
%foreign "scheme:blodwen-arg-count" %foreign "scheme:blodwen-arg-count"
supportC "idris2_getArgCount" supportC "idris2_getArgCount"
"node:lambda:() => process.argv.length" "node:lambda:() => process.argv.length - 1"
prim__getArgCount : PrimIO Int prim__getArgCount : PrimIO Int
-- Get argument number `n` -- Get argument number `n`. See also `prim__getArgCount`
-- about the special treatment of the node backend.
%foreign "scheme:blodwen-arg" %foreign "scheme:blodwen-arg"
supportC "idris2_getArg" supportC "idris2_getArg"
"node:lambda:n => process.argv[n]" "node:lambda:n => process.argv[n + 1]"
prim__getArg : Int -> PrimIO String prim__getArg : Int -> PrimIO String
||| Retrieve the arguments to the program call, if there were any. ||| Retrieve the arguments to the program call, if there were any.

2
tests/node/args/TestArgs.idr
View File

@ -4,4 +4,4 @@ import Data.List
import System import System
main : IO () main : IO ()
main = getArgs >>= (putStrLn . show . drop 2) main = getArgs >>= (putStrLn . show . drop 1)