diff --git a/collects/handin-server/overridden-collects/fake-teachpack/htdp/guess.ss b/collects/handin-server/overridden-collects/fake-teachpack/htdp/guess.ss index 757c4a8144..cb91164b02 100644 --- a/collects/handin-server/overridden-collects/fake-teachpack/htdp/guess.ss +++ b/collects/handin-server/overridden-collects/fake-teachpack/htdp/guess.ss @@ -11,9 +11,6 @@ (define-higher-order-primitive guess-with-gui-list guess-with-gui-list/proc (_ check-guess-list)) -(define (convert guesses:vec) - (void)) - (define (guess-with-gui/proc cg) (check-proc 'guess-with-gui cg 2 'first "two arguments") (void)) diff --git a/collects/handin-server/overridden-collects/fake-teachpack/htdp/master.ss b/collects/handin-server/overridden-collects/fake-teachpack/htdp/master.ss new file mode 100644 index 0000000000..e951b5380b --- /dev/null +++ b/collects/handin-server/overridden-collects/fake-teachpack/htdp/master.ss @@ -0,0 +1,11 @@ +#lang scheme/gui + +(require htdp/error lang/prim) + +(provide master) + +(define-higher-order-primitive master master/proc (compare-guess)) + +(define (master/proc cg) + (check-proc 'master cg 4 'first 'arguments) + (void))