merge branch 'setv-nil'
This commit is contained in:
commit
649dd38040
@ -1977,10 +1977,15 @@ class HyASTCompiler(object):
|
|||||||
|
|
||||||
@builds("def")
|
@builds("def")
|
||||||
@builds("setv")
|
@builds("setv")
|
||||||
@checkargs(min=2)
|
|
||||||
def compile_def_expression(self, expression):
|
def compile_def_expression(self, expression):
|
||||||
expression.pop(0)
|
root = expression.pop(0)
|
||||||
if len(expression) == 2:
|
if not expression:
|
||||||
|
result = Result()
|
||||||
|
result += ast.Name(id='None', ctx=ast.Load(),
|
||||||
|
lineno=root.start_line,
|
||||||
|
col_offset=root.start_column)
|
||||||
|
return result
|
||||||
|
elif len(expression) == 2:
|
||||||
return self._compile_assign(expression[0], expression[1],
|
return self._compile_assign(expression[0], expression[1],
|
||||||
expression.start_line,
|
expression.start_line,
|
||||||
expression.start_column)
|
expression.start_column)
|
||||||
|
@ -34,6 +34,11 @@
|
|||||||
(assert (= #{} (set))))
|
(assert (= #{} (set))))
|
||||||
|
|
||||||
|
|
||||||
|
(defn test-setv-empty []
|
||||||
|
"NATIVE: test setv works with no arguments"
|
||||||
|
(assert (is (setv) nil)))
|
||||||
|
|
||||||
|
|
||||||
(defn test-setv-get []
|
(defn test-setv-get []
|
||||||
"NATIVE: test setv works on a get expression"
|
"NATIVE: test setv works on a get expression"
|
||||||
(setv foo [0 1 2])
|
(setv foo [0 1 2])
|
||||||
|
Loading…
x
Reference in New Issue
Block a user