Displaying 1 result from an estimated 1 matches for "listflag".
Did you mean:
list_flag
2003 Jul 07
0
feature enhancement request & patch: dev.control(displaylist='en (PR#3424)
...in/plot.c R-patched-grw/src/main/plot.c=0A=
--- R-patched/src/main/plot.c 2003-02-25 18:08:41.000000000 -0500=0A=
+++ R-patched-grw/src/main/plot.c 2003-07-07 11:47:16.000000000 =
-0400=0A=
@@ -51,9 +51,13 @@=0A=
=0A=
SEXP do_devcontrol(SEXP call, SEXP op, SEXP args, SEXP env)=0A=
{=0A=
+ int listFlag =3D LOGICAL(CAR(args))[0];=0A=
checkArity(op, args);=0A=
- inhibitDisplayList(CurrentDevice());=0A=
- return R_NilValue;=0A=
+ if(listFlag)=0A=
+ enableDisplayList(CurrentDevice());=0A=
+ else=0A=
+ inhibitDisplayList(CurrentDevice());=0A=
+ return ScalarLogical(listFl...