last two load references to 'internal' replaced with input locs

1 files changed, 2 insertions, 2 deletions

diff --git a/colm/load.cc b/colm/load.cc
index 41412a66..95d3c084 100644
--- a/colm/load.cc
+++ b/colm/load.cc
@@ -1399,7 +1399,7 @@ struct LoadSource
 			}
 			else {
 				ExprVect *exprVect = walkCodeExprList( codeFactor.CodeExprList() );
-				term = LangTerm::cons( internal, langVarRef, exprVect );
+				term = LangTerm::cons( langVarRef->loc, langVarRef, exprVect );
 			}
 
 			expr = LangExpr::cons( term );
@@ -1467,7 +1467,7 @@ struct LoadSource
 		}
 		else if ( codeFactor.String() != 0 ) {
 			ConsItemList *list = walkString( codeFactor.String() );
-			expr = LangExpr::cons( LangTerm::cons( internal, list ) );
+			expr = LangExpr::cons( LangTerm::cons( codeFactor.String().loc(), list ) );
 		}
 		else if ( codeFactor.MatchVarRef() != 0 ) {
 			LangVarRef *varRef = walkVarRef( codeFactor.MatchVarRef() );