|
|
|
@ -463,6 +463,33 @@ |
|
|
|
|
|
|
|
|
|
|
|
(deftest test-ya-declarado-localmente-01 |
|
|
|
(deftest test-ya-declarado-localmente-01 |
|
|
|
(testing "Test 01 ya-declarado-localmente?" |
|
|
|
(testing "Test 01 ya-declarado-localmente?" |
|
|
|
(is (= (ya-declarado-localmente? 'Write [[0] [['io ['lib '()] 0] ['Write ['lib '()] 0] ['entero_a_hexa ['fn [(list ['n (symbol ":") 'i64]) 'String]] 2]]]) true)) |
|
|
|
(is (= (ya-declarado-localmente? |
|
|
|
|
|
|
|
'Write |
|
|
|
|
|
|
|
[ |
|
|
|
|
|
|
|
[0] |
|
|
|
|
|
|
|
[ |
|
|
|
|
|
|
|
['io ['lib '()] 0] |
|
|
|
|
|
|
|
['Write ['lib '()] 0] |
|
|
|
|
|
|
|
['entero_a_hexa ['fn [(list ['n (symbol ":") 'i64]) 'String]] 2] |
|
|
|
|
|
|
|
] |
|
|
|
|
|
|
|
] |
|
|
|
|
|
|
|
) true)) |
|
|
|
|
|
|
|
) |
|
|
|
|
|
|
|
) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(deftest test-ya-declarado-localmente-02 |
|
|
|
|
|
|
|
(testing "Test 02 ya-declarado-localmente?" |
|
|
|
|
|
|
|
(is (= (ya-declarado-localmente? |
|
|
|
|
|
|
|
'Read |
|
|
|
|
|
|
|
[ |
|
|
|
|
|
|
|
[0] |
|
|
|
|
|
|
|
[ |
|
|
|
|
|
|
|
['io ['lib '()] 0] |
|
|
|
|
|
|
|
['Write ['lib '()] 0] |
|
|
|
|
|
|
|
['entero_a_hexa ['fn [(list ['n (symbol ":") 'i64]) 'String]] 2] |
|
|
|
|
|
|
|
] |
|
|
|
|
|
|
|
] |
|
|
|
|
|
|
|
) |
|
|
|
|
|
|
|
false)) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
|