diff options
| author | dos-reis <gdr@axiomatics.org> | 2013-07-02 02:36:13 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2013-07-02 02:36:13 +0000 |
| commit | 75562692f6375a5ce067997d494a3238eb77f6d5 (patch) | |
| tree | 49bfa85b80e2b9d2b9a33dd6c99de245f0f96330 /src/interp/g-util.boot | |
| parent | cb90da3427de1c9113fdf285ba6ba3a9d307fb6f (diff) | |
| download | open-axiom-75562692f6375a5ce067997d494a3238eb77f6d5.tar.gz | |
Rever sharp var list changes.
Diffstat (limited to 'src/interp/g-util.boot')
| -rw-r--r-- | src/interp/g-util.boot | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot index 3115c8f7..aeb05ece 100644 --- a/src/interp/g-util.boot +++ b/src/interp/g-util.boot @@ -1,6 +1,6 @@ -- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd. -- All rights reserved. --- Copyright (C) 2007-2013, Gabriel Dos Reis. +-- Copyright (C) 2007-2012, Gabriel Dos Reis. -- All rights reserved. -- -- Redistribution and use in source and binary forms, with or without @@ -48,8 +48,6 @@ module g_-util where spliceSeqArgs: %List %Code -> %Code mkSeq: %List %Code -> %Code usesVariable?: (%Code,%Symbol) -> %Boolean - formalVarList: %Short -> %List %Symbol - tvarList: %Short -> %List %Symbol --% @@ -264,11 +262,6 @@ isSharpVarWithNum x == ok := digit? d => c := 10*c + DIG2FIX d if ok then c else nil -formalVarList n == - take(n,$FormalMapVariableList) - -tvarList n == - take(n,$TriangleVariableList) mkBuffer v == [copyVector v,:#v] |