mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-10 13:11:50 +09:00
basic: currying is not left-associative
This commit is contained in:
7
assets/disk0/home/basic/usrapply.bas
Normal file
7
assets/disk0/home/basic/usrapply.bas
Normal file
@@ -0,0 +1,7 @@
|
||||
1 OPTIONDEBUG 1:OPTIONTRACE 1
|
||||
10 DEFUN APPLY(X,F)=F(X):REM bug- F<~X must return function and F(X) must return value but right now they both return a function?
|
||||
20 DEFUN FUN(X)=X^2
|
||||
30 K=APPLY(42,FUN)
|
||||
100 PRINT K
|
||||
110 PRINT TYPEOF K
|
||||
120 RESOLVE K
|
||||
Reference in New Issue
Block a user