Skip to content

Commit

Permalink
Remove unused setup(Word,...)
Browse files Browse the repository at this point in the history
We only actually call any setup function on SymbolClosure's
  • Loading branch information
d-torrance committed Sep 7, 2024
1 parent 9a31b71 commit 0a0ea7b
Showing 1 changed file with 0 additions and 20 deletions.
20 changes: 0 additions & 20 deletions M2/Macaulay2/d/common.d
Original file line number Diff line number Diff line change
Expand Up @@ -49,26 +49,6 @@ export pos(c:Code):void := ( -- for use in the debugger
stdIO << codePosition(c) << endl;
);

export setup(word:Word):void := (
makeSymbol(word,dummyPosition,globalDictionary);
);
export setup(word:Word,fn:unop):void := (
e := makeSymbol(word,dummyPosition,globalDictionary);
unopNameList = unopNameListCell(fn,e,unopNameList);
e.unary = fn;
);
export setup(word:Word,fn:binop):void := (
e := makeSymbol(word,dummyPosition,globalDictionary);
binopNameList = binopNameListCell(fn,e,binopNameList);
e.binary = fn;
);
export setup(word:Word,fun1:unop,fun2:binop):void := (
e := makeSymbol(word,dummyPosition,globalDictionary);
unopNameList = unopNameListCell(fun1,e,unopNameList);
binopNameList = binopNameListCell(fun2,e,binopNameList);
e.unary = fun1;
e.binary = fun2;
);
export setuppostfix(e:SymbolClosure,fn:unop):void := (
unopNameList = unopNameListCell(fn,e.symbol,unopNameList);
e.symbol.postfix = fn;
Expand Down

0 comments on commit 0a0ea7b

Please sign in to comment.