Searched refs:remlabels (Results 1 – 2 of 2) sorted by last modified time
341 ((and (fixnump x) (>= x 0)) (remlabels x))348 (let (($linenum (caddr x))) (remlabels (- (caddr x) (cadr x)))))367 (defun remlabels (n) function
115 ((and (fixnump x) (not (< x 0))) (remlabels x))121 (let (($linenum (caddr x))) (remlabels (f- (caddr x) (cadr x)))))