From 0aa1a9a43ddfd1f27b3ca4c8ed6d00501e57c53d Mon Sep 17 00:00:00 2001 From: Jeremy Hughes Date: Wed, 8 Jul 2009 09:31:27 +1200 Subject: [PATCH] alien.marshall.syntax: remove duplicate annotate-effect call --- basis/alien/marshall/syntax/syntax.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/alien/marshall/syntax/syntax.factor b/basis/alien/marshall/syntax/syntax.factor index 321ca59023..ab794ed4a8 100644 --- a/basis/alien/marshall/syntax/syntax.factor +++ b/basis/alien/marshall/syntax/syntax.factor @@ -6,7 +6,7 @@ quotations sequences words ; IN: alien.marshall.syntax :: marshalled-function ( function types effect -- word quot effect ) - function types effect annotate-effect factor-function + function types effect factor-function [ in>> ] [ out>> types [ pointer-to-primitive? ] filter append ] bi