From 077cd0397b3a992435f305d75da18de78c689572 Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Fri, 7 May 2010 18:15:37 -0700 Subject: [PATCH] cuda.devices: fix distribute-jobs to look only at width of maxThreadsDim --- extra/cuda/devices/devices.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/cuda/devices/devices.factor b/extra/cuda/devices/devices.factor index d909e9ab5c..7ad7b32c8d 100644 --- a/extra/cuda/devices/devices.factor +++ b/extra/cuda/devices/devices.factor @@ -82,5 +82,5 @@ IN: cuda.devices : distribute-jobs ( job-count per-job-shared -- launcher ) cuda-device get cuda-device-properties - [ sharedMemPerBlock>> ] [ maxThreadsDim>> ] bi + [ sharedMemPerBlock>> ] [ maxThreadsDim>> first ] bi (distribute-jobs) 3<<< ; inline