Home
last modified time | relevance | path

Searched refs:restp (Results 1 – 25 of 46) sorted by relevance

12

/dports/lang/abcl/abcl-src-1.8.0/src/org/armedbear/lisp/
H A Dparse-lambda-list.lisp63 (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 Ddestructuring-bind.lisp179 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 Dmdefun.lisp36 (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 Ddefmfun-check.lisp130 (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 Dindex.cpp231 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 Dclos-method2.lisp125 (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 Dclos-genfun2b.lisp189 (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 Dclos-genfun1.lisp127 (defun callinfo (reqnum optnum restp keywords allowp)
129 (list reqnum 0 (or (> optnum 0) restp) nil nil nil))
H A Dclos-genfun2a.lisp340 (defun gf-keyword-arguments (restp signature methods)
343 (when restp
/dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/tests/
H A Dmop-aux.lisp488 (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 Dparsedpy.c103 char **restp) /* return */ in parse_displayname() argument
258 *restp = rest; in parse_displayname()
H A Dxauth.h54 … ( const char *displayname, int *familyp, char **hostp, int *dpynump, int *scrnump, char **restp );
/dports/lang/sbcl/sbcl-1.3.13/src/pcl/
H A Dvector.lisp675 (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 Dboot.lisp1154 ,(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 Dmethods.lisp327 (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 Dxmixguile_cmd_dispatcher.h49 int restp; /* if 1, receive a list of remaining args */ member
/dports/science/gromacs/gromacs-2021.4/src/gromacs/gmxpreprocess/
H A Dxlate.h59 gmx::ArrayRef<const PreprocessResidue> restp,
/dports/devel/remake/remake-4.3+dbg-1.5/src/
H A Djob.c2311 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 Djob.h82 char **construct_command_argv (char *line, char **restp, struct file *file,
/dports/devel/kBuild/kBuild-0.1.9998/src/kmk/
H A Djob.c2570 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 Djob.h83 char **construct_command_argv (char *line, char **restp, struct file *file,
/dports/devel/gmake/make-4.3/src/
H A Djob.h77 char **construct_command_argv (char *line, char **restp, struct file *file,
H A Djob.c2674 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 Dmacroexp.el239 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 Deval4.cpp255 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()

12