/dports/lang/abcl/abcl-src-1.8.0/src/org/armedbear/lisp/ |
H A D | parse-lambda-list.lisp | 63 (let ((restp nil) 114 (setq restp t 125 (values (required) (optional) restp rest keyp (keys) allowp auxp (aux) 135 (multiple-value-bind (required optional restp rest keyp keys allowp auxp aux) 152 (when restp 170 (values required optional restp rest keyp keys allowp auxp aux)))
|
H A D | destructuring-bind.lisp | 179 rest-name restp allow-other-keys-p env-arg-used) 193 (setq restp t)))) 224 (setq restp t) 228 (setq restp t) 243 (setq restp t) 309 ,@(unless restp 314 ,(unless restp maximum)) 321 ,@(unless restp `(:maximum ,maximum))))) 342 (values env-arg-used minimum (if (null restp) maximum nil))))
|
/dports/math/maxima/maxima-5.43.2/src/ |
H A D | mdefun.lisp | 36 (defmacro defmtrfun ((name mode prop restp . array-flag) argl . body ) 65 ,(cond ((not restp) 69 ,(cond ((not restp) nil))))) 73 ,def-header ,(cond ((not restp) argl) 75 ,@(cond ((not restp)
|
H A D | defmfun-check.lisp | 130 (let ((restp nil) 181 (setq restp t rest arg state :post-rest)) 194 (values (required) (optional) restp rest keyp (keys) allowp (aux) 268 restp 289 (restp 311 (restp
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/topology/ |
H A D | index.cpp | 231 restp_t* restp = nullptr; in analyse_other() local 265 assert(restp); in analyse_other() 266 if (strcmp(restp[l].rname, rname) == 0) in analyse_other() 273 srenew(restp, nrestp + 1); in analyse_other() 275 restp[nrestp].bNeg = FALSE; in analyse_other() 287 if ((strcmp(restp[i].rname, rname) == 0 && !restp[i].bNeg) in analyse_other() 288 || (strcmp(restp[i].rname, rname) != 0 && restp[i].bNeg)) in analyse_other() 293 add_grp(gb, gn, aid, restp[i].gname); in analyse_other() 338 sfree(restp[i].rname); in analyse_other() 339 sfree(restp[i].gname); in analyse_other() [all …]
|
/dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/src/ |
H A D | clos-method2.lisp | 125 (restp (or keyp (not (eql rest 0)))) 157 (rest-dummy (if (or restp (> optnum 0)) (gensym))) 172 :rest-p restp :keys-p keyp
|
H A D | clos-genfun2b.lisp | 189 (restp (gf-sig-restp signature)) 190 (rest-var (if restp (gensym))) 191 (apply-fun (if restp 'APPLY 'FUNCALL)) 192 (apply-args `(,@req-vars ,@(if restp `(,rest-var) '()))) 428 `((,@req-vars ,@(if restp `(&REST ,rest-var) '())) 517 (restp (or (not (eql rest 0)) keyp))) ; &key implies &rest 519 :rest-p restp :keys-p keyp 1199 (restp (gf-sig-restp signature)) 1200 (hash-key (cons reqnum restp))) 1221 (restp (gf-sig-restp signature)) [all …]
|
H A D | clos-genfun1.lisp | 127 (defun callinfo (reqnum optnum restp keywords allowp) 129 (list reqnum 0 (or (> optnum 0) restp) nil nil nil))
|
H A D | clos-genfun2a.lisp | 340 (defun gf-keyword-arguments (restp signature methods) 343 (when restp
|
/dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/tests/ |
H A D | mop-aux.lisp | 488 (restp (or (not (eql rest 0)) keyp))) ; &key implies &rest 490 :rest-p restp :keys-p keyp 529 (defun gf-keyword-arguments (restp signature methods) 532 (when restp 578 (restp (gf-sig-restp signature)) 579 (rest-var (if restp (gensym))) 580 (apply-fun (if restp 'APPLY 'FUNCALL)) 581 (apply-args `(,@req-vars ,@(if restp `(,rest-var) '()))) 582 (lambdalist `(,@req-vars ,@(if restp `(&REST ,rest-var) '())))) 584 (gf-keyword-arguments restp signature methods)
|
/dports/x11/xauth/xauth-1.1/ |
H A D | parsedpy.c | 103 char **restp) /* return */ in parse_displayname() argument 258 *restp = rest; in parse_displayname()
|
H A D | xauth.h | 54 … ( const char *displayname, int *familyp, char **hostp, int *dpynump, int *scrnump, char **restp );
|
/dports/lang/sbcl/sbcl-1.3.13/src/pcl/ |
H A D | vector.lisp | 675 (restp nil) 679 (setq restp t) 686 (setf (getf (getf initargs 'plist) :arg-info) (cons nreq restp)) 688 initargs (cddr lmf) args lmf-params restp))))) 711 (initargs body req-args lmf-params restp) 726 (and (not restp) (not auxp)) 731 restp nil 745 (let* ((rest-arg (when restp
|
H A D | boot.lisp | 1154 ,(if restp 1177 `(,(if restp 'apply 'funcall) (fast-method-call-function ,method-call) 1255 (emf restp &key required-args rest-arg more-arg) 1268 (emf restp required-args) 1278 (when (not restp) 1309 (unless (constantp restp) 1311 (setq restp (constant-form-value restp)) 1329 emf-n restp required-args)) 1334 ,(if restp 1346 (restp (cdr arg-info)) [all …]
|
H A D | methods.lisp | 327 (restp nil) 331 (multiple-value-setq (number-required restp specialized-positions) 333 generic-function method number-required restp specialized-positions))) 334 (values number-required restp (sort specialized-positions #'<)))) 337 (generic-function method number-of-requireds restp 348 (return (setq restp t))) 366 (or restp 370 (defun make-discriminating-function-arglist (number-required-arguments restp) 378 (when restp
|
/dports/lang/mdk/mdk-1.3.0/mixguile/ |
H A D | xmixguile_cmd_dispatcher.h | 49 int restp; /* if 1, receive a list of remaining args */ member
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/gmxpreprocess/ |
H A D | xlate.h | 59 gmx::ArrayRef<const PreprocessResidue> restp,
|
/dports/devel/remake/remake-4.3+dbg-1.5/src/ |
H A D | job.c | 2311 construct_command_argv_internal (char *line, char **restp, const char *shell, in construct_command_argv_internal() argument 2428 if (restp != NULL) in construct_command_argv_internal() 2429 *restp = NULL; in construct_command_argv_internal() 2543 else if (*p == '\n' && restp != NULL) in construct_command_argv_internal() 2546 *restp = p; in construct_command_argv_internal() 2653 if (restp != NULL) in construct_command_argv_internal() 2656 *restp = p; in construct_command_argv_internal() 2968 if (restp != NULL && *p == '\n') in construct_command_argv_internal() 2970 *restp = p; in construct_command_argv_internal() 3121 construct_command_argv (char *line, char **restp, struct file *file, in construct_command_argv() argument [all …]
|
H A D | job.h | 82 char **construct_command_argv (char *line, char **restp, struct file *file,
|
/dports/devel/kBuild/kBuild-0.1.9998/src/kmk/ |
H A D | job.c | 2570 construct_command_argv_internal (char *line, char **restp, char *shell, in construct_command_argv_internal() argument 2726 if (restp != NULL) in construct_command_argv_internal() 2727 *restp = NULL; in construct_command_argv_internal() 2885 else if (*p == '\n' && restp != NULL) in construct_command_argv_internal() 2888 *restp = p; in construct_command_argv_internal() 3000 if (restp != NULL) in construct_command_argv_internal() 3003 *restp = p; in construct_command_argv_internal() 3244 if (restp != NULL && *p == '\n') in construct_command_argv_internal() 3246 *restp = p; in construct_command_argv_internal() 3453 construct_command_argv (char *line, char **restp, struct file *file, in construct_command_argv() argument [all …]
|
H A D | job.h | 83 char **construct_command_argv (char *line, char **restp, struct file *file,
|
/dports/devel/gmake/make-4.3/src/ |
H A D | job.h | 77 char **construct_command_argv (char *line, char **restp, struct file *file,
|
H A D | job.c | 2674 construct_command_argv_internal (char *line, char **restp, const char *shell, in construct_command_argv_internal() argument 2828 if (restp != NULL) in construct_command_argv_internal() 2829 *restp = NULL; in construct_command_argv_internal() 2950 else if (*p == '\n' && restp != NULL) in construct_command_argv_internal() 2953 *restp = p; in construct_command_argv_internal() 3060 if (restp != NULL) in construct_command_argv_internal() 3063 *restp = p; in construct_command_argv_internal() 3408 if (restp != NULL && *p == '\n') in construct_command_argv_internal() 3410 *restp = p; in construct_command_argv_internal() 3631 construct_command_argv (char *line, char **restp, struct file *file, in construct_command_argv() argument [all …]
|
/dports/editors/emacs-devel/emacs-4d1968b/lisp/emacs-lisp/ |
H A D | macroexp.el | 239 optionalp restp 250 (if restp (error "&optional found after &rest in %s" name)) 262 (setq restp t)) 263 (restp
|
/dports/math/reduce/Reduce-svn5758-src/csl/cslbase/ |
H A D | eval4.cpp | 255 LispObject a4up, LispObject defaultval, bool restp) in byteopt() argument 283 if (nargs < wantargs || (!restp && nargs > wantargs+wantopts)) in byteopt() 321 if (restp) in byteopt() 336 else if (restp) // There is an extra &REST argument in byteopt()
|