diff options
| author | manuel <manuel@mausz.at> | 2012-03-26 12:54:45 +0200 |
|---|---|---|
| committer | manuel <manuel@mausz.at> | 2012-03-26 12:54:45 +0200 |
| commit | b5f0874cd96ee2a62aabc645b9626c2749cb6a01 (patch) | |
| tree | 1262e4bbe0634de6650be130c36e0538240f4cbf /pintos-progos/tests/vm/sample.inc | |
| download | progos-b5f0874cd96ee2a62aabc645b9626c2749cb6a01.tar.gz progos-b5f0874cd96ee2a62aabc645b9626c2749cb6a01.tar.bz2 progos-b5f0874cd96ee2a62aabc645b9626c2749cb6a01.zip | |
initial pintos checkin
Diffstat (limited to 'pintos-progos/tests/vm/sample.inc')
| -rw-r--r-- | pintos-progos/tests/vm/sample.inc | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/pintos-progos/tests/vm/sample.inc b/pintos-progos/tests/vm/sample.inc new file mode 100644 index 0000000..a60a139 --- /dev/null +++ b/pintos-progos/tests/vm/sample.inc | |||
| @@ -0,0 +1,19 @@ | |||
| 1 | char sample[] = { | ||
| 2 | "=== ALL USERS PLEASE NOTE ========================\n" | ||
| 3 | "\n" | ||
| 4 | "CAR and CDR now return extra values.\n" | ||
| 5 | "\n" | ||
| 6 | "The function CAR now returns two values. Since it has to go to the\n" | ||
| 7 | "trouble to figure out if the object is carcdr-able anyway, we figured\n" | ||
| 8 | "you might as well get both halves at once. For example, the following\n" | ||
| 9 | "code shows how to destructure a cons (SOME-CONS) into its two slots\n" | ||
| 10 | "(THE-CAR and THE-CDR):\n" | ||
| 11 | "\n" | ||
| 12 | " (MULTIPLE-VALUE-BIND (THE-CAR THE-CDR) (CAR SOME-CONS) ...)\n" | ||
| 13 | "\n" | ||
| 14 | "For symmetry with CAR, CDR returns a second value which is the CAR of\n" | ||
| 15 | "the object. In a related change, the functions MAKE-ARRAY and CONS\n" | ||
| 16 | "have been fixed so they don't allocate any storage except on the\n" | ||
| 17 | "stack. This should hopefully help people who don't like using the\n" | ||
| 18 | "garbage collector because it cold boots the machine so often.\n" | ||
| 19 | }; | ||
