From 25c2cd547caffe7266ec5bab9eac23dfa8d03093 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Sun, 26 Dec 2004 03:15:37 +0000
Subject: [PATCH] abi wrong

---
 library/compiler/alien.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/library/compiler/alien.factor b/library/compiler/alien.factor
index 6d29d8f2ee..89b9808bf0 100644
--- a/library/compiler/alien.factor
+++ b/library/compiler/alien.factor
@@ -151,7 +151,7 @@ SYMBOL: alien-parameters
 : linearize-alien ( node -- )
     dup linearize-parameters >r
     dup [ node-param get ] bind #c-call swons ,
-    dup [ node-param get car library-abi "stdcall" = ] bind
+    dup [ node-param get cdr library-abi "stdcall" = ] bind
     r> swap [ drop ] [ #cleanup swons , ] ifte
     linearize-returns ;