From 71dd957f77de9b41bb8da5becef2f83779fe012f Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 28 Jul 2015 19:30:20 -0700 Subject: [PATCH] command-line: rename file to path for user-init-error which is kinda exactly like a source-file-error. --- basis/command-line/command-line.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/command-line/command-line.factor b/basis/command-line/command-line.factor index 349ca5e911..44ff0c0c12 100644 --- a/basis/command-line/command-line.factor +++ b/basis/command-line/command-line.factor @@ -9,12 +9,12 @@ IN: command-line SYMBOL: user-init-errors SYMBOL: +user-init-error+ -TUPLE: user-init-error error file line# asset ; +TUPLE: user-init-error error path line# asset ; : ( error -- error' ) [ ] [ error-file ] [ error-line ] tri f user-init-error boa ; inline -M: user-init-error error-file file>> ; +M: user-init-error error-file path>> ; M: user-init-error error-line line#>> ; M: user-init-error error-type drop +user-init-error+ ;