Created real impl for the preference provider

darcs-hash:20060119170101-49d33-08a5e4f741a6c00172151618c35d3c6ea197da66.gz

de.leiffrenzel.fp.haskell.ui/META-INF/MANIFEST.MF

@@ -23,6 +23,7 @@ Eclipse-AutoStart: true
 Provide-Package: de.leiffrenzel.fp.haskell.ui;x-friends:="net.sf.eclipsefp.haskell.ui.test",
  de.leiffrenzel.fp.haskell.ui.dialog,
  de.leiffrenzel.fp.haskell.ui.launch,
+ de.leiffrenzel.fp.haskell.ui.preferences.editor;x-friends:="net.sf.eclipsefp.haskell.ui.test",
  de.leiffrenzel.fp.haskell.ui.util,
  de.leiffrenzel.fp.haskell.ui.util.preferences,
  de.leiffrenzel.fp.haskell.ui.util.text

de.leiffrenzel.fp.haskell.ui/src/de/leiffrenzel/fp/haskell/ui/util/preferences/HaskellPreferenceProvider.java

@@ -0,0 +1,20 @@
+package de.leiffrenzel.fp.haskell.ui.util.preferences;
+
+import org.eclipse.jface.preference.IPreferenceStore;
+
+import de.leiffrenzel.fp.haskell.ui.HaskellUIPlugin;
+import de.leiffrenzel.fp.haskell.ui.preferences.editor.IEditorPreferenceNames;
+
+public class HaskellPreferenceProvider implements IHaskellPreferenceProvider,
+                                                  IEditorPreferenceNames
+{
+
+	public int getTabSize() {
+		return getPreferenceStore().getInt(EDITOR_TAB_WIDTH);
+	}
+
+    private IPreferenceStore getPreferenceStore() {
+    	return HaskellUIPlugin.getDefault().getPreferenceStore();
+	}
+
+}

net.sf.eclipsefp.haskell.core.jparser/antlr-src/haskell-lexer.g

@@ -12,6 +12,7 @@
 header {
 package net.sf.eclipsefp.haskell.core.jparser;
 
+import de.leiffrenzel.fp.haskell.ui.util.preferences.HaskellPreferenceProvider;
 import de.leiffrenzel.fp.haskell.ui.util.preferences.IHaskellPreferenceProvider;
 
 }
@@ -52,6 +53,15 @@ tokens {
 }
 
 {
+	{
+		try {
+			this.setTabSize(new HaskellPreferenceProvider().getTabSize());
+		} catch(NullPointerException e) {
+			//happens when the eclipse platform isn't loaded
+			//in this case, ignore the default preference provider
+		}
+	}
+
 	public HaskellLexer(Reader reader, IHaskellPreferenceProvider prefs) {
 		this(reader);
 		this.setTabSize(prefs.getTabSize());

net.sf.eclipsefp.haskell.ui.test/.classpath

@@ -0,0 +1,7 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<classpath>
+	<classpathentry kind="src" path="src"/>
+	<classpathentry kind="con" path="org.eclipse.jdt.launching.JRE_CONTAINER"/>
+	<classpathentry kind="con" path="org.eclipse.pde.core.requiredPlugins"/>
+	<classpathentry kind="output" path="bin"/>
+</classpath>

net.sf.eclipsefp.haskell.ui.test/.project

@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<projectDescription>
+	<name>net.sf.eclipsefp.haskell.ui.test</name>
+	<comment></comment>
+	<projects>
+	</projects>
+	<buildSpec>
+		<buildCommand>
+			<name>org.eclipse.jdt.core.javabuilder</name>
+			<arguments>
+			</arguments>
+		</buildCommand>
+		<buildCommand>
+			<name>org.eclipse.pde.ManifestBuilder</name>
+			<arguments>
+			</arguments>
+		</buildCommand>
+		<buildCommand>
+			<name>org.eclipse.pde.SchemaBuilder</name>
+			<arguments>
+			</arguments>
+		</buildCommand>
+	</buildSpec>
+	<natures>
+		<nature>org.eclipse.pde.PluginNature</nature>
+		<nature>org.eclipse.jdt.core.javanature</nature>
+	</natures>
+</projectDescription>

net.sf.eclipsefp.haskell.ui.test/META-INF/MANIFEST.MF

@@ -0,0 +1,11 @@
+Manifest-Version: 1.0
+Bundle-ManifestVersion: 2
+Bundle-Name: Haskell UI Test Plug-in
+Bundle-SymbolicName: net.sf.eclipsefp.haskell.ui.test
+Bundle-Version: 0.9.1
+Bundle-Vendor: eclipsefp.sourceforge.net
+Bundle-Localization: plugin
+Require-Bundle: org.junit,
+ org.eclipse.ui,
+ de.leiffrenzel.fp.haskell.ui
+Export-Package: net.sf.eclipsefp.haskell.ui.test

net.sf.eclipsefp.haskell.ui.test/build.properties

@@ -0,0 +1,4 @@
+source.. = src/
+output.. = bin/
+bin.includes = META-INF/,\
+               .

net.sf.eclipsefp.haskell.ui.test/src/net/sf/eclipsefp/haskell/ui/test/AllAllTests_PDESuite.java

@@ -0,0 +1,18 @@
+package net.sf.eclipsefp.haskell.ui.test;
+
+import net.sf.eclipsefp.haskell.ui.test.util.preferences.AllTests_PDESuite;
+import junit.framework.Test;
+import junit.framework.TestSuite;
+
+public class AllAllTests_PDESuite {
+
+	public static Test suite() {
+		TestSuite suite = new TestSuite(
+				"Test for de.leiffrenzel.fp.haskell.ui");
+		//$JUnit-BEGIN$
+		suite.addTest(AllTests_PDESuite.suite());
+		//$JUnit-END$
+		return suite;
+	}
+
+}

net.sf.eclipsefp.haskell.ui.test/src/net/sf/eclipsefp/haskell/ui/test/util/preferences/AllTests_PDESuite.java

@@ -0,0 +1,17 @@
+package net.sf.eclipsefp.haskell.ui.test.util.preferences;
+
+import junit.framework.Test;
+import junit.framework.TestSuite;
+
+public class AllTests_PDESuite {
+
+	public static Test suite() {
+		TestSuite suite = new TestSuite(
+				"Test for de.leiffrenzel.fp.haskell.ui.test.util.preferences");
+		//$JUnit-BEGIN$
+		suite.addTestSuite(HaskellPreferenceProvider_PDETest.class);
+		//$JUnit-END$
+		return suite;
+	}
+
+}

net.sf.eclipsefp.haskell.ui.test/src/net/sf/eclipsefp/haskell/ui/test/util/preferences/HaskellPreferenceProvider_PDETest.java

@@ -0,0 +1,37 @@
+package net.sf.eclipsefp.haskell.ui.test.util.preferences;
+
+import org.eclipse.jface.preference.IPreferenceStore;
+
+import de.leiffrenzel.fp.haskell.ui.HaskellUIPlugin;
+import de.leiffrenzel.fp.haskell.ui.preferences.editor.IEditorPreferenceNames;
+import de.leiffrenzel.fp.haskell.ui.util.preferences.HaskellPreferenceProvider;
+import de.leiffrenzel.fp.haskell.ui.util.preferences.IHaskellPreferenceProvider;
+import junit.framework.TestCase;
+
+public class HaskellPreferenceProvider_PDETest extends TestCase
+											   implements IEditorPreferenceNames
+{
+
+	public void testTabSize() {
+		final IHaskellPreferenceProvider prefs = new HaskellPreferenceProvider();
+
+		int tabSize = 6;
+		setPreferenceValue(EDITOR_TAB_WIDTH, tabSize);
+
+		assertEquals(tabSize, prefs.getTabSize());
+
+		tabSize = 4;
+		setPreferenceValue(EDITOR_TAB_WIDTH, tabSize);
+		assertEquals(tabSize, prefs.getTabSize());
+	}
+
+	private void setPreferenceValue(String key, int value) {
+		getPreferenceStore().setValue(key, value);
+	}
+
+    private IPreferenceStore getPreferenceStore() {
+    	return HaskellUIPlugin.getDefault().getPreferenceStore();
+	}
+
+
+}

net.sf.eclipsefp.test/META-INF/MANIFEST.MF

@@ -8,4 +8,5 @@ Bundle-Localization: plugin
 Require-Bundle: org.junit,
  net.sf.eclipsefp.common.ui.test,
  net.sf.eclipsefp.haskell.core.parser.test,
- net.sf.eclipsefp.haskell.core.jparser.test
+ net.sf.eclipsefp.haskell.core.jparser.test,
+ net.sf.eclipsefp.haskell.ui.test

net.sf.eclipsefp.test/src/net/sf/eclipsefp/test/AllAllTests_PDESuite.java

@@ -11,6 +11,7 @@ public static Test suite() {
 		suite.addTest(net.sf.eclipsefp.common.ui.test.AllTests_PDESuite.suite());
 		suite.addTest(net.sf.eclipsefp.haskell.core.parser.AllTests_PDESuite.suite());
 		suite.addTest(net.sf.eclipsefp.haskell.core.jparser.test.AllAllTests_PDESuite.suite());
+		suite.addTest(net.sf.eclipsefp.haskell.ui.test.AllAllTests_PDESuite.suite());
 		//$JUnit-END$
 		return suite;
 	}