curioustorvald/tsvm
1
0
Fork 0
mirror of https://github.com/curioustorvald/tsvm.git synced 2026-03-17 00:16:04 +09:00
Code Issues Packages Projects Releases Wiki Activity

basic: changing curry operator to (~<), i thought plunger (or grabber) is semantically less awkward than the arrow

Browse Source
This commit is contained in:
minjaesong
2020-12-27 02:56:18 +09:00
parent 31ae5bbbbc
commit 83a53499bc
10 changed files with 18 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
assets/disk0/home/basic/autocurrytest.bas
View File

@@ -1,6 +1,6 @@
10 DEFUN SINC(P)=SIN(P)/P
20 DEFUN OTHERFUN(A,B)=A+"|"+B
30 DEFUN PLOTLINE(F,X)=MAP(OTHERFUN<~F(X),1 TO 5):REM needs auto-currying
31 DEFUN PLOTLINE2(F,X)=MAP(OTHERFUN<~F<~X,1 TO 5):REM WORKS!
30 DEFUN PLOTLINE(F,X)=MAP(OTHERFUN~<F(X),1 TO 5):REM needs auto-currying
31 DEFUN PLOTLINE2(F,X)=MAP(OTHERFUN~<F~<X,1 TO 5):REM WORKS!
100 PRINT PLOTLINE(SINC,333)
101 PRINT PLOTLINE2(SINC,333)
101 PRINT PLOTLINE2(SINC,333)