Skip to content

Commit e50ffe2

orsinium orsinium

committed

improve repr

1 parent 0fa49e1 commit e50ffe2Copy full SHA for e50ffe2

File tree

1 file changed

+15

-0

lines changed

code.py

1 file changed

+15

-0

lines changed

`‎code.py‎`

Lines changed: 15 additions & 0 deletions

Original file line number	Diff line number	Diff line change
`@@ -50,6 +50,16 @@`
`50`	`50`	`CAR = lambda p: p(TRUE)`
`51`	`51`	`CDR = lambda p: p(FALSE)`
`52`	`52`
	`53`	`+# The Billion Dollar Mistake`
	`54`	`+NULL = lambda _: TRUE`
	`55`	`+ISNULL = lambda _: lambda _: FALSE`
	`56`	`+`
	`57`	`+# signed numbers`
	`58`	`+SIGN = lambda n: CONS(n)(0)`
	`59`	`+NEG = lambda p: CONS(CDR(p))(CAR(p))`
	`60`	`+ISPOS = lambda p: GT(CAR(p))(0)`
	`61`	`+ISNEG = lambda p: GT(CDR(p))(0)`
	`62`	`+UNSIGN = lambda p: SUB(CAR(p))(CDR(p))`
`53`	`63`
`54`	`64`	`# recursive`
`55`	`65`	`FAC = Y(`
`@@ -77,3 +87,8 @@`
`77`	`87`	`def make_number(f) -> int:`
`78`	`88`	`incr = lambda x: x + 1`
`79`	`89`	`return f(incr)(0)`
	`90`	`+`
	`91`	`+`
	`92`	`+# improve repr`
	`93`	`+for name, func in locals().items():`
	`94`	`+ func.__qualname__ = name`

0 commit comments

Comments

(0)