Freebsd Fortunes 2
fortune: 391 - 400 of 1371 from freebsd fortunes 2
Motd - Message of the Day
Humor, Quotes, Proverbs, Aphorisms... Ji Funda Jo Hai  
Daily Fortunes Feed Subscribe - Daily Fortunes - motd.ambians.com
Daily fortunes for your site
Jun 22, 2017
Motd Home     Daily Fortunes     Best of Fortunes     Worst of Fortunes

Freebsd Fortunes 2

Fortune: 391 - 400 of 1371 from Freebsd Fortunes 2

Freebsd Fortunes 2:  391 of 1371

===  ALL USERS PLEASE NOTE  ========================

CAR and CDR now return extra values.

The function CAR now returns two values.  Since it has to go to the trouble
to figure out if the object is carcdr-able anyway, we figured you might as
well get both halves at once.  For example, the following code shows how to
destructure a cons (SOME-CONS) into its two slots (THE-CAR and THE-CDR):

        (MULTIPLE-VALUE-BIND (THE-CAR THE-CDR) (CAR SOME-CONS) ...)

For symmetry with CAR, CDR returns a second value which is the CAR of the
object.  In a related change, the functions MAKE-ARRAY and CONS have been
fixed so they don't allocate any storage except on the stack.  This should
hopefully help people who don't like using the garbage collector because
it cold boots the machine so often.
 
Freebsd Fortunes 2:  392 of 1371

===  ALL USERS PLEASE NOTE  ========================

Compiler optimizations have been made to macro expand LET into a WITHOUT-
INTERRUPTS special form so that it can PUSH things into a stack in the
LET-OPTIMIZATION area, SETQ the variables and then POP them back when it's
done.  Don't worry about this unless you use multiprocessing.
Note that LET *could* have been defined by:

        (LET ((LET '`(LET ((LET ',LET))
                        ,LET)))
        `(LET ((LET ',LET))
                ,LET))

This is believed to speed up execution by as much as a factor of 1.01 or
3.50 depending on whether you believe our friendly marketing representatives.
This code was written by a new programmer here (we snatched him away from
Itty Bitti Machines where we was writting COUGHBOL code) so to give him
confidence we trusted his vows of "it works pretty well" and installed it.
 
Freebsd Fortunes 2:  393 of 1371

===  ALL USERS PLEASE NOTE  ========================

JCL support as alternative to system menu.

In our continuing effort to support languages other than LISP on the CADDR,
we have developed an OS/360-compatible JCL.  This can be used as an
alternative to the standard system menu.  Type System J to get to a JCL
interactive read-execute-diagnose loop window.  [Note that for 360
compatibility, all input lines are truncated to 80 characters.]  This
window also maintains a mouse-sensitive display of critical job parameters
such as dataset allocation, core allocation, channels, etc.  When a JCL
syntax error is detected or your job ABENDs, the window-oriented JCL
debugger is entered.  The JCL debugger displays appropriate OS/360 error
messages (such as IEC703, "disk error") and allows you to dequeue your job.
 
Freebsd Fortunes 2:  394 of 1371

===  ALL USERS PLEASE NOTE  ========================

The garbage collector now works.  In addition a new, experimental garbage
collection algorithm has been installed.  With SI:
 
Freebsd Fortunes 2:  395 of 1371

DSK-GC-QLX-BITS set to 17,
(NOT the default) the old garbage collection algorithm remains in force; when
virtual storage is filled, the machine cold boots itself.  With SI:
 
Freebsd Fortunes 2:  396 of 1371

DSK-GC-
QLX-BITS set to 23, the new garbage collector is enabled.  Unlike most garbage
collectors, the new gc starts its mark phase from the mind of the user, rather
than from the obarray.  This allows the garbage collection of significantly
more Qs.  As the garbage collector runs, it may ask you something like "Do you
remember what SI:RDTBL-TRANS does?", and if you can't give a reasonable answer
in thirty seconds, the symbol becomes a candidate for GCing.  The variable
SI:
 
Freebsd Fortunes 2:  397 of 1371

GC-QLX-LUSER-TM governs how long the GC waits before timing out the user.
 
Freebsd Fortunes 2:  398 of 1371

===  ALL USERS PLEASE NOTE  ========================

There has been some confusion concerning MAPCAR.
        (DEFUN MAPCAR (&FUNCTIONAL FCN &EVAL &REST LISTS)
                (PROG (V P LP)
                (SETQ P (LOCF V))
        L       (SETQ LP LISTS)
                (
 
Freebsd Fortunes 2:  399 of 1371

START-FUNCTION-CALL FCN T (LENGTH LISTS) NIL)
        L1      (OR LP (GO L2))
                (AND (NULL (CAR LP)) (RETURN V))
                (
 
Freebsd Fortunes 2:  400 of 1371

PUSH (CAAR LP))
                (RPLACA LP (CDAR LP))
                (SETQ LP (CDR LP))
                (GO L1)
        L2      (
« Prev Random Freebsd Fortunes 2   Next »
« Prev  1  2  3  4  5  6  7  8  9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99  100  101  102  103  104  105  106  107  108  109  110  111  112  113  114  115  116  117  118  119  120  121  122  123  124  125  126  127  128  129  130  131  132  133  134  135  136  137  138  Next »
Search [help]

About  |  Contact Us  |  Terms of Use  |  Privacy & Disclosure
FreeBsd Quotes  |  Linux Quotes