From 74901c5b4cecf0d7e20a76c5b60dbdcf57b1ca5e Mon Sep 17 00:00:00 2001 From: Joe Marshall Date: Wed, 25 Jan 2012 07:21:36 -0800 Subject: [PATCH] Export sequence-immediate-first and -second. --- src/compiler/machines/C/compiler.pkg | 2 ++ src/compiler/machines/alpha/compiler.pkg | 2 ++ src/compiler/machines/bobcat/compiler.pkg | 2 ++ src/compiler/machines/i386/compiler.pkg | 2 ++ src/compiler/machines/mips/compiler.pkg | 2 ++ src/compiler/machines/spectrum/compiler.pkg | 2 ++ src/compiler/machines/svm/compiler.pkg | 2 ++ src/compiler/machines/vax/compiler.pkg | 2 ++ src/compiler/machines/x86-64/compiler.pkg | 2 ++ src/runtime/runtime.pkg | 2 ++ 10 files changed, 20 insertions(+) diff --git a/src/compiler/machines/C/compiler.pkg b/src/compiler/machines/C/compiler.pkg index e1e8dd6c1..2c1b5a35f 100644 --- a/src/compiler/machines/C/compiler.pkg +++ b/src/compiler/machines/C/compiler.pkg @@ -163,6 +163,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/alpha/compiler.pkg b/src/compiler/machines/alpha/compiler.pkg index 4910c3891..d8bdbf4c7 100644 --- a/src/compiler/machines/alpha/compiler.pkg +++ b/src/compiler/machines/alpha/compiler.pkg @@ -161,6 +161,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/bobcat/compiler.pkg b/src/compiler/machines/bobcat/compiler.pkg index 2285b8a15..9f9792821 100644 --- a/src/compiler/machines/bobcat/compiler.pkg +++ b/src/compiler/machines/bobcat/compiler.pkg @@ -162,6 +162,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/i386/compiler.pkg b/src/compiler/machines/i386/compiler.pkg index 4c264e658..d4824fe73 100644 --- a/src/compiler/machines/i386/compiler.pkg +++ b/src/compiler/machines/i386/compiler.pkg @@ -164,6 +164,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/mips/compiler.pkg b/src/compiler/machines/mips/compiler.pkg index 66c073626..c643f48e3 100644 --- a/src/compiler/machines/mips/compiler.pkg +++ b/src/compiler/machines/mips/compiler.pkg @@ -162,6 +162,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/spectrum/compiler.pkg b/src/compiler/machines/spectrum/compiler.pkg index 3441a528a..2a5e9ff4b 100644 --- a/src/compiler/machines/spectrum/compiler.pkg +++ b/src/compiler/machines/spectrum/compiler.pkg @@ -162,6 +162,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/svm/compiler.pkg b/src/compiler/machines/svm/compiler.pkg index 009f81bda..a8f05d434 100644 --- a/src/compiler/machines/svm/compiler.pkg +++ b/src/compiler/machines/svm/compiler.pkg @@ -165,6 +165,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/vax/compiler.pkg b/src/compiler/machines/vax/compiler.pkg index df0657bf1..c5b4cffab 100644 --- a/src/compiler/machines/vax/compiler.pkg +++ b/src/compiler/machines/vax/compiler.pkg @@ -162,6 +162,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/compiler/machines/x86-64/compiler.pkg b/src/compiler/machines/x86-64/compiler.pkg index ca2aa7107..442567c7b 100644 --- a/src/compiler/machines/x86-64/compiler.pkg +++ b/src/compiler/machines/x86-64/compiler.pkg @@ -164,6 +164,8 @@ USA. (scode/quotation? quotation?) (scode/sequence-actions sequence-actions) (scode/sequence-components sequence-components) + (scode/sequence-immediate-first sequence-immediate-first) + (scode/sequence-immediate-second sequence-immediate-second) (scode/sequence-first sequence-first) (scode/sequence-second sequence-second) (scode/sequence? sequence?) diff --git a/src/runtime/runtime.pkg b/src/runtime/runtime.pkg index 4ab02045a..205e98aec 100644 --- a/src/runtime/runtime.pkg +++ b/src/runtime/runtime.pkg @@ -3634,6 +3634,8 @@ USA. sequence-actions sequence-components sequence-immediate-actions + sequence-immediate-first + sequence-immediate-second sequence-first sequence-second sequence? -- 2.25.1